Un seul classeur ouvert

Bonjour le forum,

Est-il possible de demander à excel (via un code vba) d'ouvrir qu'un seul classeur?

Merci

Oui, mais précise mieux ta demande

Mytæ

Bonjour,

en fait j'ai un classeur avec beaucoup de macros et pour éviter des confusions entre classeurs, je souhaiterais qu'il soit impossible d'en ouvrir deux en même temps.

voilà merci

Re bonjour le forum

je me permet de remonter ce post car je n'ai pas eu de solution à ce jour.

Merci

Bonjour le forum,

de l'aide SVP merci

bonsoir

Voici une macro à placer dans le module objet ThisWorkbook de ton classeur.

Il est ensuite impossible d'ouvrir un autre classeur ou d'en créer un nouveau.

Option Explicit

Public WithEvents XL As Excel.Application

Private Sub Workbook_Open()
  Set XL = Excel.Application
End Sub

Private Sub XL_WorkbookOpen(ByVal Wb As Workbook)
    If Wb.Name <> ThisWorkbook.Name Then Wb.Close (False)
End Sub

Private Sub XL_NewWorkbook(ByVal Wb As Workbook)
    Wb.Close savechanges:=False
End Sub

bonne soirée

michel

merci michel!