non ca marche pas voila mon code complet
Private Sub CommandButton1_Click()
chercherQuoi = UserForm4.TextBox1
Set trouve = Sheets("Suivi ECR 2011").Range("A:A").Find(What:=chercherQuoi, LookAt:=xlWhole)
If Not trouve Is Nothing Then
With UserForm1
Me.MultiPage1.Pages(1).Label3 = trouve.Value
Me.MultiPage1.Pages(1).Label4 = trouve.Offset(, 1).Value
Me.MultiPage1.Pages(2).Label20 = trouve.Offset(, 2).Value
End With
End If
UserForm4.Hide
End Sub
il bloque apres le Me. et surligne le Multipage 1
erreur de compilation
membre de méthode ou donnée introuvable
j'ai regarder dans les propieté mon multipage s'appel bien Multipage1
pour expliquer un peu plus
j'ai mon userforme 1 ouvert avec mes label et textbox que je veux remplir
sur le userform1 j'ai un bouton qui appele le userform4 pour recherché mon texte dans ma feuille suivi ecr 2011
Merci
-- 27 Juin 2011, 15:48 --
aaaaaaaaaaaaaaaaaaaaaaaaaaaAAAAAAAAAAAAAAAAAAAAAHHHHHHHHHHHHHHH
je suis un gros boulet
label 3 et 4 son sur le userform et non sur le multipage
Merci a vous de m'avoir aider
a+