Beginletter van woord als hoofdletter in excel 2007

[janp]

Ik wil woorden in kolommen in excel(2007) automatisch met een hoofletter laten beginnen. Na lang zoeken op dit forum kwam ik een code tegen ergens uit 2009. Alleen weet ik niet hoe en waar ik deze code moet plaatsen. Kan iemand deze mij, 72-jarige, hierover uitleg geven? Of een andere oplossing is ook welkom

De code die ik vond:
Sub BeginHoofdletter ()
For Each cl In Blad1.Cells.SpecialCells(2)
cl.Value = StrConv(cl, vbProperCase)
Next
End Sub

Groetjes Jan

 

[Cobbe]

Ik heb een filmpje gemaakt hoe je dat doet:

http://www.mijnbestand.nl/Bestand-8DFDMNWYLV78.wmv

 

[oeldere]

@Jan P.

Kijk eens of dit is wat je bedoelt.

Dan kunnen we daarna proberen uit te leggen hoe het werkt.

Ik heb de code die je gevonden hebt achter een knop geplaatst.

Door op de knop te drukken wordt de code geactiveerd en verschijnen de namen in hoofdletters.

 

[janp]

Hallo Oeldere en Cobbe
Alle twee fantastische oplossingen.
Het filmpje is prima en als ik dan van Oeldere uitleg krijg hoe het werkt, krijg ik er met filmpje en uitleg inzicht in.
Ben bezig een fietstocht te plannen en wil de routeplaatsen in excel zetten, en dan zou het makkelijk zijn met het intikken dat ik dan in een keer alle plaatsen van een hoofdletter kan voorzien.
Alvast hartelijk bedankt, prettig weekend en ik zet de vraag nu alvast als opgelost.

Groetjes Jan :thumb:


zie ook mijn site www.mijnfietstochten.nl