Erreur macro copier/coller

Résolu
Maksime568 Messages postés 145 Statut Membre -  
danielc0 Messages postés 1946 Statut Membre -
Bonjour,

J'ai un soucis sur une macro que je n'arrive à résoudre.

je fais un copier/coller qui ne fonctionne pas.

j'ai tenté plusieurs méthodes sans réussir à éviter une erreur.

qu'est ce que je fais qui n'est pas correcte?




Configuration: Windows / Chrome 87.0.4280.141
A voir également:

5 réponses

cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

il est préférable de poster le code en suivant les indications du lien au lieu d'images:

https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code

voir ceci pour faire un copier coller d'une plage de cellule:

https://docs.microsoft.com/fr-fr/office/vba/api/excel.range.copy
1
Maksime568 Messages postés 145 Statut Membre
 
j'ai utilisé un code de ton lien

ActiveSheet.Range("B3:O55").Copy _
    Destination:=Worksheets("Impression").Range("B76")


et cela fonctionne.

Sauriez-vous cependant me dire pourquoi?
0
cs_Le Pivert Messages postés 8437 Statut Contributeur 729 > Maksime568 Messages postés 145 Statut Membre
 
Le bouton se trouve sur la feuille active donc on emploi:

ActiveSheet


ensuite si tu veux coller a la suite il faut déterminer la 1ère ligne vide pour remplacer par une variable:

Range("B76")


voici le site pour trouver la dernière ligne rempli a laquelle tu ajouteras +1

https://excel-malin.com/tutoriels/vba-tutoriels/vba-trouver-la-derniere-cellule-utilisee/

voilà tu as les cartes en main pour faire ta macro

Bon courage

@+ Le Pivert
0
Maksime568 Messages postés 145 Statut Membre > cs_Le Pivert Messages postés 8437 Statut Contributeur
 
Je faisais en sorte d'être certain d'avoir les cellules de destination vide en faisant un .delete de la zone pourtant.
0
danielc0 Messages postés 1946 Statut Membre 238
 
Bonjour,

Essaie en mettant
Set C=Range("B76:O128")
au lieu de
Selection Copy
et au lieu de la ligne en erreur, mets :
C.Copy
Range("B76").Paste


Daniel
0
Maksime568 Messages postés 145 Statut Membre
 
Merci,

mais j'ai toujours le même soucis.

la copie est à prendre en "B3:055" d'une feuille pouvant être variable et à coller en "B73" d'une autre feuille fixe "Impression".
0
danielc0 Messages postés 1946 Statut Membre 238
 
Il y a alors quelque chose qui bloque. Est-ce que tu peux poster le classeur sans données confidentielles ?

Daniel
0
Maksime568 Messages postés 145 Statut Membre
 
Voici le fichier en question:
https://www.cjoint.com/c/KAsn1P256iO
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
danielc0 Messages postés 1946 Statut Membre 238
 
Bonjour,

Au lieu de
Range("B76").Paste

mets :
c.Copy Range("B76")


Daniel
0