17/12/2009, 13:41 #5 Uzman maytas Bul Uzman Adı Soyadı: Yaşı: 58 Konum: Bursa Ofis Versiyonu: Ofis 2010 32 Bit Son Oturumu: 20/09/2022,13:21 Yorumları: 540 Konuları: 24 Kayıt Tarihi: 21/12/2008 Teşekkür Puanı: 178 Böyle bişeyden mi bahsediyorsunuz? Kod: Dim A As Byte A = 1 If InStr(1, "1234567", A) > 0 Then MsgBox "Var" Mesajlarımızı Türkçe yazım kurallarına uygun yazalım. Emeğe saygı gösterelim, bir teşekkürü çok görmeyelim. Cevapla Cevapla