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

Arbeitsmappen auswählen anhand Kriterium

Arbeitsmappen auswählen anhand Kriterium
26.03.2015 12:34:50
Gorm
Hallo zusammen,
leider komme ich nicht wirklich weiter mit meinem Problem... aber vielleicht kann mir hier ja sonst jemand mit einer Idee helfen.
Ich muss verschiedene Arbeitsmappen anhand eines Kriteriums (kann z.B. eine 1 in einer Zelle sein oder ein + im Namen der Mappe - völlig egal) per VBA auswählen, um diese Auswahl dann als PDF zu exportieren.
Hat jemand eine Idee wie das gehen kann?
Vielen Dank für Eure Hilfe!!
Grüsse
Gorm

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsmappen auswählen anhand Kriterium
26.03.2015 13:31:36
Rudi
Hallo,
als Ansatz:
Sub aaa()
Dim wks As Worksheet, strWks As String
Const sDelim As String = "|"
For Each wks In Worksheets
If wks.Range("A1") = 1 Then
strWks = strWks & sDelim & wks.Name
End If
Next
If Len(strWks) Then
strWks = Mid(strWks, 2)
Sheets(Split(strWks, sDelim)).Copy
With ActiveWorkbook
.ExportAsFixedFormat Type:=xlTypePDF, Filename:="test"
.Close
End With
End If
End Sub

Gruß
Rudi
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige