ilk noktaya kadar

[ercanbrisa]

xls dosyası içerisinde bir kolon içerisinde alt alta satırlarda

erc.01.05
erc.02.05
mrttrn.01
mrttrn.04.05
se.01.01.05
se

Gibi bilgiler var.
Yapmak istediğim bu değerleri başka bir hücreye sol baitan itibaren ilk noktay kadar olan kısımlarını aktarmak. Bunu VB veya excel fonksiyonları ile nasıl yapabilirim.


erc.01.05 > erc
erc.02.05 > erc
mrttrn.01 > mrttrn
mrttrn.04.05 > mrttrn
se.01.01.05 > se
se > se

yardımcı olacak arkadaşlara şimdiden teşekkürler

 

[Zeki Gürsoy]

Verilerin "A" sütunda yer aldığını varsayalım. "B" sütununa ayrılan kısımlar yazılacaktır.

Sub ayir()
For i = 1 To 100
    Cells(i, 2) = Left$(Cells(i, 1), InStr(1, Cells(i, 1), ".") - 1)
Next
End Sub

 

[ceyrek]

=soldan(a1;bul(".";a1)-1)