CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede henrik4223 Nybegynder
18. oktober 2006 - 15:16 Der er 9 kommentarer og
1 løsning

Hvordan fjerner man automatisk mellemrum?

Hvordan laver jeg en makro med "trim" kommandoen, der sletter alle mellemrum foran og efter en tekst i en celle (og ikke imellem teksten) i et helt ark?
Avatar billede supertekst Ekspert
18. oktober 2006 - 15:21 #1
Ltrim og Rtrim

Left    Right
Avatar billede henrik4223 Nybegynder
18. oktober 2006 - 15:28 #2
Men hvordan skal en "hel" macro se ud i VB?
Avatar billede supertekst Ekspert
18. oktober 2006 - 15:44 #3
Har du skrevet noget kode, hvor xTrim skal anvendes - så prøv at vise denne.
Avatar billede kabbak Professor
18. oktober 2006 - 16:40 #4
Sub FjernBlanke()
    Range("A1").CurrentRegion.Select
    For Each c In Selection
        c.Value = Application.WorksheetFunction.Trim(c.Value)
    Next
End Sub
Avatar billede henrik4223 Nybegynder
20. oktober 2006 - 11:12 #5
Det virker super - Hvordan får man den til at gøre det for hele arket?
Avatar billede kabbak Professor
20. oktober 2006 - 11:58 #6
Det skulle den gøre automatisk nu

Sub FjernBlanke()
    Range(Range("A1"), ActiveCell.SpecialCells(xlLastCell)).Select
    For Each c In Selection
        c.Value = Application.WorksheetFunction.Trim(c.Value)
    Next
End Sub
Avatar billede henrik4223 Nybegynder
20. oktober 2006 - 12:27 #7
Super - tak
Avatar billede bak Forsker
20. oktober 2006 - 12:30 #8
Kabbak -> hvis man vil være fri for loopet så kan man gøre sådan:

Sub test()
Dim rng As Range
Set rng = Range(Range("A1"), ActiveCell.SpecialCells(xlLastCell))

rng.Value = Application.Trim(rng.Value)
End Sub
Avatar billede kabbak Professor
20. oktober 2006 - 12:35 #9
Tak Bak, jeg var ikke sikker på at den virkede uden loop.
Avatar billede bak Forsker
20. oktober 2006 - 12:37 #10
Heller ikke her.
For hvis man skriver
ng.Value = Application.Worksheetfunction.Trim(rng.Value)
virker det ikke :-)
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
Stort udvalg af Excel kurser til alle niveauer og jobfunktioner
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Filnavn forslag ved brug af skabelon Af hbl i Excel 0 I dag 17:27 -
Fjern første karakter hvis den er / Af TheLibrarian i Excel 4 03/04/202511:23 03/04/202514:16
Sammentælling Af karina1971 i Excel 7 01/04/202511:01 03/04/202513:45
sammentælle - og + værdier hver deres celle. Af fajens i Excel 1 31/03/202512:37 31/03/202512:54
Hjælp til bemandingsskema Af Rikke i Excel 2 26/03/202513:24 26/03/202518:00
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 dag 21:01 Sikring til subwoofer Af Hegonidk i Andet hardware
I dag 17:27 Filnavn forslag ved brug af skabelon Af hbl i Excel
I dag 15:55 Win11 på uegnet pc Af kimeast i Windows
I dag 15:49 Udtræk af nyeste post Af uac i PHP
I dag 14:45 LibreOffice regneark Af Btimmer i Office & Kontorpakker
White papers
Flere white papers »


Premium
Teaser billede
Hidtil hemmeligholdt rapport viser nu Nokias frygt: Her er, hvad ledelsen tænkte, kort efter Steve Jobs lancerede iPhone
Læs mere »
De vil med Teknologisk Arbejderkooperativ forsøge at forandre it-danmark nedefra: "Tech-giganterne har infiltreret vores samfund"
Minister bakker op om dansk kommunes skifte væk fra amerikansk cloud: Interessant tiltag
Oracle har et særligt våben til at få foden indenfor hos SAP-kunder
Se alle »
Computerworld
Teaser billede
Guide: Er din Google-konto hacket? Sådan finder du svaret
Læs mere »
Elon Musk sælger sit sociale medie X
Toldchok i USA: Apple og Amazon i fald – dansk it kan blive ramt
Prøvekørt: 'Årets bil' er kvadratisk, praktisk og bare god
Se alle »
CIO
Teaser billede
Husk det her, når du skal købe it-løsninger næste gang: Vi er vidner til it-branchens største maskefald nogensinde
Læs mere »
Din it-organisation går store forandringer i møde: Inden længe vil AI have bombet den 25 år tilbage
VMware-kunder rammes af voldsomme prisstigninger: Nu skal du betale for 72 kerner - også hvis du kun bruger otte
Tidligere it-sikkerhedschef i NNIT bliver ny CISO i DSB: Her er hans store opgave
Se alle »
Job & Karriere
Teaser billede
Den danske it-branche er på vagt: Hvad nu hvis Trump lukker for Microsoft 365 og AWS fra på mandag?
Læs mere »
Carsten advarede som it-sikkerhedschef om problemer og blev fyret: "Det endte med voksen-mobning af værste skuffe"
Microsoft fyrer de dårligst performende ansatte: Disse jobtitler bliver ramt
Nørgaard: I de gode gamle dage havde jeg for vane at fyre alle mine medarbejdere jævnligt
Se alle »
White paper
Teaser billede
AI og kunderejsen: Sådan vinder du fremtidens forbrugere
Læs mere »
Tidsbegrænset kampagne: Overvejer du at udskifte eller tilføje printere i din forretning? Vi kan tilbyde én eller flere maskiner gratis
Udnyt Genesys Cloud CX optimalt og styrk kundeoplevelsen
Revolutionér kundeoplevelsen med AI og automatisering
Se alle »

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

Læses lige nu