Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
18.04.2024 15:16:20
VBA Suchen, Kopieren, Einfügen
18.04.2024 15:16:07
Verschieben von Daten um bestimmte Zeilen nach unten
18.04.2024 15:13:44
Text ans untere Ende der Seite verschieben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1196to1200
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
1196to1200
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Free-Pdf drucken mit Dateiname

Free-Pdf drucken mit Dateiname
Heinz
Hallo Leute
Ich möchte "Tabelle1"mit Free-Pdf Drucker versenden. Dabei sollter der Dateiname von Tab1.A1& " " & H1 angeführt werden.
ZB. A1= Sperrliste H1 = Datum von Heute Ergebniss sollte lauten "Sperrliste 04.02.2011.pdf"
Momentan habe ich unteren Code zur Druckerauswahl.
Habe Free-PDF XP Vers.3.24
Könnte mir bitte jemand weiterhelfen?
Gruß
Heinz 
Option Explicit
Sub drucken()
Dim Nein As Boolean
Nein = Application.Dialogs(xlDialogPrint).Show
End Sub

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Free-Pdf drucken mit Dateiname
05.02.2011 16:08:44
Armin
Hallo Heinz,
wie das mit dem Free-PDF XP funktioniert weiß ich nicht. Aber ich könnte die eine Lösung senden die mit dem PDFCreater funktioniert. Selbigen bekommst Du im Netz.
Gruß Armin
AW: Free-Pdf drucken mit Dateiname
06.02.2011 01:48:37
Heinz
Hallo Armin
Recht herzlichen Dank für deine angebotene Hilfe.
Leider ist die Datei für unseren Firmen PC.
Hier möchte oder darf ich keine anderen Pogramme raufspielen.
Nochmals Danke
Heinz
Free-Pdf drucken mit Dateiname
06.02.2011 13:13:13
Anton
Hallo Heinz,
probier sowas:
Code:

Sub mit_freePDF_XP_Drucken()
  Const cstrFreePdf = "C:\Programme\FreePDF_XP\freepdf.exe"  'anpassen
  Dim strFileName As String, strCommand As String, WshShell As Object    
  Set WshShell = CreateObject("WScript.Shell")  
  With Tabelle1
    strFileName = "C:\" & Range("A1") & "_" & .Range("H1") & ".ps"
    .PrintOut ActivePrinter:="FreePDF XP", PrintToFile:=True, PrToFileName:=strFileName  
  End With  
  strCommand = Chr(34) & cstrFreePdf & Chr(34) & " " & strFileName & " /a /d /x"
  WshShell.Run strCommand, 1, True
  Set WshShell = Nothing  
End Sub  


mfg Anton
Anzeige
AW: Free-Pdf drucken mit Dateiname
06.02.2011 18:51:30
Heinz
Hallo Anton
Du bist genial !!
Recht herzlichen Dank.
Gruß
Heinz

302 Forumthreads zu ähnlichen Themen

per Makro passwortgeschützes PDF erstellen
Frank

Hallo!
Ich hoffe mal wieder aud fachkundige Hilfe. Bei meinem aktuellen Projekt müssen aus Excel heraus täglich viele passwortgeschützte PDF-Doumente erstellt werden. Das Passwort ist immer gleich. Es geht lediglich darum die Dateien vor unautorisiertem Zugriff zu schützen, falls jemand das...
15.08.2008 09:20:00
Thread-ID: 1002042
3 Beiträge
Anzeige
Excel Tabelle als Leerz. getrennte txt speichern
Eddie

Mahlzeit,
ich will gerne meine Tabelle als Leerzeichen getrennte Datei speichern, nur leider macht das prn-Format nur 240 Zeichen in einer zeile .... gibt es einen anderen Weg, umd das layout zu behalten, und dann als leerzeichen getrennte Datei zu speichern ?
Vielleicht kann man auch b...
01.01.1970 00:00:00
Thread-ID: 1014969
34 Beiträge
Tabelle als PDF speichern
PeTeR

Hallo VBA-Freaks,
ich suche seit Stunden - finde aber nicht den exakt passenden Code, obwohl es zig Einträge zu dem Thema gibt.
Ich will eine Tabelle per VBA in PDF umwandeln u. drucken. Mein Code:
Application.ActivePrinter = "Adobe PDF auf Ne01:"
ActiveWindow.SelectedSheets.Pri...
25.10.2008 23:06:00
Thread-ID: 1019291
5 Beiträge
Anzeige
Makro: PDF-Drucken automatischer Dateiname
Stewie

Hallo,
ich habe ein Makro erstellt, mit welchem ich meine Tabellenblatt mittels PDF-Maker "drucken" kann.
Funktioniert soweit auch ganz gut, nur muss ich den Dateinamen noch von Hand eingeben.
Ich möchte gerne, dass mir der Text von 2 Zellen in meiner Tabelle als Dateiname benutzt w...
18.11.2008 11:14:00
Thread-ID: 1025556
3 Beiträge
Tabellenblätter einzeln als Datei speichern
murat

Hallo,
ich habe einen tollen VBA Code hier im Forum gefunden!
Ich möchte die einzeln Tabellenblätter als Datei Speichern. ich habe 20 Tabellenblätter in einer Datei aus der sollen 20 Dateien werden. Dateiname steht immer in Zelle C2 des jeweiligen tabellenblattes.
Der Code unten i...
13.01.2009 11:46:16
Thread-ID: 1039178
3 Beiträge
Alle Dateien als Excel97 speichern
WolfgangN

Hallo,
ich habe Excel2003 und möchte alle Excel-Tabellen aus einem Ordner (Excel-Tabellen) in einem anderen Ordner (PCShop) als Excel 97 Version speichern, um sie zu brennen und zu einem PC zu nehmen, wo nur Excel 97 installiert ist.
An den Dateien wird nichts geändert, soll nur als Exc...
12.02.2009 19:17:00
Thread-ID: 1050222
3 Beiträge
Einzelnes Tabellnblatt in PDF Datei speichern
Jens

Ich habe folgendes Problem, ich möchte ein einzelnes Tabellenblatt aus Excel heraus in eine Pdf Datei mittels command Buttom und Makro/ VBA speichern. Als PDF Prog nutze ich Adobe Acrobat Prof 8.0(bringt nen Converter mit).
THX im Voraus
27.02.2009 15:30:50
Thread-ID: 1054824
14 Beiträge
VBA Speichern unter
BuStue

Hallo Leute, schönen Guten Morgen.
KAnn man folgenden Code so umdrehen, das der Inhalt der Zelle D4 vor dem Blattnamen abgespeichert wird,
ActiveWorkbook.SaveAs SavePath & "\" & ActiveSheet.Name & " " & ThisWorkbook.Sheets("Bestandsübersicht").Range("D4").Value & "....
26.03.2009 07:58:29
Thread-ID: 1064084
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
1
33
4
2
2
2
2
13
3
1
4
2
2
1
13
5
1
1
4
2
2
5
5
3