Brugen af funktionen "=FJERN.OVERFLØDIGE.BLANKE"

Sub Makro1()
' det samme som "=FJERN.OVERFLØDIGE.BLANKE"
For Each c In Selection
  c.Value = Application.WorksheetFunction.Trim(c.Value)
  Next
End Sub

Sub Makro2()
' det samme som "=STORT.FORBOGSTAV"
For Each c In Selection
  c.Value = Application.WorksheetFunction.Proper(c.Value)
  Next

End Sub

Det ser rigtigt ud, men hvordan laver jeg det til en "knap" eller "Afspil makro" i alle mine Excel-dokumenter?

Du skal selvfølgelig nok få points - og max karma. Vil dog gerne se, om ovenstående kan lade sig gøre, inden jeg lukker spørgsmålet.

Højreklik på et tomt sted på menulinien, sæt flueben ved Formularer.

Klik på knappen, træk  en ramme med musen på arket hvor knappen skal være.
Når det er gjort spørger den om hvilken makro den skal starte, vælg den du vil have.

Til slut rediger knapteksten, luk formularboksen.

(men hvordan laver jeg det til en "knap" eller "Afspil makro" i alle mine Excel-dokumenter)

Hvis du dermed mener alle Excel filer du åbner, skal koden i den personlige excel ark, og knapperne skal op på menulinien.

Den sættes på, ved at højreklikke på menulinien, vælg tilpas, vælg fanen kommandoer, katogori, makroer.

Til højre ser du en smiely med titlen Brugerdefineret knap, klik på den og hold musetasten nede og træk den op på en plads på menulinien, nu kan du rette i den og vælge makro.

Nu har jeg min lille smiley-knap, men makroen følger ikke med, når jeg laver et nyt eller åbner et gammelt excel-dokument. Hvordan gemmer jeg makroen i standardopsætningen?

Det må vist gælde som et ekstra spørgsmål, så jeg dobler gerne points op.

Optag en ny makro, vælg at den skal gemmes i din personlige projektmappe, så bliver Preson.xls lavet.

Det er i det modul hvor den makro du lige optog, makroerne skal ligge.

Person.xls bliver altid indlæst, hvis den er lavet, så har du makroerne altid.

Det er helt perfekt. Lige det, jeg havde brug for.

tak for point