Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim sTemp As String
Dim arData() As String
Dim i As Long
sTemp = "Data1xxx xxx ; Data2 xxxx xxx ; Data3 xxxx xxx ;Data4xxxx xx xxx;"
arData = Split(sTemp, ";")
For i = LBound(arData) To UBound(arData)
Call Combo1.AddItem(arData(i))
Next