Menu

Multipage

abdellah_tadjine 125 Messages postés jeudi 30 novembre 2006Date d'inscription 21 avril 2018 Dernière intervention - 16 juil. 2017 à 16:33 - Dernière réponse : abdellah_tadjine 125 Messages postés jeudi 30 novembre 2006Date d'inscription 21 avril 2018 Dernière intervention
- 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

Afficher la suite 

2 réponses

Répondre au sujet
Patrice33740 6799 Messages postés dimanche 13 juin 2010Date d'inscription 19 avril 2018 Dernière intervention - 16 juil. 2017 à 19:55
0
Utile
1
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


abdellah_tadjine 125 Messages postés jeudi 30 novembre 2006Date d'inscription 21 avril 2018 Dernière intervention - 16 juil. 2017 à 23:30
ca marche a merveil!!!!!!!! merci bcp
Commenter la réponse de Patrice33740