"Metni Sütunlara Dönüştür" ü kullanmadan otomatik dönüştürmek

[kasif2]

Selam;

Sisteme girdiğim yatırım harcamalarında verilerin arasına tire koyarak işliyorum.

yatırım kodu-yatırımadı-firma-fatura tarihi

bunu excel e aktardıktan sonra başka bir sütuna taşıyıp burada metni sütunlara dönüştür diyorum ve ayraç olarak "-" yi seçiyorum. Ama bunu yapmayı unutursam yanlış veriyi alırım diye çekiniyorum.

Acaba bunu manuel olarak "metni sütunlara dönüştür" dememe gerek kalmadan, otomatik yapacak bir formül var mıdır ?

 

[kasif2]

Örnek dosyayı ekledim..

 

[Zeki Gürsoy]

Public Function Text_To_Column( _
                    Source As Range, _
                    Ind As Byte)
                    
Text_To_Column = Split(Source, "-")(Ind - 1)
End Function

Ör. D1 için şunu uygulayın..

=Text_To_Column($A$1;1)

 

[kasif2]

dosyaya uyguladım ve harika oldu, çok teşekkürler