ouvrir un classeur via un bouton [Résolu]

[UDSP50]

bonjour j'ai un souci, j'essai via un bouton dans mon classeur 2 d'ouvrir le classeur 1 mais cela ne fonctionne pas est ce due au format ?

voici mon code

Code :

1
2
3
4
 
Private Sub CommandButton1_Click()
Workbooks("1.xlsm").Open
End Sub

merci de votre aide

[gFZT82]

Bonjour,

As-tu essayé

Code :

1
2
3
Private Sub CommandButton1_Click()
    Workbooks.Open "1.xlsm"
End Sub

Cordialement.

[UDSP50]

Je viens d'essayer, il m'ouvre la fenêtre de débogage aussi

[gFZT82]

Et en précisant le chemin ?

Code :

1
2
 
Workbooks.Open("C:\Documents and Settings\Seb\Bureau\1.xlsm")

[UDSP50]

Code :

1
2
3
4
 
Private Sub CommandButton1_Click()
    Workbooks.Open ("C:\Users\xxxx\Desktop\1.xlsm")
End Sub

maintenant comme il est ouvert j'aimerais qu'il copy les données de la feuil1 de a1 à ak22 et qui le colle dans le classeur 2.xlsm

idem pour la feuil2 etc jusque la feuil12

et après il ferme le classeur 1

[UDSP50]

merci de votre aide c'est résoluA+