Copie coller des userform vers autre classeur
Résolu
lucyjlo
-
melanie1324 Messages postés 1561 Statut Membre -
melanie1324 Messages postés 1561 Statut Membre -
Bonjour,
J'ai crée une macro qui copie entièrement mon fichier pour qu'il soit utilisé pour l'année suivante et ainsi de suite.
Le problème c'est que j'ai 8 userforms et 1 module qui ne se copie pas.
Excel 2003.
J'ai regardé sur plusieurs forums et j'ai trouvé cette macro :
Dim wbk As Workbook
ThisWorkbook.VBProject.VBComponents("Démarrage").Export ThisWorkbook.Path & "\Démarrage.frm"
Set wbk = Workbooks("classeur1.xls")
Application.VBE.activeVBProject.VBComponents.Import ThisWorkbook.Path & "\Démarrage.frm"
Set wbk = Nothing
Elle fonctionne mais que pour un userform pas pour les autres ça me marque :
Erreurs au cours du chargement. Reportez vous à F:\Aide.log pour plus de détails
Merci a ceux qui pourront m'aider.
J'ai crée une macro qui copie entièrement mon fichier pour qu'il soit utilisé pour l'année suivante et ainsi de suite.
Le problème c'est que j'ai 8 userforms et 1 module qui ne se copie pas.
Excel 2003.
J'ai regardé sur plusieurs forums et j'ai trouvé cette macro :
Dim wbk As Workbook
ThisWorkbook.VBProject.VBComponents("Démarrage").Export ThisWorkbook.Path & "\Démarrage.frm"
Set wbk = Workbooks("classeur1.xls")
Application.VBE.activeVBProject.VBComponents.Import ThisWorkbook.Path & "\Démarrage.frm"
Set wbk = Nothing
Elle fonctionne mais que pour un userform pas pour les autres ça me marque :
Erreurs au cours du chargement. Reportez vous à F:\Aide.log pour plus de détails
Merci a ceux qui pourront m'aider.