Bonjour,
J'ai un gros probleme, j'ai realise un programme pour mettre a jour d'autres classeurs excel. Ce programme demande a l'utilisateur d'aller chercher le fichier a mettre a jour (car je ne connais pas forcement son nom, et encore moins son adresse); apres ouverture de ce fichier, le prog supprime les anciennes données pour ensuite les remplacer. Le programme doit donc naviguer entre les deux classeurs pour copier/coller les infos mises a jour. Le probleme vient lors du retour sur le classeur a mettre a jour, je ne connais pas son nom, et donc je ne sais pas comment l'appeller. Voici mon code :
'ouverture du fichier a mettre a jour
MsgBox "veuillez indiquer le chemin du fichier pour mise à jour"
Application.Workbooks.Open Application.GetOpenFilename()
'suppression des anciennes donnees
Sheets("Export MSP" ).Select
Range("B10" ).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
'retour sur le fichier ou la macro est situé (je connais son nom a celui ci)
Windows("maj bordereaux.xls" ).Activate
Range("A2" ).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
'retour sur le 2eme classeur pour mise a jour (c la le probleme)
'Windows("2eme classeur" ).Activate
'Range("B10" ).Select
'ActiveSheet.Paste
Si vous avez une petite solution ca m'arrangerait bien, j'ai essayé pas mal de truc, notamment la suppression de mon classeur où la macro est présente (tactique de la feinte pour kil retourne tout seul sur mon 2eme classeur héhé) mais ca coupe aussi ma macro (remarque ca parait normal ...) donc je suis un peu a court d'idees.
Message édité par quentinbach le 30-10-2006 à 14:24:51