• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

cijfer naar letter

Status
Niet open voor verdere reacties.

Frith

Gebruiker
Lid geworden
26 okt 2000
Berichten
219
Ik wil een formule in vba doortrekken tot de laatste gebruikte rij en kolom.
De rij is geen probleem, dat doe ik met :
e = ActiveSheet.UsedRange.Rows.Count
De waardie die dat oplevert kan bijvoorbeeld gebruiken in:
Range("F" & e).Clear

Maar als ik iets wil met kolommen, gaat dit niet op. namelijk:
y = ActiveSheet.UsedRange.Columns.Count

levert een getal op, bijvoorbeeld kolom 5... en niet kolom E

Dit heb ik wel nodig om een range te kunnen aanduiden. Hoe kan ik nu die 5 omzetten naar de letter 5? Zat zelfs aan iets te denken als char(..+y) ofzo, maar weet niet of dat bestaat in vba. Kan op forum en google hier niets over vinden.

Samengevat: hoe zet ik het getal 2 over in B, of 5 in E etc.... ( evt in vba)

Alvast bedankt!
 
Range("A1") is hetzelfde als Cells(1, 1)

Range("B1") is hetzelfde als Cells(1, 2)

Range("A2") is hetzelfde als Cells(2, 1)

Gotcha?
 
Bedankt voor je snelle antwoord wigi.
Ik had al wat lopen stoeien met cells, en nu ook na jouw antwoord weer.

Immiddels met jouw aanwijzing gelukt. Heb er
Range("B3:B" & e + 1).Select
Selection.AutoFill Destination:=Range(Cells(3, 2), Cells(e + 1, x)), Type:=xlFillDefault

van gemaakt en werkt perfect!

zat eerst nog met Range("B3:" & Cells(e+1,x)) maar dat werkt niet... Dom dat ik hier niet eerder aan gedacht had.... Zat echt in gedachten vast aan die B3...

Nogmaals bedankt!
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan