Microsoft 365 fermeture auto d'un formulaire

Vdex# · 14 Juin 2024

Bonjour,
dès que je clique sur un onglet dans le menu je voudrais que le userform se ferme automatiquement.
Merci de votre aide.
Cordialement.

Dudu2 · 14 Juin 2024

Bonjour,
Je ne vois pas la difficulté.

VB:

If MESBOUTONS.Caption = feuil.Name Then
    feuil.Activate
    Unload UserForm1
End If

Ou si tu veux rester générique...

Code:

If MESBOUTONS.Caption = feuil.Name Then
    feuil.Activate
    Unload MESBOUTONS.Parent
End If

patricktoulon · 14 Juin 2024

bonjour
pour faire un simple menu de ce type je fait tout dans le userform(autonome)
donc pas de classe (je classe mes bouton intra userform
ensuite selon le nombre de feuille perso je prefère ajouter le scroll dans le userform et le limiter a une taille
ici en l'occurrence la taille est limité a 10 boutons au delas il y aura le scroll
pour le fun je lui ajoute le mouse over avec coloration au survol

bref voila avec 10 feuille

et voila avec plus de feuille

et voila ton fichier
bonne route

Dudu2 · 14 Juin 2024

Je vois pas à quoi ça sert de faire ça à chaque clic.

Code:

For Each Ctrl In UserForm1.Controls
Ctrl.BackColor = &H8000000F
Next
MESBOUTONS.BackColor = vbGreen

Vdex# · 15 Juin 2024

patricktoulon à dit:
bonjour
pour faire un simple menu de ce type je fait tout dans le userform(autonome)
donc pas de classe (je classe mes bouton intra userform
ensuite selon le nombre de feuille perso je prefère ajouter le scroll dans le userform et le limiter a une taille
ici en l'occurrence la taille est limité a 10 boutons au delas il y aura le scroll
pour le fun je lui ajoute le mouse over avec coloration au survol

bref voila avec 10 feuille
Regarde la pièce jointe 1198799

et voila avec plus de feuille
Regarde la pièce jointe 1198801

et voila ton fichier
bonne route

Merci beaucoup c'est parfait.

mapomme · 15 Juin 2024

Bonjour à tous,

Pour plaisanter... Dans ce cas précis, je le fais sans VBA

.

clique-droit dans la barre des onglets à gauche
double-clique sur le nom de la feuille

Microsoft 365 fermeture auto d'un formulaire

Vdex#

XLDnaute Nouveau

Pièces jointes

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Pièces jointes

Dudu2

XLDnaute Barbatruc

Vdex#

XLDnaute Nouveau

mapomme

XLDnaute Barbatruc

Pièces jointes

Discussions similaires