Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1580to1584
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

VBA Blätter aus Liste drucken

VBA Blätter aus Liste drucken
26.09.2017 13:36:53
MB12
Hallo zusammen,
im Deckblatt ("Aua") der beigefügten Musterdatei liste ich in Spalte J alle Tabellenblattnamen auf.
Der User soll dann in Spalte I durch eingeben eines "x" auswählen, welche Blätter er in einem Zug drucken möchte.
Ziel: Öffnen der Druckvorschau
Beispieldatei:
https://www.herber.de/bbs/user/116540.xlsm
Herzlichen Dank im Voraus und noch schöne Herbsttage
Margarete

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Blätter aus Liste drucken
26.09.2017 14:09:43
Michael
Hallo Margarete!
Sub DruckenNachWahl()
Dim Wb As Workbook: Set Wb = ThisWorkbook
Dim Ws As Worksheet: Set Ws = Wb.Worksheets("Aua")
Dim rIndex As Range: Set rIndex = Ws.Range("I2:I5")
Dim B As Range
Dim i&, j&, s$, aB
If WorksheetFunction.CountA(rIndex) 
LG
Michael
AW: danke schön; genau das war's
26.09.2017 14:21:47
MB12
Gruß
Margarete
Gern, Danke für die Rückmeldung, owT
26.09.2017 14:34:12
Michael
Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige