Soru Labelden Kelime Ayıklama

[leonadies]

Userformda Label1="Elma,Armut,Muz,Çilek" değerlerini formülle getirtiyorum.

İsteğim ise Label1 deki bu kelimelerde Muz geçiyorsa bana bunu bildirsin. If then kalıbı ile çözmedim bir türlü. Eğersay ile denedim yine olmadı. Kelimeyi nasıl ayıklayabilirim?

Private Sub CommandButton2_Click()

If Label1.Value = "*MUZ*" Then
MsgBox "OK"
End If

End sub

 

[ÖmerFaruk]

If InStr(1, Label1.Caption, "MUZ") > 0 Then

 

[leonadies]

Malesef Olmadı @NextLevel üstadım dosyayı ekledim

 

[ÖmerFaruk]

Sorunuzda şu ifade vardı "If Label1.Value = "*MUZ*" Then"
Dosyanızda ise Muz olarak kullanmışınız

"MUZ" ile "Muz" VBA için direkt kullanıldıklarında farklı değerlerdedir. Başlıkta ne arıyorsanız verdiğim koda da aynısını yazın.

Ayrıca sizin kullanımınızda yanlış değil. Ancak eksik. LIKE komutunu araştırın.

 

[leonadies]

@NextLevel üstadım teşekkür ederim. Bugün birşey daha öğrenmiş oldum

Private Sub CommandButton2_Click()

If InStr(1, Label1.Caption, "Muz") > 0 Then
MsgBox "OK"
End If

End Sub