Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makrorecorder vs. Befehlsschaltfläche

Makrorecorder vs. Befehlsschaltfläche
Albert
Guten Morgen zusammen,
hab gestern abend mit dem Makrorecorder nachfolgenden Code aufgezeichnet.
Columns("A:AO").Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteFormulasAndNumberFormats, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Tabelle1").Select
Range("D:F,I:AI,AL:AL").Select
Range("AL1").Activate
Application.CutCopyMode = True
ActiveWindow.DisplayFormulas = True
Range("D:F,I:AI,AL:AL").EntireColumn.AutoFit
Heute will ich den Code hinter eine Befehlsschaltfläche legen und der Code bleibt bei Range("D:F,I:AI,AL:AL").select stehen.
Was könnte hier falsch sein. Hintergrund ist, dass ich Daten aus einer Tabelle kopiere, in ein neues Excelfile einfüge und weiter verarbeite.
Kann mir von euch jemand sagen, an was es liegen könnte?
Dank und Gruß
Albert

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Makrorecorder vs. Befehlsschaltfläche
28.07.2011 09:00:43
Marc
Moin!
Versuch mal diesen "schlanken" Code.
Sub test_neu()
Columns("A:AO").Copy
Workbooks.Add
Range("a1").PasteSpecial Paste:=xlPasteFormulasAndNumberFormats
ActiveWindow.DisplayFormulas = True
Range("D:F,I:AI,AL:AL").EntireColumn.AutoFit
End Sub
Gruß, Marc
AW: Makrorecorder vs. Befehlsschaltfläche
28.07.2011 09:08:39
Albert
Hallo Marc,
herzlichen Dank für deine schnelle Antwort.
Funzelt super...
Hab da noch ein Problem... Steht auch im Forum. Geht um den Code einer Pivottabelle.
Vielen herzlichen nochmal
Albert

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige