07/01/2020, 17:16
07/01/2020, 17:18
Aşağıdaki kodu modüle yaz
Sorguda,
Tablo ismi Tablo1, tablodaki alanın ismi Alan1
Alan1'de 117|50|89|185|81 şeklinde veri olacak.
Public Function SplitVeriBul(GVeri As String, GSayi) As Variant
On Error Resume Next
Dim var As Variant
var = Split(GVeri, "|", -1)
SplitVeriBul = var(GSayi)
End Function
Sorguda,
SELECT SplitVeriBul([Alan1],0) AS ilksayi, SplitVeriBul([Alan1],1) AS ikincisayi, SplitVeriBul([Alan1],2) AS ucuncucisayi FROM Tablo1;
Tablo ismi Tablo1, tablodaki alanın ismi Alan1
Alan1'de 117|50|89|185|81 şeklinde veri olacak.
07/01/2020, 17:25
teşekkürler sn.@berduş ve @ozanakkaya
bunu sorgu tasarımı yaparken
ifade1:Split(bütünmetin, "|")(0)
şeklinde yazmak için
ifade1:SplitVeriBul([Alan1],0)
şeklinde kullanabilirmiyiz
diye örneği indirmeden önce sormuştum meğer tam istediğim gibi imiş
bunu sorgu tasarımı yaparken
ifade1:Split(bütünmetin, "|")(0)
şeklinde yazmak için
ifade1:SplitVeriBul([Alan1],0)
şeklinde kullanabilirmiyiz
diye örneği indirmeden önce sormuştum meğer tam istediğim gibi imiş
07/01/2020, 17:31
@ozanakkaya hocamın izniyle bu da ayracını sizin belirleyebildiğiniz kod
Public Function SplitVeriBul(GVeri As String, GSayi, Optional Ayrac As String = "|") As Variant
On Error Resume Next
Dim var As Variant
Dim GAyrac As String
GAyrac = Ayrac
var = Split(GVeri, GAyrac, -1)
SplitVeriBul = var(GSayi)
Debug.Print SplitVeriBul
End Function
07/01/2020, 17:39
teşekkürler berduş
07/01/2020, 17:56
Neredeyse 15 yıldır Access de debelenip duruyorum ama hiç sorgu tasarımı kısmında modüldeki bir fonksiyonu kullanmamıştım
ne kadar pratikmiş şimdi kulağımı tersten gösterdiğim onca vakit kaybına hayıflanıyorum
başta ozanakkaya tüm ustalara teşekkürler
ne kadar pratikmiş şimdi kulağımı tersten gösterdiğim onca vakit kaybına hayıflanıyorum
başta ozanakkaya tüm ustalara teşekkürler