Textboxta Seslileri Sayma Online Eğitimler sadece 49,99 TL. Hem de ikinci eğitim ücretsiz! Makroyu Kopyala 'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. Option Explicit Private Sub Command1_Click() Text2.Text = Seslisay(Text1.Text) End Sub Function Seslisay(Metin As String) As Integer Dim sayac, i As Integer Const Harfler = "aeıioöuü" For i = 1 To Len(Metin) If InStr(Harfler, LCase(Mid(Metin, i, 1))) 0 Then sayac = sayac + 1 End If Next i Seslisay = sayac End Function Bu makro ile ilgili sorun bildir Bu makro çalışmıyor. Kodlarda bir hata var. Diğer Hata ile ilgili görüşlerinizi aşağıdaki kutuya yazabilirsiniz. Hata bildir TÜM MAKROLAR Youtube Kanalımız Aşağıdaki makrolar işinize yarayabilir. Benzer Sonuçlar NoMakro Adı 1 textboxta seslileri sayma 2 userform kapanış örneği ***** yıldız 3 textboxta tarih toplama 4 textboxta tarih toplama çıkarma hatasız 5 textboxta metni iki yana yaslama ve tab özelliği 6 textboxta binlik ayıraclı toplama 7 textboxtaki yazının mesaj olarak bildirilmesi 8 a1:a50 adları textboxta arat listboxta listele 9 textboxta yazanı sayfada buldurma (tamamını yazmak şart) 10 textboxtan çıkarken msgbox 11 textboxtaki 1/1 excelde 1 12 textboxta binlik ayıracı 2 13 textboxta ondalıklı sayıları toplama 14 textboxta binlik ayıracı 1 15 hücre biçimi textboxta da aynı biçimde 16 textboxta rakamın başına 0 sıfır ekleme 17 listboxtaki sayıların toplamı textboxta 18 textboxlarda yazanları tek textboxta alt alta birleştirmek 19 hücredeki sayı kadar çıktı almak 20 textboxta girişte otomatik büyük harf 4 (türkçe karakter sorunu için)