Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Ouvrir des fenêtres

Ouvrir des fenêtres

2 réponses
Avatar
RV
Bonjour,
le code ci dessous me permet d'ouvrir la fenêtre VBAProject, je souhaiterais
ouvrir dans le même temps l'explorateur de projet, la fenêtre des propriétés
et afficher le code le la macro:

Application.VBE.VBProjects.VBE.MainWindow.Visible = True

J'ai essayé plusieurs combinaisons avec codepanes et code module mais sans
succès.
La fenêtre d'exécution me renvoie vrai si les diverses fenêtres sont
ouvertes mais je bogue si elles sont fermées.
Merci et bonne soirée
RV
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Alain CROS
Bonjour,

Sub AfficheVbe_Project_Property()
Dim I&
With Application.VBE.VBProjects.VBE
.MainWindow.Visible = True
For I = 1 To .Windows.Count
Select Case .Windows(I).Type
'Case Is = vbext_wt_ProjectWindow, vbext_wt_PropertyWindow
Case Is = 6, 7
.Windows(I).Visible = True
End Select
Next I
End With
End Sub

Pour le code de la macro, je passe la main.

AC

"RV" a écrit dans le message de news: O$
| Bonjour,
| le code ci dessous me permet d'ouvrir la fenêtre VBAProject, je souhaiterais
| ouvrir dans le même temps l'explorateur de projet, la fenêtre des propriétés
| et afficher le code le la macro:
|
| Application.VBE.VBProjects.VBE.MainWindow.Visible = True
|
| J'ai essayé plusieurs combinaisons avec codepanes et code module mais sans
| succès.
| La fenêtre d'exécution me renvoie vrai si les diverses fenêtres sont
| ouvertes mais je bogue si elles sont fermées.
| Merci et bonne soirée
| RV
|
|
Avatar
RV
Bonsoir Alain,
Merci pour ton aide et bonne fin de week-end.
Cordialement,
RV


"Alain CROS" a écrit dans le message de news:

Bonjour,

Sub AfficheVbe_Project_Property()
Dim I&
With Application.VBE.VBProjects.VBE
.MainWindow.Visible = True
For I = 1 To .Windows.Count
Select Case .Windows(I).Type
'Case Is = vbext_wt_ProjectWindow, vbext_wt_PropertyWindow
Case Is = 6, 7
.Windows(I).Visible = True
End Select
Next I
End With
End Sub

Pour le code de la macro, je passe la main.

AC

"RV" a écrit dans le message de news:
O$
| Bonjour,
| le code ci dessous me permet d'ouvrir la fenêtre VBAProject, je
souhaiterais
| ouvrir dans le même temps l'explorateur de projet, la fenêtre des
propriétés
| et afficher le code le la macro:
|
| Application.VBE.VBProjects.VBE.MainWindow.Visible = True
|
| J'ai essayé plusieurs combinaisons avec codepanes et code module mais
sans
| succès.
| La fenêtre d'exécution me renvoie vrai si les diverses fenêtres sont
| ouvertes mais je bogue si elles sont fermées.
| Merci et bonne soirée
| RV
|
|