Erreur macro copier/coller

Résolu/Fermé
Maksime568 Messages postés 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022 - Modifié le 18 janv. 2021 à 09:39
danielc0 Messages postés 848 Date d'inscription mardi 5 juin 2018 Statut Membre Dernière intervention 9 mai 2024 - 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

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
18 janv. 2021 à 12:56
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 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022
18 janv. 2021 à 18:04
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 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728 > Maksime568 Messages postés 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022
18 janv. 2021 à 18:30
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 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022 > cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024
19 janv. 2021 à 06:56
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 848 Date d'inscription mardi 5 juin 2018 Statut Membre Dernière intervention 9 mai 2024 75
18 janv. 2021 à 11:21
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 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022
Modifié le 18 janv. 2021 à 12:00
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 848 Date d'inscription mardi 5 juin 2018 Statut Membre Dernière intervention 9 mai 2024 75
18 janv. 2021 à 12:39
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 144 Date d'inscription mardi 15 avril 2014 Statut Membre Dernière intervention 28 novembre 2022
18 janv. 2021 à 14:54
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 848 Date d'inscription mardi 5 juin 2018 Statut Membre Dernière intervention 9 mai 2024 75
19 janv. 2021 à 11:52
Bonjour,

Au lieu de
Range("B76").Paste

mets :
c.Copy Range("B76")


Daniel
0