Ustadım her zaman olduğu gibi yine bir harikasınız. Çok ama çok teşekkür ediyorum. Bu üstün çalışmalarınızın devamında başarılar dilerim. Ama bir sorum daha olacak. Ben, vermiş olduğunuz bu kodları geçerli olduğunda kısmına yazsam olurmu acaba. Sonra PageDown tuşuna basılı tutup hepsini bir çırpıda güncelemiş olurum. Neyse o kadarını da ben deneyeyim. İlgi ve alakanıza çok teşekkür ediyorum... iyi çalışmalar..
Ben bu konuya biraz farklı bir bakış açısı getirdim.
Kod kullanmadan, Access'in varolan özelliklerinden faydalanarak Dışa veri aktarma ve İçe veri aktarma yöntemini kullandım.
Ayrıntılı olarak resimlerle açıkladım. Ayrıntılı anlatımı ekteki örnekte bulabilirsiniz...
Kolay gelsin...
Aşağıdaki kondu başka bir butonun tıklandığında olayına yaz, tüm alanlar güncellensin.
Kod:
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE KEFIL SET KEFIL.MESLEGI = Mid([ADSOYAD],InStr(1,[ADSOYAD],""("")+1), KEFIL.ADSOYAD = Left([ADSOYAD],InStr(1,[ADSOYAD],""("")-1); ", -1
DoCmd.SetWarnings True
ayrıca meslekten sonraki ) işaretini kaldıramadım,
İşin zor olan kısmını tabiki siz hallettiniz, bende işin kolay kısmını hallettim. Yani Meslekten sonraki ) karakterini ben kaldırdım. Ama tabiki bunu
Excel de hallettim
deki tabloma yapıştırdım. Bu konuda emeği geçen sayın sledgeap'a ve yine ilgi ve alaka gösteren sayın tdsharun'a çok teşekkür ediyorum. Hepinize çok müteşekkirim. Ve yine anlıyorum ki bu forumdaki yardıma ihtiyaç duyan üyelerin hiç biri SAYENİZDE sahipsiz değil.
Bir de böyle deneyelim bakalım neler olacak
Sayın Bilgisayarcı;
Çok güzel bir çalışma olmuş. İşlerimin yoğunluğundan son günlerde siteye fazla göz atamadım o yüzden biraz geç fark ettim özür. Ama çok güzel olmuş eklediğiniz örnek. Özelliklede formun üzerende kaç kayıtın olduğu ve güncellenen kayıtları gösteriyor olması çok hoşuma gitti. Emeğiniz ve paylaşımınız için çok teşekkür ederim ellerinize sağlık