Hi zusammen,
folgendes Problem:
ich hab eine Excel Datei mit 11 Tabellenblättern.
Nun hab ich beim ersten Tabellenblatt über die Seitenansicht die Ränder verschoben.
Nun möchte ich, dass das von den anderen Tabellenblättern übernommen wird. Wie mach ich das denn am geschicktesten?
lg, juli
ich hab eine Excel Datei mit 11 Tabellenblättern.
Nun hab ich beim ersten Tabellenblatt über die Seitenansicht
die Ränder verschoben.
Nun möchte ich, dass das von den anderen Tabellenblättern
übernommen wird. Wie mach ich das denn am geschicktesten?
hallo Juli,
ungetestet, probiers mal so:
Sub Makro1()
Dim N As Integer
For N = 2 To 11
With Worksheets(N).PageSetup
.LeftMargin = Worksheets(1).PageSetup.LeftMargin
.RightMargin = Worksheets(1).PageSetup.RightMargin
.TopMargin = Worksheets(1).PageSetup.TopMargin
.BottomMargin = Worksheets(1).PageSetup.BottomMargin
End With
Next N
End Sub
Gruß
Reinhard
Sub Makro1()
Dim N As Integer
For N = 2 To 11
With Worksheets(N).PageSetup
.LeftMargin = Worksheets(1).PageSetup.LeftMargin
.RightMargin = Worksheets(1).PageSetup.RightMargin
.TopMargin = Worksheets(1).PageSetup.TopMargin
.BottomMargin = Worksheets(1).PageSetup.BottomMargin
End With
Next N
End Sub
Hört sich schon irgendwie logisch an, aber leider hab ich von makros keine Ahnung 
Wenn du mir das jetzt erklärst, dann fang nicht ganz von vorne an, was Makros eigentlich sind, sondern sag mir nur, wo ich das eintippen muss…
danke,
juli
Hört sich schon irgendwie logisch an, aber leider hab ich von
makros keine Ahnung
Wenn du mir das jetzt erklärst, dann fang nicht ganz von vorne
an, was Makros eigentlich sind, sondern sag mir nur, wo ich
das eintippen muss…
Hallo Juli,
sorry, ich weiß ja nie wen ich vor mir habe.
In einem reinen Excelforum wo ich auch bin, da muß jeder Anfrager ankreuzen um welche Ecelversion es geht und welchen level er hat um überhaupt eine Frage stellen zu können.
Dann hätte ich gesehen daß du keine Ahnung von Vba gewählt hast (nix Schlimmes9 und anders geantwortet.
Okay, drücke Alt+F11, dann oben Einfügen—Modul, kopiere den Code rein. Wenn es nur einmalig sein soll, stelle den Curser irgendwo in den Code und drücke F5, dadurch wird der Code ausgeführt.
Danach schließe den VB-Eitor durch das Schließkreuz oben rechts.
Danach kannste mit Rechtsklick links auf „Modul1“ das modul samt Code wieder entfernen, dadurch kriegste beim Dateiöffnen keine Abfrage mehr ob du die Datei mit Makros oder ohne starten willst.
Wenn du das makro öfters brauchst kannste es in Excel über Alt+F8 jederzeit wieder starten ohne in den VB_Editor zu gehen wie mit Alt+F11.
Gruß
Reinhard
super geklappt, danke!