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.
Dim s As String
Dim Wochentag () As String
Dim n As Interger
Private Sub Beispiel ()
s = "Montag.Dienstag.Mittwoch.Donnerstag.Freitag.Samstag.Sonntag"
Wochentag() = Split(s, ".", -1, vbTextCompare)
For n = 0 To 6
MsgBox "Heute ist: " & Wochentag(n)
Next n
End Sub