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

Statistiques des forums

Discussions
312 316
Messages
2 087 182
Membres
103 491
dernier inscrit
bilg1