Cacher la feuille Excel

Hello !

Je suis au tout début d'un petit projet VBA.

Je souhaiterais que le userForm s'ouvre automatiquement et que la feuille excel soit invisible. Alors j'ai fais ceci :

Private Sub Workbook_Open()
    Application.Visible = False
    Load UserForm1
    UserForm1.Show
End Sub

ça fonctionne sauf que malheureusement ça cache aussi les autres fichiers excel qui sont ouverts... :/

Si vous avez une idée de comment résoudre ce problème, ça serait top ! =) Merci =)

Bonjour

Quelle est l'intérêt de cacher l'application ? Si ce n'est juste que pour donner de la visibilité aux autres classeurs alors autant activer ces autres classeurs, non ? Ou un truc similaire...

@ bientôt

LouReeD

Bonjour,

Ce que je souhaiterais, c'est que les gens qui utilise mon outils n'ai pas accès à excel. Que vu d'extérieur ça ressemble à un logiciel classique. Il n'ont pas besoin de voir mes calculs. =)

Bon, c'est pas l'idéal mais j'ai trouvé ça en attendant mieux :

    Dim chemin As String
    chemin = ThisWorkbook.Path

    Workbooks.Open Filename:=chemin & "\MonAppli.xlsm"
    Windows("MonAppli.xlsm").Visible = False

    Load UserForm1
    UserForm1.Show

Le soucis, c'est que si je change le nom de l'appli, il faut que je pense mettre à jour mon vba.

En attendant mieux, ça fera le taf

Merci à ceux qui ont aidé =)

Bonjour Micka_Plays,

Tu peux faire

Private Sub Workbook_Open()
  ActiveWindow.Visible = False
  Load UserForm1
  UserForm1.Show
End Sub

A+