Discussion :

[mosquitout]

Bonjour,
Voici se que j'essaye de faire : j'ouvre un document excel et je le rempli avec une appli vb. avant de l'ouvrir je test s'il n'est pas déjà ouvert. Si c'est le cas, je me positionne alors dessus et le rempli. C'est dans ce cas que je ne connais pas la syntaxe !!!!
Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
 
If IsFileOpen(App.Path & "ModeleExcel.xls") = False Then 
        Set appExcel = CreateObject("Excel.Application")
        Set wbExcel = appExcel.Workbooks.Open(App.Path & "ModeleExcel.xls")
        Set Feuille = wbExcel.Worksheets(1)
Else
        Set Feuille = Excel.Application.Workbooks(App.Path & "ModeleDevis.xls").Worksheets(1)
End If
'ici je remplis ma feuille puis l'affiche
appExcel.Visible = True

Si la feuille n'est pas déjà ouverte ca marche mais j'ai un pb dans le second cas. La syntaxe doit pas être très juste heu......
il faut pourtant que j'initialise ma 'Feuille' pour la remplir ! alors comment l'initialiser ? et puis je dois aussi initialiser 'appExcel' pour ensuite l'afficher.

Merci de vos suggestions

[mosquitout]

Bon, ca doit pas être très clair mon explication
Comment, sachant qu'un classeur est déjà ouvert, se positionner sur ce classeur en programmation vb ?
Je n'y connais rien en excel et ai cherché sur ce forum mais pas trouvé de syntaxe pour ca !!!
Thanks

[conconbrr]

Utilise

Code :

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

Workbooks("Classeur1.xls").activate

Ceci dit normalement lorsque tu ouvres un nouveau classeur il devient actif par défaut...

[SfJ5Rpw8]

c'est quoi .. IsFileOpen..?
ton code il s'exécute sous quel applicatif VBA..?

[conconbrr]

Eu desole j'avais pas bien lu
Un truc que je pige pas pourquoi tu veux créer une nouvelle instance d'excel? Tu ne peux pas tt simplement ouvrir ton classeur?

[mosquitout]

Merci de vos réponses.
Bbil, isfileopen est une fonction ou je test si le fichier est déjà ouvert, la fonction me renvoie true ou false. Si le fichier n'est pas déjà ouvert, pas de probleme mon code marche bien. Mais c'est dans le cas ou le fichier serait déjà ouvert ou je bute.

Conconbrr, je voudrai alors tout simplement, non pas ouvrir une nouvelle instance d'excel puisqu'elle existe déjà, mais simplement affiché le classeur déjà ouvert. Mais pour cela, avant je dois remplir certaines zone dedans et donc préciser la feuille active. Et c'est là ou ma syntaxe n'est pas bonne !

Mon code est éxécuté sous vb. Et donc avant de remplir les cellules de ma feuille, je dois préciser de quelle feuille il s'agit.
Aie aie aie, c'est pas simple