Forcer l'affichage d'une feuille
Bonjour à tous,
Je voudrai ouvrir lors de mes saisies en VBA avec un bouton de forcer l'affichage d'une feuille à mon écran. Bien sure ce même bouton me sert à fermer l'USF pour laisser place à la feuille.
Je connais le Workbook open cela se fait à l'ouverture.
Mon cas c'est que mon projet est ouvert par Workbook open;. C'est voulu ma feuille ne s'ouvre pas au départ mais elle reste visible dans la barre de tache. Mais quand je lui demande d'afficher par ce code :
Sheets("Facture").Activate
ActiveWindow.WindowState = xlMaximized
ma feuille n'apparaît pas à l'écran. J'ai tout essayé je n'ai pu rien faire. Elle rest toujours dans la barre de taches.
Quelqu'un pourrait-il me donner une astuce pour le faire?
Merci d'avance
Amicalement
Noel
Bonjour,
à tester,
Workbooks.Open "C:\blabla.xlsm"
Set wk1 = Workbooks("blabla.xlsm")
wk1.Sheets("Feuil2").ActivateBonjour a tous,
Bonjour sabV,
Je te remercie pour ton code.
J'ai pu résoudre mon problème par celui ci :
Application.Visible = True
Sheets("BlaBla").Activate
ActiveWindow.WindowState = xlMaximized
Application.WindowState = xlNormal
@+
Amicalement
Noel