Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature currently requires accessing the site using the built-in Safari browser.
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
On Error GoTo errHandler
Dir1.Path = Drive1.Drive
Exit Sub
errHandler:
If Err.Number = 68 Then
MsgBox "Laufwerk nicht bereit!", vbOKOnly + vbCritical, App.Title
End If
End Sub