Code: Selecteer alles
dim maintYear() as Integer
...
...Redim Preserve maintyear(int)...
...
If intNumber > UBound(maintYear) Or intNumber < LBound(maintYear) then Exit Sub
De code op de ... leest een bestand, en stopt de inhoud daarvan in die array. Als het bestand leeg is, heb ik hetvolgende probleem: Subscript out of range als ik UBound(maintYear) opvraag. Wat kan ik hier eventueel aan doen?