• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Metin içindeki istenilen veriyi alma

  • Konbuyu başlatan Konbuyu başlatan f_alkan
  • Başlangıç tarihi Başlangıç tarihi
Deneyiniz.

Kod:
=PARÇAAL(D2;BUL("/";D2)+2;BUL("/";YERİNEKOY(D2;"/";"";1))-BUL("/";D2)-2)
 
Merhaba
Makro ile
Kod:
Sub Metinayır()
    Dim i As Long
    Application.ScreenUpdating = False
    For i = 2 To Cells(Rows.Count, "D").End(3).Row
        Cells(i, "E") = Trim(Split(Cells(i, "D"), "/")(1))
    Next i
    Application.ScreenUpdating = True
End Sub
 
Geri
Üst