Anonymní profil natech – Programujte.com

V VB jsem nikde nenašel žádnou možnost, jak zjistit, jaká data jsou v Excelu v buňce zadána, zda-li je to číslo, nebo text.

Snažil jsem se to vyřešit ošetřením chyby podle vzoru takto:

Dim c As Integer

        c = 1

        On Error GoTo fnnn

        i_temp = Cells(i_b, 1) & c

        On Error GoTo 0 'ruší ignoraci chyb

 

fnnn: 'zruší chybu

    Err.Number = 0

    i_temp = -1

    c = c + 1

    'navrat na radek, kde byla chyba

    Resume 

Při spuštění došlo k zaciklení.

Vůbec nechápu, proč je tam ta proměnná  c a co dělá.

VB není moje parketa, takže prosím o pomoc s vyřešením problému.