Kleineletters omzetten naar hoofdletters

[kappel]

Ik wil in een kolom graag alleen hoofdletters zien, hoe doe ik dat?

 

[HSV]

Met de functie die je al schreef. :d

=hoofdletters(a1)

 

[kappel]

Ik snap het niet ik moet in een kolom steeds andere indeling aangeven, het is dan een a of b.
waar/hoe =hoofdletter(b1)

 

[Cobbe]

Als je dat wil bereiken bij invullen van de cel dien je gebruik te maken van VBA, vrees ik.
bv.: Target = Ucase(target)

 

[HSV]

Als je in A1 kleine letters typt, zet je de formule in B1.

De vraag is niet geheel duidelijk wat het doel is.

 

[kappel]

VBA gaat mij een stapje te ver. Het doel is alleen maar kosmetisch dus we houden het zo.
Hartelijk dank.

 

[gast0660]

Hoi kappel

VBA gaat mij een stapje te ver

Niet zo snel opgeven
Zet deze code eens in de vba editor onder het juiste werkblad
In mijn voorbeeld Kolom A

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then 'kolom A
 If Not Target.Text = UCase(Target.Text) Then
If Target.HasFormula = True Then
Target.Formula = "=UPPER(" & Mid(Target.Formula, 2) & ")"
Else
Target = UCase(Target.Text)
End If
End If
End If
 
End Sub

Dit is alles wat moet gebeuren
Hierbij een vbtje in bijlage
Ga maar eens testen in kolom A
Groet

 

[Ginger]

Via de functionaliteit "Data Validatie" kan je ook het eea afvangen. Zorg er daarmee voor dat de gebruiker gewoon geen kleine letters mag invoeren. Heb je ook geen problemen achteraf om ze om te moeten zetten.
(overigens kan dit alleen maar als je een enkele letter moet invoeren).