Jak z poziomu aplikacji otworzyć określony folder na dysku? Sposobów jest kilka, jeden z nich to wykorzystanie funkcji Shell.
| Public Sub OtworzFolder() Dim a Dim JSciezka As String JSciezka = “C:\CWICZENIAFORA” a = Shell(“explorer.exe ” & JSciezka, vbNormalFocus) End Sub |
Po uruchomieniu kodu w aplikacji Access – w oddzielnym oknie Windows otwiera się folder zdefiniowany w zmiennej JSciezka, a kod VBA przechodzi do kolejnego kroku.
