creer un classeur et l'activer au meme temps

nsqualli

XLDnaute Junior
Bonjour,

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

je cree un nouveau classeur :

Code:
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:
msgbox("le classeur active est : " & activeworkbook.name)

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

Merci a vous
 

Papou-net

XLDnaute Barbatruc
Re : creer un classeur et l'activer au meme temps

Bonjour nsqualli,

Modifies ton code comme cela :

Code:
'On ajoute un classeur
    Set Workbook = Application.Workbooks.Add

et ton classeur sera automatiquement activé.

Espérant t'avoir aidé.

Cordialement.
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 321
Messages
2 087 265
Membres
103 501
dernier inscrit
talebafia