Opgelost Integer naar string en tel

[Bram65]

Beste
Ik heb een integer kolomnummer, bv 12.
Deze converteer ik naar letter met

Str = Split(shtDKM.Columns(kol).Address, "$")(1)

Nu wil ik het aantal gebruikte regels van die kolom hebben maar kom er niet uit.
Weet iemand hoe dit op te vragen?
Ik krijg een foutmelding dat type niet overeen komt.
RijAantProcTijd = shtDKM.Cells(Cells.Rows.Count, Str).End(xlUp).Row


EDIT:
Ik heb een beredeneringsfout gemaakt en opgelost, nu klopt het wel
gr Bram

 

[AHulpje]

Waarom zou je van een kolomnummer een letter willen maken?

RijAantProcTijd = shtDKM.Cells(Cells.Rows.Count, kol).End(xlUp).Row

 

[HSV]

shtDKM.Cells(Cells.Rows.Count, kol)

inkorten naar:

shtDKM.Cells(Rows.Count, kol)