Mega Code Archive

 

Categories / VisualBasic Script / Access

 

Use With statement with CurrentProject

Sub CurrentProjectObject()     With CurrentProject         Debug.Print .Name         Debug.Print .Path     End With End Sub