Salut
Le transfert de mes fichiers excel avec leur code VBA de la maison au boulot ne se passe pas sans probleme. J'ai abandonné l'idée de faire tourner le code sur mon poste de travail macintosh, rien que les controles ne sont pas reconnus...
Le code a été écrit sous Excel 2003 et j'utilise un PC avec Excel 2000. Et le code VBA qui fonctionnait bien bugg maintenant.
J'ai découpé le code en toutes petites parties pour localiser l'endroit où ca bugg, et.... c'est une simple activation de feuille au tout début du code avant collage d'une selection.
Voilà le code qui démarre à la validation d'un formulaire :
La sélection dans le fichier source se passe nickel. C'est la derniere ligne que le déboggueur surligne.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub CommandButtonUsfDAAdress_Click() 'Selectionne et copie les données sources UserFormDAAdress.Hide Workbooks(TextBoxDAFich.Value & ".xls").Sheets(TextBoxDAOnglet.Value).Activate ActiveSheet.Range("A5:AZ5").Select ActiveSheet.Range(Selection, Selection.End(xlDown)).Select olignes = Selection.Rows.Count 'Recupere le NB de lignes sources initiales pour l'historik Selection.Copy 'Colle la selection Workbooks("ConvertAchapp.xls").Sheets("ImportDA").Activate
Sur le web, une piste suggere un probleme d'instance, que les 2 fichiers doivent etre ouverts dans la même instance. J'ai essayé d'ouvrir les deux fichiers à partir de Fichier > Ouvrir de Excel plutôt qu'en cliquant sur le fichier dans l'explorateur Windows mais ca ne change rien.
La macro automatique sur Excel 2000 propose un Windows(nomdufichier).Select mais ca ne resoud pas mon probleme non plus.
Je vais encore essayer de faire ouvrir le fichier par le code.
Sinon peut etre un probleme de code pas au bon niveau pour agir sur 2 fichiers mais je vois pas trop comment faire.
Si quelqu'un a une idée, j'aimerais tellement pouvoir utiliser ce fichier à mon boulot pour le traitement des données plutôt qu'à la maison
Partager