Anzeige
Archiv - Navigation
284to288
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
284to288
284to288
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textdatei drucken

Textdatei drucken
29.07.2003 14:13:49
Petia
Hallo,
Habe ein kleines Problem. Ich habe ein Makro geschrieben, das Inhalte von einem Tabellneblatt in einer Textdatei schreibt. Was ich gern machen würde ist diese Textdatei automatisch nach dem Schreiben zu drucken. Hat jemand die Lösung für mein Problem???
Besten Dank im voraus und schöne Grüße

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textdatei drucken
29.07.2003 15:25:00
Michael Scheffler
Hi,
mal mit ein paar Versatzstücken aus dem Netz:
~begin~
Public Declare

Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) _
As Long
Const SW_SHOWMINNOACTIVE = 7

Sub PrintAPI()
Dim strFile As String
strFile = "c:\mentat.log"
Call ShellExecute(0&, "Print", strFile, ByVal 0&, 0&, SW_SHOWMINNOACTIVE)
End Sub

~end~
Gruß
Micha

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige