Following number

Copper Contributor

Dear all,

 

I want a following number in a excel cell when re-opening the file. This worked with VBA code as shown below:

 

Private Sub Workbook_Open()
Range("D2").Value = Range("D2").Value + 1
End Sub
 
But now I want a text in front so "IO-E- & Number. I don't get this done. Has anyone a solution?
3 Replies

@Edwin1974 

Set the number format of cell D2 to the custom format

 

"IO-E-"0

 

You have to do this only once.

@Hans Vogelaar dank je voor je reactie maar het is met niet duidelijk. Bedoel op deze manier? Dan krijg ik een fout. Ook met & ertussen..

 

Private Sub Workbook_Open()
Range"IO-E-"("H3").Value = Range"IO-E-"("H3").Value + 1
End Sub

@Edwin1974 

Nee, mijn suggestie heeft niets met VBA te maken. Laat de code zoals die oorspronkelijk was.

 

Selecteer de cel in het werkblad.

Druk op Ctrl+1 om het dialoogvenster Cellen Opmaken te tonen.

Activeer het tabblad Getal van het dialoogvenster.

Selecteer Aangepast in de lijst Categorie.

Voer in het tekstvak Type in:

 

"IO-E-"0

 

Klik OK.

De waarde van de cel blijft een getal, zoals je kan zien in de formule-balk, maar de weergave in de cel is zoals je verzocht. Zie het schermbeeld hier onder (uit de Engelstalige versie van Excel).

S0952.png