MsgBox strNames()
ale
MsgBox Item
Alebo
For i = LBound(strNames) To UBound(strNames)
MsgBox strNames(i)
Next icitovat
Zaslal/a Merlin99 26.7.2020 0:01
Zdravim potrebuji radu jak z provoznit makro viz priloha aby fungovalo? Dokaze nekdo poradit a upravit?
Děkuji
Sub Pokus()
Dim strNames(1 To 4) As String
strNames(1) = "Shelly"
strNames(2) = "Steve"
strNames(3) = "Neema"
strNames(4) = "MERLIN"
For Each Item In strNames
MsgBox strNames()
Next Item
End Sub
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.