Uzun bir formule kisa yol yapmak

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,616
Excel Vers. ve Dili
Microsoft 365 Tr-64
Kullanıcı Tanımlı Fonksiyon yapabilirsiniz.
 
Katılım
22 Ocak 2013
Mesajlar
35
Excel Vers. ve Dili
2019 turkce
Kullanıcı Tanımlı Fonksiyon yapabilirsiniz.
Ornegin asagidaki formulu nasil yapabilirim


=EĞERHATA(EĞER(ESAYIYSA(A2);TARİH(YIL(A2);GÜN(A2);AY(A2));TARİH(SAĞDAN(A2;4);SOLDAN(A2;BUL("/";A2)-1);SAĞDAN(SOLDAN(A2;UZUNLUK(A2)-5);UZUNLUK(SOLDAN(A2;UZUNLUK(A2)-5))-BUL("/";SOLDAN(A2;UZUNLUK(A2)-5)))));A2)
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,616
Excel Vers. ve Dili
Microsoft 365 Tr-64
Gerçek ya da olması gereken sorunuz aşağıdakilerden hangisi?
  • Kullanıcı Tanımlı Fonksiyon nasıl yapılır? Nasıl çaluştırılır?
  • KTF yaparken bu formülü VBA kodlarıyla nasıl yazarım?
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Aşağıdaki KTF ile olabilir. Kodları bir modüle kopyalayın:

PHP:
Function tarihle(hucre As Range, Optional ayrac As String = "/")

If IsDate(hucre) Then
    tarihle = DateSerial(Year(hucre), Day(hucre), Month(hucre))
ElseIf hucre <> "" Then
    veri = Split(Trim(hucre), ayrac)
    tarihle = DateSerial(veri(2), veri(0), veri(1))
Else
    tarihle = "HATA"
End If

End Function
Hücredeki kullanımı:

=tarihle(A1)

Eğer /'tan başka bir ayraç varsa bunu belirtebilirsiniz:

=tarihle(A1;".")

gibi
 
Katılım
22 Ocak 2013
Mesajlar
35
Excel Vers. ve Dili
2019 turkce
Gerçek ya da olması gereken sorunuz aşağıdakilerden hangisi?
  • Kullanıcı Tanımlı Fonksiyon nasıl yapılır? Nasıl çaluştırılır?
  • KTF yaparken bu formülü VBA kodlarıyla nasıl yazarım?
Merhaba,
sorun aşağıdaki gibidir.
Kullanıcı Tanımlı Fonksiyon nasıl yapılır? Nasıl çaluştırılır?
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Üst