Forums Neueste Beiträge
 

Dropdown - Gültikeit - Drucken

02/05/2009 - 21:10 von Stefan | Report spam
Hallo,
ich habe hier ein Datenblatt welches sich über ein Dropdown mit Daten
aus einer Tabelle füllt. Dabei ist Spalte A der Tabelle = die
Gültikeit für das Dropdown.
Die Tabelle wird stàndig erweitert.
Wie bekomme ich es hin das ich über einen Befehl alle "Gültikeiten"
Drucke ohne jede einzel auswàhlen zu müssen?
Jemand eine Idee? VBA kann ich "leider" nicht!

Gruß
Stefan
E2003 und E2007
 

Lesen sie die antworten

#1 Andreas Killer
03/05/2009 - 10:29 | Warnen spam
Stefan schrieb:

aus einer Tabelle füllt. Dabei ist Spalte A der Tabelle = die
Gültikeit für das Dropdown.
Wie bekomme ich es hin das ich über einen Befehl alle "Gültikeiten"
Drucke ohne jede einzel auswàhlen zu müssen?


Blöde Frage:

Wieso druckst Du nicht einfach die Tabelle mit der Spalte A??????

Oder zielt Deine Frage darauf ab in einer bestimmten Zelle jeden Wert
der Spalte A einmal hineinzuschreiben und dann das komplette Blatt
auszudrucken?

Andreas.

Sub Main()
Dim YMax As Long, Y As Long
'Letzte Zeile in Spalte A ermitteln
YMax = Range("A" & Rows.Count).End(xlUp).Row

'Alle Zellen in Spalte A durchlaufen
For Y = 1 To YMax
'Ist die Zelle leer?
If Range("A" & Y) <> "" Then
'Wert in Zielzelle übernehmen
Range("B1") = Range("A" & Y)
'Blatt drucken
ActiveSheet.PrintOut
End If
Next
End Sub

Ähnliche fragen