OVH Cloud OVH Cloud

Masquer et Afficher Excel

1 réponse
Avatar
Patrick Fredin
Bonjour,

Dans une macro je masque Excel pour qu'on ne voit que les UserForms que
j'affiche avec :
Application.Visible = False

Mais ensuite je veux réafficher Excel. Je mets :
Application.Visible = True

mais Excel ne réapparait pas.

Où est l'erreur ?

Merci pour votre aide.

--
Patrick

1 réponse

Avatar
MichDenis
Bonjour Patrick,

'-----------------------------
Sub VoirApplication()

Dim a As Application

Set a = GetObject(, "Excel.Application")

a.Visible = False

'Ton code
MsgBox "ok"

a.Visible = True

Set a = Nothing

End Sub
'-----------------------------


Salutations!




"Patrick Fredin" a écrit dans le message de news:

Bonjour,

Dans une macro je masque Excel pour qu'on ne voit que les UserForms que
j'affiche avec :
Application.Visible = False

Mais ensuite je veux réafficher Excel. Je mets :
Application.Visible = True

mais Excel ne réapparait pas.

Où est l'erreur ?

Merci pour votre aide.

--
Patrick