Multipage

Fermé
abdellah_tadjine Messages postés 191 Date d'inscription jeudi 30 novembre 2006 Statut Membre Dernière intervention 5 janvier 2022 - 16 juil. 2017 à 16:33
abdellah_tadjine Messages postés 191 Date d'inscription jeudi 30 novembre 2006 Statut Membre Dernière intervention 5 janvier 2022 - 16 juil. 2017 à 23:30
Bonjour,

j'ai inséré un Multi page pour mon logiciel.(userform) vba excel...constitué de trois element page 1 nommé analyse.....page 2 nommée consultation et enfin page 3 nommée radiologie....et je veux quand je click sur page1 ...analyse soit ecris sur une cellule a1 par exemple et page 2 . consultation sur cellule a1..cts... merci cordialemen abdellah

A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
16 juil. 2017 à 19:55
Bonjour,

Essaies :
Option Explicit
Private Sub UserForm_Initialize()
  MultiPage1.Value = 0  'pour provoquer l'évènement change
End Sub
Private Sub MultiPage1_Change()
  With Worksheets("Feuil1").Range("A1")
    Select Case MultiPage1.Value
      Case 0
        .Value = "Analyse"
      Case 1
        .Value = "Consultation"
      Case 2
        .Value = "Radiologie"
    End Select
  End With
End Sub


0
abdellah_tadjine Messages postés 191 Date d'inscription jeudi 30 novembre 2006 Statut Membre Dernière intervention 5 janvier 2022 6
16 juil. 2017 à 23:30
ca marche a merveil!!!!!!!! merci bcp
0