CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede serverfriend Nybegynder
09. november 2006 - 20:48 Der er 6 kommentarer og
1 løsning

Laver store bogstaver til små

Jeg har et excel med 5 kolonner

A0A 1A0    | AQUAFORTE | NEWFOUNDLAND AND LABRADOR    | NL |709 |

Det jeg gerne vil have er:

- Kolonne B skal være med små bogstaver pånær det første
- Kolonne C skal være magen til

Så det ser sådan her ud:

A0A 1A0    | Aquaforte | Newfoundland And Labrador    | NL |709 |

Det vil være super dejligt hvis der er en der kan løse det.

Det skal være hele arket. Der er mange rækker.

Jeg vil gerne have en programkode hvis nogen kan finde ud af det :-)
Avatar billede excelent Ekspert
09. november 2006 - 20:59 #1
Sub Konv()
Dim t, r
r = Cells(65500, 2).End(xlUp).Row
For t = 1 To r
Cells(t, 2) = Application.WorksheetFunction.Proper(Cells(t, 2))
Cells(t, 3) = Application.WorksheetFunction.Proper(Cells(t, 3))
Next
End Sub
Avatar billede bak Forsker
09. november 2006 - 21:09 #2
eller noget hurtigere men ikke bedre

Sub myConv()
Dim rng As Range
Set rng = Range("B1:C" & Range("B65536").End(xlUp).Row)
rng.Value = Application.Proper(rng)
End Sub
Avatar billede excelent Ekspert
09. november 2006 - 21:12 #3
hvis det kun er forbogstav i første ord som må være med stort

Sub xKonv()
Dim t, r
r = Cells(65500, 2).End(xlUp).Row
For t = 1 To r
Cells(t, 2) = LCase(Cells(t, 2))
Cells(t, 2) = Application.WorksheetFunction.Proper(Left(Cells(t, 2), 1)) & Right(Cells(t, 2), Len(Cells(t, 2)) - 1)
Cells(t, 3) = LCase(Cells(t, 3))
Cells(t, 3) = Application.WorksheetFunction.Proper(Left(Cells(t, 3), 1)) & Right(Cells(t, 3), Len(Cells(t, 3)) - 1)
Next
End Sub
Avatar billede serverfriend Nybegynder
09. november 2006 - 21:23 #4
Smid et svar begge to :-)
Avatar billede bak Forsker
09. november 2006 - 21:24 #5
nej tak, point tilhører excelent. Han var først med det rigtige svar :-)
Avatar billede excelent Ekspert
09. november 2006 - 21:26 #6
ok :-)
Avatar billede serverfriend Nybegynder
09. november 2006 - 22:34 #7
Tak for hjælpen :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Identificér og hent del af tekststreng Af TheLibrarian i Excel 1 I går 16:49 I går 21:00
Ændre nuller til ovenstående tekst Af boro23 i Excel 4 20/11/202410:44 20/11/202412:08
HVIS med datoer Af HHA i Excel 6 20/11/202408:31 20/11/202412:51
Numerisk liste Af AND i Excel 8 19/11/202414:05 19/11/202423:31
Ændre nuller til ovenstående tal Af boro23 i Excel 3 19/11/202409:39 19/11/202411:51
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 20:49 pop up black friday Af Malm i Virus
I går 18:31 Hvor finder jeg en netværksdriver? Af jcr18 i Wifi
I går 16:49 Identificér og hent del af tekststreng Af TheLibrarian i Excel
I går 16:30 Smart vægt til fitness tracking Af Henrik i Fitness & Smartwatches
I går 08:08 touchpad virker ikke Af Malm i PC
White papers
Flere white papers »


Premium
Teaser billede
Vil købe tele-løsninger til det offentlige for 370 millioner kroner
Læs mere »
Efterspørgslen på AI-regnekraft er enorm - og det smitter af på priserne: "Vi kan sælge næsten alt, hvad vi får ind"
Nyt værtøj fra Microsoft: Snart kan du reparere nedbrudte Windows-enheder på distancen
Politiet skriver kontrakt på 75 millioner kroner med dansk it-firma: Medarbejdere skal flytte ind hos politiet
Se alle »
Computerworld
Teaser billede
Microsofts nye pc er ekstrem billig – men kan blive ekstrem sikker og fleksibel
Læs mere »
Test: Prøv kun disse B&O-hovedtelefoner, hvis du har råd
Kæmpe datalæk på hospital: 750.000 patienters fortrolige data lækket
Test: Audi Q6 er en super fed SUV - men gør dig selv en tjeneste og kast flere penge efter den
Se alle »
CIO
Teaser billede
Konsulenthus vil rulle Microsoft 365 Copilot ud til 200.000 ansatte
Læs mere »
Kæmpe-opgave for Danske Bank har banet vej for fuldautomatiseret migrering til cloud: Nu udbredes metoden i hele AWS
Microsofts store årlige event: De tre vigtigste nøglebudskaber fra Satya Nadella om Microsofts fremtid
Stor sag mod Microsoft kan være på vej: Beskyldes for at låse Azure-kunder fast med ulovlige metoder
Se alle »
Job & Karriere
Teaser billede
Microsoft klar med ny direktion for den danske forretning: Her er de nye direktører
Læs mere »
Efter skelsættende møde med sportscoach: Stor dansk it-arbejdsplads indfører fredags-fri og isbade i arbejdstiden
Linus Torvalds giver russiske Linux-udviklere sparket: Vil ikke have noget med dem at gøre
De ansatte elsker det, tech-cheferne hader det – og HP kaster milliarder efter det
Se alle »
White paper
Teaser billede
SMB og cybertrusler: Brug sikkerhedsressourcerne optimalt
Læs mere »
MDR: Transparent sikkerhed og overvågning i realtid
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
SAP: Skab værdi og minimér omkostninger med effektiv dokumenthåndtering
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »