İkinci veya üçüncü virgüle göre değer almak

[planlamaci]

A1 hücresinde bulunan (fişno,adsoyad,malzeme,diğer) şeklinde değerim var bu değerde ki ikinci virgülden başlayıp üçüncü virgüle kadar olan değeri almak isyoyorum böyle bir formül varmıdır.

Bir de hücre içinde kaç virgül var sayılabilir mi?

Teşekkür ederim.

 

[Emir Hüseyin Çoban]

. . .

Şu şekilde bir çalışma işinizi görür mü.

Ekran Görüntüsü (GİF):

. ..

 

[excelokyanus500]

Deneyin

Örnek:KelimeAl(A1;2;",")

Function KelimeAl(HÜCRENİZ, KAÇINCIKELİME, Ayraç) As String

Dim Hücreseç As String, Boşluk As String
Dim ElemanSay As Integer, i As Integer

Hücreseç = HÜCRENİZ

If Ayraç = Chr(32) Then Hücreseç = Application.Trim(Hücreseç)


If Right(Hücreseç, 1) <> Ayraç Then Hücreseç = Hücreseç & Ayraç


ElemanSay = 0
Boşluk = ""

For i = 1 To Len(Hücreseç)
If Mid(Hücreseç, i, 1) = Ayraç Then
ElemanSay = ElemanSay + 1
If ElemanSay = KAÇINCIKELİME Then
'
KelimeAl = Boşluk
Exit Function
Else
Boşluk = ""
End If
Else
Boşluk = Boşluk & Mid(Hücreseç, i, 1)
End If
Next i
KelimeAl = ""
End Function

 

[ÖmerBey]

Formülle alternatif:
2. virgülle 3. virgül arasını almak için formül:

=PARÇAAL(A1;BUL("#";YERİNEKOY(A1;",";"#";[COLOR="Red"]2[/COLOR]))+1;BUL("#";YERİNEKOY(A1;",";"#";[COLOR="red"]3[/COLOR]))-BUL("#";YERİNEKOY(A1;",";"#";[COLOR="red"]2[/COLOR]))-1)

Hücrede kaç adet virgül olduğunu saymak için formül:

=UZUNLUK(A1)-UZUNLUK(YERİNEKOY(A1;"[COLOR="red"],[/COLOR]";""))

İyi çalışmalar...