test si activeworkbbok = true ??

[Creepy]

Bonjour à tous,

Je voudrais faire en macro un test sur activeworkbook.

Je pourrais faire un test avec workbooks.count > 0, mais, dans le cas d'Excel avec un perso.xls, le count est bien > 0 mais je n'ai pas de feuille d'ouverte !! :evil:

Par consequent il faut que je teste le Activeworkbook = true

Merci d'avance

++

Creepy

 

[Robert]

Bonjour Creepy, Bonjour le forum,

Si tu veux vérifier si le classeur qui contient la macro est bien le classeur actif, je te propose ça :

If ActiveWorkbook.Name = ThisWorkbook.Name Then
MsgBox 'Ok' 'ton code
End If

 

[Creepy]

Hello all,

Merci Robert, mais j'ai trouvé ma solution.

Merci à Ti pour cette astuce, je vous la donne à garder dans vos archives !!

Dim Ws As Workbook
Set Ws = ActiveWorkbook
If Ws Is Nothing Then
blabla...
end if

Voila

++

Creepy