Workbooks...

Bonjour,

Quand ton classeur est actif initialise une variable :
F¬tiveWorkbook.Name
Puis With Workbooks(F)...

Camille

"Yvan" wrote:

Bonjour,

Peut-on écrire :

With Workbooks("Truc")
....

ou doit-on écrire :

With Workbooks("Truc.xls")
...

--
Merci pour vos réponses.

With Workbooks("Truc.xls") est la bonne
syntaxe dès lors que le classeur a été enregistré.

Si tu manipules plusieurs classeurs, le mieux
est de passer par des objets :

Dim WB1 As WorkBook
Dim WB2 As WorkBook
Dim WB3 As WorkBook

Set WB1 = Workbooks("Truc1.xls")
Set WB2 = Workbooks("Truc2.xls")
Set WB3 = Workbooks("Truc3.xls")

L'échange de données entre classeurs est
hyper rapide d'objet à objet avec un code
du style :

Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False

WB1.Range("A3") = WB3.Range("B3") * WB2.Range("C3")

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.CalculateFull

Surtout ne pas employer de Select ou Activate.

P.


"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news: 82E3526B-5738-4800-AEFF-F0BCAEBDCD0A@microsoft.com...

Bonjour,

Peut-on écrire :

With Workbooks("Truc")
....

ou doit-on écrire :

With Workbooks("Truc.xls")
...

--
Merci pour vos réponses.