Das Archiv des Excel-Forums

Druckbereich festlegen mit VBA

Bild

Betrifft: Druckbereich festlegen mit VBA
von: Fab

Geschrieben am: 09.10.2003 10:28:10

Hallo

Siehe Frage in Sub:


Sub Printarea()
Dim Adresse
Cells(1, 256).End(xlToLeft).Select
'Wie kann man dieser Zelle einen Namen geben, damit man
'ihn danach für die Printarea einsetzen kann?
'Mein Vorschlag funtioniert nicht.
ActiveCell.Address = Adresse
Cells(65536, 1).End(xlUp).Select
ActiveSheet.PageSetup.Printarea = Adresse & ActiveCell.Address
End Sub



Gruss Fab
Bild


Betrifft: AW: Druckbereich festlegen mit VBA
von: Fab
Geschrieben am: 09.10.2003 11:42:56

Ich habe die Lösung! Merci fürs Nachdenken, trotzdem.

Fab


Bild


Betrifft: AW: Druckbereich festlegen mit VBA
von: ANdreas
Geschrieben am: 09.10.2003 11:48:09

Hallo Fab,

Hier mein Vorschlag:

Sub FestlegenDruckBereich()
Dim rRow As Range, rCol As Range
Set rRow = Cells(Rows.Count, 1).End(xlUp)
Set rCol = Cells(1, 256).End(xlToLeft)
ActiveSheet.PageSetup.PrintArea = Range(rRow, rCol).Address
'vielleicht auch kürzer so - ist aber nicht identisch:
'ActiveSheet.PageSetup.PrintArea = ActiveSheet.UsedRange.Address
End Sub


Hinweis: Du solltest unbedingt darauf achten, dass Du Deine Makros (und auch Variablen) NICHT mit Namen von VBA-Objekten/Eigenschaften benennst. In dem Fall hieß Dein Makro Printarea, das ist allerdings eine Eigenschaft.

Gruß
Andreas


Bild


Betrifft: AW: Druckbereich festlegen mit VBA
von: Fab
Geschrieben am: 09.10.2003 12:44:11

Vielen Dank für dein Vorschlag!

Gruss

Fab


 Bild

Excel-Beispiele zum Thema " Druckbereich festlegen mit VBA"

Druckbereich variabel gestalten download Druckbereich bis zum ersten Nullwert festlegen download
Aktuellen Bereich in den Spalten A:F als Druckbereich download Druckbereich in Abhängigkeit zur Einträgen in einer Spalte download
Druckbereiche als GIF-Grafiken exportieren download Druckbereichsauswahl über CheckBoxes download
Druckbereich der 1. Seite ermitteln download Zeilenhöhe in cm festlegen download
Zellinnenfarben über VBA festlegen download Schriftart und -größe eines Kommentars festlegen download
Position der Symbolleiste festlegen download Datenbank für Datenmaske festlegen download
VBE-Namen der Blattmodule beim Kopieren festlegen download Zellinhalt und Kommentar nach Eingabe festlegen download
Hintergrundfarbe nach Datum festlegen download Für ein VBE-Projekt mit VBA-Code ein Paßwort festlegen download
Maximalwert eines SpinButtons nach Zellwert festlegen download Diagramm-Datenbereich über Schaltfläche festlegen download
Bei Öffnen Standardschriftgröße prüfen und Zoom festlegen download Mit VBA-Routine Bereichsnamen festlegen und ändern download
Druckseiten und Anzahl der Ausdrucke über UserForm festlegen download Hintergrundfarbe eines UserForm-Image-Objekts festlegen download
Gültigkeitsliste nach Kriterium festlegen download Hintergrundfarbe nach Farbindex-Liste festlegen download
Spaltenbreite gemäß den in den Zellen stehenden Zahlen festlegen download Windows-Wallpaper festlegen download
Labelhintergrund mit ScrollBars festlegen download ComboBox-Breiten während der Laufzeit festlegen download
Zellhintergrund in Abhängigkeit von Zelleintrag festlegen. download Im Assistenten anzuzeigende Funktion festlegen download
Hintergrundfarbe gem. Werte/Farbindex festlegen download Sprache von ComboBox-Listen nach Sprachauswahl festlegen download