Discussion :

[athos7776]

Salut,

Voilà, j'essaie de faire une macro conditionnelle. Je voudrais que SI l'un de mes fichiers Excel (Workbooks) est ouvert, que ma macro ne fasse rien, et que sinon, elle ouvre ce fichier...

Ça l'air stupide en effet comme problème, mais je ne comprends pas pourquoi mon code ne fonctionne pas (disons que suis débutant la dedans). Voici à quoi il ressemble. Merci milles fois!

Code :

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

1
2
3
    If Workbooks.Open ("G:\QSigma\Gabriel\Potentialization\Potentialization All Cies DEC07.xls") = False Then
    Workbooks.Open Filename:=("G:\QSigma\Gabriel\Potentialization\Potentialization All Cies DEC07.xls")
    End If

[jfontaine]

Ce code fonctionne, change juste le nom du fichier

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim wrk As Workbook
Dim Trouve As Boolean
Trouve = False
 
For Each wrk In Application.Workbooks
    If wrk.Name = "a.xls" Then Trouve = True
Next
 
If Trouve = False Then
    Workbooks.Open "d:\a.xls"
End If

[athos7776]

Wow!!! Merci, ça marche nickel!!!!