Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Différence Macro et procédure

Différence Macro et procédure

1 réponse
Avatar
DéGé
Je souhaite sélectionner une plage de cellules à partir du classeur
MonfichierDépart pour copier dans une feuille d'un autre classeur
MonClasseurArrivée.

Lorsque j' éxécute Macro1 depuis MonClasseurArrivée, ceci fonctionne.

Sub Macro1()
Workbooks.Open Filename:="D:\MonfichierDepart.xls"
Range("A2").CurrentRegion.Offset(1).Resize(Range("A2").CurrentRegion.Rows.Count - 2).SelectEnd SubCe code associé au bouton 1 depuis MonClasseurArrivée ne fonctionne pasPrivate Sub CommandButton1_Click() Workbooks.Open Filename:="D:\MonfichierDepart.xls"Range("A2").CurrentRegion.Offset(1).Resize(Range("A2").CurrentRegion.Rows.Count - 2).SelectEnd SubMerci de votre aide.DG
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
MichDenis
Message précédent...


"DéGé" a écrit dans le message de news: 45d6ceb4$0$5112$
Je souhaite sélectionner une plage de cellules à partir du classeur
MonfichierDépart pour copier dans une feuille d'un autre classeur
MonClasseurArrivée.

Lorsque j' éxécute Macro1 depuis MonClasseurArrivée, ceci fonctionne.

Sub Macro1()
Workbooks.Open Filename:="D:MonfichierDepart.xls"
Range("A2").CurrentRegion.Offset(1).Resize(Range("A2").CurrentRegion.Rows.Count - 2).SelectEnd
SubCe code associé au bouton 1 depuis MonClasseurArrivée ne fonctionne pasPrivate Sub
CommandButton1_Click() Workbooks.Open
Filename:="D:MonfichierDepart.xls"Range("A2").CurrentRegion.Offset(1).Resize(Range("A2").CurrentRegion.Rows.Count
- 2).SelectEnd SubMerci de votre aide.DG