CurrentProject czyli bieżący projekt

Application.CurrentProject to właściwość obiektu Application związana z bieżącym projektem aplikacji Access. 

Ma swoje właściwości i metody, niektóre bardzo często stosowane. 

• • • Connection
      aktywne połączenie (np. przy otwieraniu obiektu Recordset)
    • FullName
      pełna nazwa, razem z ścieżką dostępową
    • Name
      nazwa
    • Path
      adres folderu, w którym znajduje się projekt

W praktyce – używam właściwie tylko tych wymienionych, pozostałe są chyba rzadziej stosowane, choć pewnie też może być warto się im przyjrzeć. 

W ramach przykładu – funkcja VBA, którą bardzo często stosuję w swoich projektach, wykorzystując ją do odczytywania połączonych plików (np.zdjęć) lub miejsca, gdzie generowane są np.raporty. Pozwala to na przenoszenie aplikacji i połączonych katalogów w inne miejsca. 

Public Function AdresSG() ’Adres folderu, w którym znajduje się aktualna aplikacja Access AdresSG = Application.CurrentProject.Path ’ lub alternatywnie w wersji skróconej: AdresSG = CurrentProject.Path End Function

Ponieważ obiekt Application jest obiektem domyślnym VBA, można pominąć to słowo i stosować wersję skróconą. Stosuję. 

---

A tu możesz mi postawić kawę: 

buycoffee.to/marzatela