---

hej

Jeg har et excel ark med navn og adresser, skrevet i små
bogstaver, er der en hurtig måde at konvertere det hele til
store bogstaver ?


Jan Rasmussen

---

Hej Jan

Denne kodestump gør det i en ruf
Kør den, mens arket med navne og adresser er aktivt.

Sub SmåTilStore()
'Leo Heuser, 12-3-2003
Dim Cell As Range

For Each Cell In ActiveSheet.UsedRange.Cells
Cell.Value = UCase(Cell)
Next Cell

End Sub


--
Med venlig hilsen
Leo Heuser


"Jan Rasmussen" <janras@jubiimail.dk> skrev i en meddelelse
news:b4k8ie$4pv$1@sunsite.dk...
> hej
>
> Jeg har et excel ark med navn og adresser, skrevet i små
> bogstaver, er der en hurtig måde at konvertere det hele til
> store bogstaver ?
>
>
> Jan Rasmussen
>
>

---

"Leo Heuser" <leo.heuser@adslhome.dk> skrev i en meddelelse
news:b4ndh5$222ts6$1@ID-168125.news.dfncis.de...

> Denne kodestump gør det i en ruf
> Kør den, mens arket med navne og adresser er aktivt.
>
> Sub SmåTilStore()
> 'Leo Heuser, 12-3-2003
> Dim Cell As Range
>
> For Each Cell In ActiveSheet.UsedRange.Cells
> Cell.Value = UCase(Cell)
> Next Cell
>
> End Sub


Hvordan køres denne kode ?


Jan Rasmussen

---

1. Stå i det ark, det drejer sig om.
2. Gå til VBA editoren med <Alt><F11>
3. I projektvinduet (til venstre på skærmen)
klikker du på navnet for projektmappen.
4. Vælg menupunktet Insert > Module
5. Kopier koden over i modulet.
6. Gå tilbage til arket med <Alt><F11>
7. Vælg menupunktet Funktioner > Makro > Makroer
8. Find makroen "SmåTilStore" i oversigten.
9. Klik på den og klik på knappen "Afspil"

--
Med venlig hilsen
Leo Heuser


"Jan Rasmussen" <janras@jubiimail.dk> skrev i en meddelelse
news:b4pigg$oov$1@sunsite.dk...
>
>
> Hvordan køres denne kode ?
>
>
> Jan Rasmussen
>
>
>

---

"Leo Heuser" <leo.heuser@adslhome.dk> skrev i en meddelelse
news:b4piui$224fi8$1@ID-168125.news.dfncis.de...
> 1. Stå i det ark, det drejer sig om.
> 2. Gå til VBA editoren med <Alt><F11>
> 3. I projektvinduet (til venstre på skærmen)
> klikker du på navnet for projektmappen.
> 4. Vælg menupunktet Insert > Module
> 5. Kopier koden over i modulet.
> 6. Gå tilbage til arket med <Alt><F11>
> 7. Vælg menupunktet Funktioner > Makro > Makroer
> 8. Find makroen "SmåTilStore" i oversigten.
> 9. Klik på den og klik på knappen "Afspil"


TAK !

Det vare bare super hurtigt & nemt


Jan Rasmussen

---

Velbekomme, Jan.

"Jan Rasmussen" <janras@jubiimail.dk> skrev i en meddelelse
news:b4pjck$2a7$1@sunsite.dk...
>
> TAK !
>
> Det vare bare super hurtigt & nemt
>
>
> Jan Rasmussen
>
>