MyArray Tot hoever gevuld

[HaBro]

Hallo

Er wordt een array gevuld met variabele vanuit de serieele poort
en dit is verschillend
de ene keer 10 en de andere keer 15

Nu was mijn vraag
kan je zichtbaar maken hoeveel een array is gevuld

Bijv.
Myarray is met 11 byte gevuld

For Celteller = 1 To Myarray met 8 bytegevuld
Sheets("Test").Cells(2, Celteller).Value = MyArray(Celteller)
Next

om tot deze formule te komen

Hans

 

[Warme bakkertje]

Option Base 1
Sub tst()
myarray = Array(10, 20, 30)
For celteller = 1 To UBound(myarray)
Sheets("Test").Cells(2, celteller).Value = myarray(celteller)
Next
End Sub

 

[HaBro]

Hoi Warme Bakkertje

Bedankt voor de snelle reaktie
ik ga het meteen proberen

Hans