Soru Hücre içinde Find

Katılım
24 Kasım 2007
Mesajlar
769
Excel Vers. ve Dili
Office 365 - Türkçe
Altın Üyelik Bitiş Tarihi
30-01-2024
Merhaba hücrenin içindeki "-" simgesinin hücrede kaçıncı karakter olduğunu bulmaya çalışıyorum
Normal formül ile aşağıdaki gibi sonuç alıyorum. Fakat bunu makro ile yapmak istediğimde hata alıyorum

" 9501 - TLS"
=BUL("-";B2;1) --> Formul ile sonuç 8
Find("-", Sheets("x").Range("B2"), 1) --> Makro ile hata alıyorum
 

Ekli dosyalar

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,247
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Instr komutunu araştırınız.
 
Katılım
14 Mayıs 2011
Mesajlar
33
Excel Vers. ve Dili
Excel 2007 Türkçe
ActiveCell.FormulaR1C1 = "=FIND(""-"",RC[-1],1)"

a2 hücresine veriyi girip makroyu çalıştırınız..
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,793
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Merhaba,
Alternatif olsun, çalışmanıza uyarlayabilirsiniz.
Kod:
Sub Goster()
    Dim i&, bol As Variant, al$
    For i = 2 To Cells(Rows.Count, 2).End(3).Row
        al = Cells(i, 2).Value
        If InStr(al, "-") Then
            bol = Split(al, "-")
            Cells(i, 3).Value = InStr(al, "-")
            Cells(i, 4).Value = bol(0)
            Cells(i, 5).Value = bol(1)
        Else
            Cells(i, 4).Value = ""
        End If
    Next i
End Sub
iyi çalışmalar
 
Katılım
24 Kasım 2007
Mesajlar
769
Excel Vers. ve Dili
Office 365 - Türkçe
Altın Üyelik Bitiş Tarihi
30-01-2024
teşekkür ederim
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,793
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Rica ederim
 
Üst