corate92
XLDnaute Junior
Bonjour le forum!
J'ai voulu faire une macro me permettant de copier sur un fichier 1 une valeur (obtenue grâce à une fonction), et de coller cette même valeur dans un fichier 2.
Jusqu'ici pas de problème...
Grâce à notre fameux enregistreur de macro avec un collage spécial, j'obtiens le code suivant:
J'aimerais améliorer ma macro, afin d'éviter les "activate"....
Surtout que j'ai plusieurs cellules à copier à chaque fois avec un collage spécial, donc si cela pouvait accélérer l'éxécution de la macro, ça serait pas plus mal....
Qu'en pensez vous?
Merci à tous ceux qui contribuent à ce site... qui est vraiment une perle (surtout pour les novices en VBA comme moi )
Bonne journée!
J'ai voulu faire une macro me permettant de copier sur un fichier 1 une valeur (obtenue grâce à une fonction), et de coller cette même valeur dans un fichier 2.
Jusqu'ici pas de problème...
Grâce à notre fameux enregistreur de macro avec un collage spécial, j'obtiens le code suivant:
Code:
Sub copie()
'
' Macro enregistrée le 28/04/2008
'
Range("F3").Select
Selection.Copy
Windows("Fichier 2").Activate
Worksheets("Feuille 1").Activate
Range("A65536").End(xlUp).Offset(1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
J'aimerais améliorer ma macro, afin d'éviter les "activate"....
Surtout que j'ai plusieurs cellules à copier à chaque fois avec un collage spécial, donc si cela pouvait accélérer l'éxécution de la macro, ça serait pas plus mal....
Qu'en pensez vous?
Merci à tous ceux qui contribuent à ce site... qui est vraiment une perle (surtout pour les novices en VBA comme moi )
Bonne journée!