Copier onglet dans classeur

Y compris Power BI, Power Query et toute autre question en lien avec Excel
W
Warnex
Nouveau venu
Nouveau venu
Messages : 2
Inscrit le : 6 avril 2016
Version d'Excel : 2013 FR

Message par Warnex » 6 avril 2016, 21:07

Bonsoir à tous ,

Voila je voudrai savoir comment faire à partir d'un bouton pour copier mon onglet actif dans un classeur ayant pour nom une variable qui a pour valeur le nom d'une agence saisie dans une cellule de mon onglet actif . J'ai codé mon propre VBA mais l'avant dernière ligne me pose problème car cela ne fonctionne pas:
Private Sub CommandButton7_Click()
Dim Agence As String
Agence = Range("B7").Value
Workbooks.Open Filename:="C:\Users\Damien\Desktop\" & Agence & ".xlsx"
Workbooks("MAQUETTE.xlsm").Activate
Sheets("MAQUETTE").Select
 
Sheets("MAQUETTE").Copy After:=Workbooks("& Agence.xlsx").Sheets(1)
 
End Sub
Merci par avance pour votre aide :)
M
MFerrand
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'171
Appréciations reçues : 447
Inscrit le : 20 juillet 2015
Version d'Excel : 2010 FR

Message par MFerrand » 6 avril 2016, 21:28

Bonsoir,
Private Sub CommandButton7_Click()
    Dim Agence As String
    Agence = Range("B7").Value & ".xlsx"
    Workbooks.Open Filename:="C:\Users\Damien\Desktop\" & Agence
    Workbooks("MAQUETTE.xlsm").Sheets("MAQUETTE").Copy After:=Workbooks(Agence).Sheets(1)
End Sub
Cordialement.
W
Warnex
Nouveau venu
Nouveau venu
Messages : 2
Inscrit le : 6 avril 2016
Version d'Excel : 2013 FR

Message par Warnex » 6 avril 2016, 21:41

Merci beaucoup !!! C'est très gentil de votre part :)
Bonne soirée .
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message