verplicht hoofdletters

[stefano]

Via een macro maak ik gebruikers mogelijk namen toe te voegen aan een lijst. Alleen wil ik dat de naam altijd in hoofdletters verschijnt. Kan ik excel 'forceren' zodat bij ingave van kleine letters het resultaat toch in drukletters verschijnt ?

 

[Wigi]

Gebruik je een inputbox of iets dergelijks? Hoe gaat het toevoegen van namen in zijn werk?

 

[jheesterbeek]

met de formule =hoofdletters(verwijzing) moet dat lukken
Deze kun je ook in je macro toepassen mbv lcase en ucase

 

[stefano]

oei,

ik plaats mijn code hier even :

Range("AC7").Select
Selection.Insert Shift:=xlDown

Range("AC7").Select
ActiveCell.FormulaR1C1 = InputBox("Geef de naam van de bloem in ", "Aanmaak bloemsoort grote silo's")
Application.Goto Reference:="R1C1"

Hoe doe ik het dan best ?

 

[Wigi]

Hi Stefano

Range("AC7").FormulaR1C1 = UCase(InputBox("Geef de naam van de bloem in ", "Aanmaak bloemsoort grote silo's"))

in plaats van regels 3 en 4 uit je code.

Wigi