• DİKKAT

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

MAKRO İLE HÜCRE İÇİNDEKİ METİNLERİ AYRI SÜTÜNLARA AKTARMA

Katılım
22 Kasım 2019
Mesajlar
13
Excel Vers. ve Dili
2013
Merhaba
2019da da benzer bir soru sormuştum.
bir sütün da ayrı sütünlara aktarmak istediğim sayılar var bazılarının arasında boşluk var bazılarının arasında virgül ya da eksi işareti.
Bunları ayrı sütünlara aktarmak istiyorum.
50508081 -51702364
51709470 - 50516355
60689788 - 50508080
60688601-60679126-60688602-60676178
60680251 - 60676953
60688575
60693772
50501562, 60698400
50506150
60623537
50517103
50517510
50517510
50517509
50517509
50530217 - 50521790 - 50517519
50517520 - 50530218 - 50516204 - 50521792
Bu konuda yardım rica ediyorum.
 
1) Sütünlara ayırmak istediğin hücreleri seç.
2) ctrl+h'ye bas. Aranan değer kısmına tire işareti, yeni değer kısmına ise virgül işareti koy.
3) veri>metni sütunlara dönüştür>sınırlandırılmış yolunu takip et. Karşına çıkan ekranda sadece virgül seçili olsun. Sonra ileri dediğin zaman veri sütunlara ayrılmış olacaktır.
 
Merhaba formülle sonucu ektedir metinde boşuk,virgül, eksi işaretinin nerde oldugu önemli değil

1.Sayı için B1 Hücresine
Kod:
=EĞER(EĞERHATA(BUL("-";YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))-1;0)>0;PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");1;EĞERHATA(BUL("-";YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))-1;0));YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))

2.sayı için C1 Hücresine
Kod:
=PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(B2)+2;UZUNLUK(B2))
3.sayı için D1 Hücresine
Kod:
=EĞERHATA(PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(METİNBİRLEŞTİR("-";;B2;C2))+2;BUL("-";METİNBİRLEŞTİR("-";;B2;C2))-1);"")
4.sayı için E1 Hücresine
Kod:
=PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(METİNBİRLEŞTİR("-";;B2;C2;D2))+2;100)
213415
 
1) Sütünlara ayırmak istediğin hücreleri seç.
2) ctrl+h'ye bas. Aranan değer kısmına tire işareti, yeni değer kısmına ise virgül işareti koy.
3) veri>metni sütunlara dönüştür>sınırlandırılmış yolunu takip et. Karşına çıkan ekranda sadece virgül seçili olsun. Sonra ileri dediğin zaman veri sütunlara ayrılmış olacaktır.
teşekkür ederim
 
Merhaba formülle sonucu ektedir metinde boşuk,virgül, eksi işaretinin nerde oldugu önemli değil

1.Sayı için B1 Hücresine
Kod:
=EĞER(EĞERHATA(BUL("-";YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))-1;0)>0;PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");1;EĞERHATA(BUL("-";YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))-1;0));YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-"))

2.sayı için C1 Hücresine
Kod:
=PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(B2)+2;UZUNLUK(B2))
3.sayı için D1 Hücresine
Kod:
=EĞERHATA(PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(METİNBİRLEŞTİR("-";;B2;C2))+2;BUL("-";METİNBİRLEŞTİR("-";;B2;C2))-1);"")
4.sayı için E1 Hücresine
Kod:
=PARÇAAL(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(YERİNEKOY(A2;" ";";");"-";";");",";";");";;";" ";1);" ;";" ");";;;";" ");";";" ");" ";"-");UZUNLUK(METİNBİRLEŞTİR("-";;B2;C2;D2))+2;100)
Ekli dosyayı görüntüle 213415
tşk ederim ilginize
 
Geri
Üst