Kod:
.Fields("MESLEGI") = Mid([ADSOYAD], InStr(1, [ADSOYAD], "(") + 1)
Kod:
.Fields("ADSOYAD") = Left([ADSOYAD], InStr(1, [ADSOYAD], "(") - 1)
.Fields("MESLEGI") = Mid([ADSOYAD], InStr(1, [ADSOYAD], "(") + 1)
.Fields("ADSOYAD") = Left([ADSOYAD], InStr(1, [ADSOYAD], "(") - 1)