nummering in cell met een letter ervoor

[sacredfour]

nummer = Sheets("vaste gegevens").Range("B1").FormulaR1C1
Sheets("vaste gegevens").Range("B1").FormulaR1C1 = nummer + 1
Sheets("kostenrekening").Range("F3").Value = Sheets("vaste gegevens").Range("B1").Value

Ik ben met bezig een klein programmaatje te schrijven voor de boekhouding van mijn vereniging.
Voor de doornummering gebruik ik de bovenstaande code. Ik zou echter graag een Letter willen zien voor het nummer bv C25 in plaats van alleen 25. Hoe doe ik dat?
alvast bedankt voor het antwoord!
( ben nog een beginner met VBA)

 

[edmoor]

Bijvoorbeeld zo:

Letter = "C"
Sheets("vaste gegevens").Range("B1").FormulaR1C1 = Letter & (nummer + 1)

 

[emields]

om te beginnen door een voorbeeld bestand te plaatsen.

 

[Jack Nouws]

bijv. met aangepaste cel opmaak

 

[sacredfour]

Sheets("vaste gegevens").Range("B1").FormulaR1C1 = letter & (nummer + 1)

Ik krijg een foutmelding, fout 13, typen komen niet met elkaar overeen.

 

[emields]

Veel mogelijkheden om uit te kiezen

 

[edmoor]

Sheets("vaste gegevens").Range("B1").FormulaR1C1 = letter & (nummer + 1)

Ik krijg een foutmelding, fout 13, typen komen niet met elkaar overeen.

Zie #3.

 

[sacredfour]

Hoe voer ik die macro uit zonder Msgbox?

 

[sacredfour]

Het is gelukt!!
bedankt emields en edmoor

 

[emields]

Bedankt voor de reactie.
Vergeet niet uw vraag als opgelost te zetten in uw eerste post.