faire fonctionner une macro sur des fichiers au nom different

[florentin]

bonjour a tous

voila!

j ai un modele qui me sert pour etablir des bons de commande qui s'appelle "icag commande nomduclient.xls"
puis quand je realise une vente je reouvre le fichier, je fais un "ctrl F" je lance une macro que j'ai enregistrer qui me reformate l'apparence du fichier pour en faire une facture, jusque la tout va bien

et je veux donner un numero a ma facture
j'inscrit le numéro de base sur a1 de perso.xls sur b1 j'ecrit =a1+1
puis j'enregistre une macro à partir de "icag commande nomduclient" je vais dans perso.xls je copie b1 je reviens sur icag commande nomduclient je colle special, puis je copie le numero sur "icag commande nomduclient" je reviens dans perso sur a1 je colle (b1 se prepare pour la prochaine facture, j'enregistre perso je reviens dans "icag commande nomduclient", et c'est fini
ca marche bien mais le "nomduclient" change et ca ne marche plus et je galere et je ne trouve pas la solution, je suis nul!!!!
voila la macro

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 22/05/2012 par FLORENTIN
'
' Touche de raccourci du clavier: Ctrl+n
'
Windows("PERSO.XLS").Activate
Range("B1").Select
Selection.Copy
Windows("ICAG COMMANDE nomduclient.xls").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("D2").Select
Application.CutCopyMode = False
Selection.Copy
Windows("PERSO.XLS").Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Save
Windows("ICAG COMMANDEnomduclient.xls").Activate
End Sub



quequ'un peut il m'aider?
d'avance merci

 

[florentin]

Re : faire fonctionner une macro sur des fichiers au nom different

PIERROT CHAMPION DU MONDE!!!
ça marche!
dommage qu'on soit si loin j'imagine que tu es dans le 93, moi le suis dans le lot prés de Cahors, je t'aurai volontiers payé un coup à boire.
si ça t’intéresse, voila entre autre ce que nous faisons I-cag : les toilettes sches cologiques en kit menuiserie, ébénisterie et fabrication de toilettes sèches

un grand merci
cordialemment

 

[florentin]

Re : faire fonctionner une macro sur des fichiers au nom different

Merci beaucoup ça fonctionnr