Gå til hovedindhold

Hvordan konverteres / ændres tekst hurtigt til store bogstaver i Microsoft Excel?

Denne artikel vil fortælle om nogle tips om, hvordan du nemt ændrer tekststrenge til alle store bogstaver i Microsoft Excel.

Hvis du antager, at du skal ændre tekststrenge i A1:A5 til store bogstaver, kan du se følgende skærmbilleder:


pil blå højre boble Skift tekststrenge til store bogstaver i Excel med OPPER-funktionen

Ved at bruge Microsoft Excels øvre funktion er det nemt at ændre tekststrenge til store bogstaver i én celle.

Indtast = UPPER (A1) i celle C1, og tryk på Enter-tasten. Derefter kopieres indholdet af "Skift sag" i celle A1 og ændres til "SKIFT CASE" i celle C1. Se skærmbillede:

Vælg celle C1, og du kan kopiere formlen til andre celler ved at trække i nederste højre hjørne og falde ned til andre celler.


pil blå højre boble Skift tekststrenge til store bogstaver i Excel med VBA

Der er en VBA-kode, der kan hjælpe dig med at ændre tekststrengen til store bogstaver i Excel.

1. Trykke Alt + F11 for at vise Microsoft Visual Basic til applikationer vindue.

2. Klik på i vinduet indsatte > Moduler for at vise et nyt modulvindue, kopier derefter følgende VBA-kode til modulvinduet.

VBA: Skift tekststreng til store bogstaver i Excel.

Sub UCase()
'Upadateby20140701
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = VBA.UCase(Rng.Value)
Next
End Sub

3. Klik derefter på Kør knappen, og en dialogboks dukker op, hvor du kan vælge et område for at ændre tekststrengen til store bogstaver. Se skærmbillede:

4. Når du har valgt, skal du klikke på OK. Al tekststreng i markeringen ændres til store bogstaver.


pil blå højre boble Skift tekststrenge til store bogstaver i Excel med Kutools til Excel

Kutools til Excel's Skift sag værktøj kan hjælpe dig med alle tekststrenge eller bogstaver til store bogstaver i en række Microsoft Excel.

Kutools til Excel indeholder mere end 100 praktiske Excel-værktøjer. Gratis at prøve uden begrænsning på 30 dage. Få det nu.

Trin 1: Vælg det område, hvor du vil ændre tekststrenge til store bogstaver.

Trin 2: Klik på Kutools > Tekstværktøjer > Skift sag .... Se skærmbillede:

Trin 3: I Skift sag dialogboksen, skal du kontrollere STORE BOGSTAVER valgmulighed og klik OK or Indløs knap. Se skærmbillede:

Så vil du se, at alle tekststrenge i markeringen ændres til store bogstaver. Se skærmbillede:

Kutools til Excel's Skift sag værktøj kan hurtigt ændre tekstsag til ØVERSTE, NEDRE, RIGTIGE, Sagssag og bogstaver. Klik for at vide mere ...


Relative artikler:

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!

 

Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The VBA was freaking awesome thanks a lot :lol: .
This comment was minimized by the moderator on the site
This is one the ways that i know it could be done with VBA Sub UPPER () Dim Addrr As Atring Addr = Intersect(ActiveSheet.UsedRange, Selection).Address Range(Addr) = _ Evaluate("IF(LEN(" & Addr & "),UPPER(" & Addr & "),"""")") End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations