Erreur macro copier/coller

Résolu
Maksime568 Messages postés 142 Date d'inscription   Statut Membre Dernière intervention   -  
danielc0 Messages postés 1773 Date d'inscription   Statut Membre Dernière intervention   - 19 janv. 2021 à 11:52
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

Réponse 1 / 5
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   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 142 Date d'inscription   Statut Membre Dernière intervention  
 
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 7904 Date d'inscription   Statut Contributeur Dernière intervention   729 > Maksime568 Messages postés 142 Date d'inscription   Statut Membre Dernière intervention  
 
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 142 Date d'inscription   Statut Membre Dernière intervention   > cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention  
 
Je faisais en sorte d'être certain d'avoir les cellules de destination vide en faisant un .delete de la zone pourtant.
0
Réponse 2 / 5
danielc0 Messages postés 1773 Date d'inscription   Statut Membre Dernière intervention   215
 
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 142 Date d'inscription   Statut Membre Dernière intervention  
 
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
Réponse 3 / 5
danielc0 Messages postés 1773 Date d'inscription   Statut Membre Dernière intervention   215
 
Il y a alors quelque chose qui bloque. Est-ce que tu peux poster le classeur sans données confidentielles ?

Daniel
0
Réponse 4 / 5
Maksime568 Messages postés 142 Date d'inscription   Statut Membre Dernière intervention  
 
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
Réponse 5 / 5
danielc0 Messages postés 1773 Date d'inscription   Statut Membre Dernière intervention   215
 
Bonjour,

Au lieu de 
Range("B76").Paste

mets : 
c.Copy Range("B76")


Daniel
0

Discussions similaires

Dessiner avec son clavier et avec des lettres
JSS -
Polodu33 -

78 réponses
dessin au clavier cannabis
val2t1 -
Mamaaaa18 -

10 réponses
Déplacer un dessin par copier coller
Peter -
Peter -

2 réponses
Comment retrouver le presse papier sur iPhone ?
Slilluu -
Ascaris -

6 réponses