Bu çalışma kitabı, bir klasör yolunun veya dosyanın bilgisayarda gerçekten bulunup bulunmadığını hücreden sorgulamayı sağlayan iki kullanıcı tanımlı fonksiyon (KTF) içerir. Fonksiyonlar sonuç olarak TRUE ya da FALSE döndürür.
Dosyanın içeriği
Dosyada tek sayfa vardır. Sayfada A3:A6 aralığında örnek yollar yer alır:- A3: sayfanın başındaki açıklama metni (çalışma kitabının iki fonksiyon içerdiği belirtilir)
- A4: c:\windows32\ (klasör yolu örneği)
- A5: c:\windows\notepad.exe (dosya yolu örneği)
- A6: c:\windows32\notepad.exe (dosya yolu örneği)
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kod Module1 modülündedir ve iki fonksiyondan oluşur:- FileExists: verilen yoldaki dosyayı Dir fonksiyonuyla arar; dosya bulunursa TRUE, bulunamazsa FALSE döndürür.
- PathExists: GetAttr ile yolun özniteliğine bakar ve yolun bir klasör olup olmadığını denetler. Hata oluşursa (On Error Resume Next) sonuç FALSE kalır; klasör varsa TRUE döner.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Boş bir hücreye klasör yolunu sorgulamak için aşağıdaki formülü yazın:
=PathExists(A4) - Dosya sorgusu için başka bir hücrede şu formül kullanılır:
=FileExists(A5) - Kendi yollarınızı A sütunundaki hücrelere yazıp formülleri bu hücrelere yönlendirin; sonuç yol varsa TRUE, yoksa FALSE olur.
- Fonksiyonları başka bir çalışma kitabında kullanmak için Module1 içindeki kodu o kitabın bir modülüne kopyalayın ve dosyayı .xlsm olarak kaydedin.