Tamam üstad sağol.Artık şu aclink olayı kullanmak mantıklı geldi bana impot heralde daha fazla şişiryor bencede.
Dediğim excelden hiç vt nına almadan kopyalı excelden bakalım işlem yapabilecekmiyiz.
Sonra uğraşırım.inşAllah sizde yaparsınız.

Mid(yol, InStrRev(yol, ".") yerine  fso.GetExtensionName(yol) yazarsanız uzantıyı verir.
Tabii nokta olarak vermeyeceği için önüne  "." & fso.GetExtensionName(yol) gibi yada önceki kod satırına nokta ekleyebilirsiniz.
GetExtensionName bu özellik uzantı bulmada kullanılır.

(09/02/2020, 00:53)feraz yazdı:  fso.GetExtensionName(yol) yazarsanız uzantıyı verir.

Teşekkürler)

Rica ederim Kolları sıvadım bakalım şu Excel ile yapma olayına ne olacak )

Berduş üstad biraz uğraşırken boş işlerle uğraştığımın sonunda farkına vardım en doğrusu acLink ile yapıp Access kapanışındada menüden sıkıştırma olayını aktif etmek.

Kolay gelsin.Bu konuyuba bayağı bir sayfa ile tamamladık şükür

teşekkürler ellerinize sağlık mükemmel bir örnek olmuş
31.mesajdaki örnek son hali değil mi