Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 08:16:13
Dynamische Positionsnummerierung
18.04.2024 08:15:33
Seitwärts scrollen - Fenster fixiert
18.04.2024 08:06:05
Power Query Tabelle aus jeder Spalte erweitern?
18.04.2024 07:35:33
Matrix auslesen und in Liste umwandeln
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1148to1152
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1148to1152
1148to1152
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

printarea variabel halten

printarea variabel halten
Jan
Hi,
ich habe mir mit dem Makrorekorder folgende Zeile aufgezeichnet: 
ActiveSheet.PageSetup.PrintArea = "A5:BP499"
Jetzt würde ich gerne die Spalten variabel halten, also das BP durch eine Variable mit For-Schleife ersetzen. Leider weiss ich nicht, wie das gehen könnte, etwas "A5:& Konstante*4+9"
Das funktioniert leider nicht...kennt jemand vlt. die Lösung?
Schönen Gruß,
Jan

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: printarea variabel halten
30.03.2010 14:50:20
Hajo_Zi
Hallo Jan,
Deine Formel würde eine Zahl ergeben, da fehlt die Spalte.

und das " ist am falschen Ort! (owT)
30.03.2010 14:53:57
Renee

AW: printarea variabel halten
30.03.2010 15:06:34
{Boris}
Hi Jan,
Sub test()
Dim strCol As String
strCol = InputBox("Spalte angeben", "Druckbereich bis Spalte...", "D")
ActiveSheet.PageSetup.PrintArea = "A5:" & strCol & "499"
End Sub
Grüße Boris
AW: printarea variabel halten
30.03.2010 15:40:26
Jan
Vielen Dank für eure Antworten, lässt sich die Spalte denn nicht als Zahl ausdrücken wie bei Range(.Cells(5,2), .Cells(5, Konstante*i+4)) ?
Die Konstante ist nämlich auch eine zahl!
Schöne Grüße, Jan
Anzeige
AW: printarea variabel halten
30.03.2010 15:45:55
Hajo_Zi
Hallo Jan,
doch über ADRESSE()
Gruß Hajo
AW: printarea variabel halten
30.03.2010 15:47:34
Renee
Hi Jan
Klar lässt sich dass auch machen: 
With ActiveSheet
.PageSetup.PrintArea = .Range(.Cells(5,2), .Cells(5, Konstante*i+4)).Address
End With

GreetZ Renée
AW: printarea variabel halten
30.03.2010 16:26:31
Jan
Genau das! Vielen Dank!

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige