VBA : effet de la croix dans une userform

Fermé
xuorel Messages postés 254 Date d'inscription samedi 24 novembre 2012 Statut Membre Dernière intervention 11 mai 2023 - Modifié le 13 juin 2018 à 16:31
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 13 juin 2018 à 18:10
Bonjour,

j'ai une userform avec une multipage à l'intérieur de 3 onglets.
Cette userform s'ouvre en faisant CTRL+T.
A chaque fois la userform s'ouvre dans le troisième onglet.
La userform se ferme avec le croix ou en appuyant sur un bouton "valider".

J'ai 2 questions :
- quel est l'effet de la croix rouge dans une userform ? Est-ce que cela équivaut à un hide, à un unload ou à autre chose ?
- Comment faire pour qu'après avoir fermé la UF avec la croix, celle ci se rouvre sur le dernier onglet utilisé ?

Merci

1 réponse

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
13 juin 2018 à 18:10
Bonjour,

Voir ceci:

https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-J

pour ce que tu veux faire il faut mettre en mémoire dans une cellule la position de l'onglet comme ceci:

Option Explicit
Private Sub CommandButton1_Click()
Range("A1").Value = Me.MultiPage1.Value
Unload UserForm1
End Sub
Private Sub UserForm_Initialize()
If Range("A1").Value = "" Then Exit Sub
  Me.MultiPage1.Value = Range("A1").Value
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Range("A1").Value = Me.MultiPage1.Value
End Sub


j'ai pris la cellule A1 de la feuille active à adapter bien entendu

0