Discussion :

[nsqualli]

Bonjour,

j'ai un ptit probleme, et j'espere trouver la solution grace a votre aide.

je cree un nouveau classeur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Set xlApp = CreateObject("Excel.Application")
    'On ajoute un classeur
    Set xlBook = xlApp.Workbooks.Add
    'On donne un nom au classeur
    xlBook.SaveAs (CheminCompletClasseurSt)
    'On rend le classeur visible
    xlApp.Visible = True

mais je veux qu'apres cette creation, le nouveau classeur soit activé.

au debut je croyais que par defaut il le sera mais apparement non, car apres la creation j'ai tester avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

msgbox("le classeur active est : " & activeworkbook.name)

et ça me donne le nom d'un autre classeur .

Merci a vous

[nsqualli]

bon j'ai fais cela a la place de que je fesais avant, et ça marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
'On ajoute un classeur
    Set Workbook = Application.Workbooks.Add

bon courage