Herzlich Willkommen, lieber Gast!
  Sie befinden sich hier:

  Forum » Visual Basic 6.0 / VBA » Word Makro

Forum | Hilfe | Team | Links | Impressum | > Suche < | Mitglieder | Registrieren | Einloggen
  Quicklinks: MSDN-Online || STL || clib Reference Grundlagen || Literatur || E-Books || Zubehör || > F.A.Q. < || Downloads   

Autor Thread - Seiten: > 1 <
000
04.12.2006, 15:42 Uhr
~Muck9999
Gast


Hallo,

ich habe folgendens Problem:

Es sind mehrere Drucker installiert
1. OKI Nadeldrucker (Standard)
2. Canon Laserdrucker
3. Tobit FaxWare

Aus meinem Word möchte ich gerne das Dokument als Fax üner ein Makro versenden. Funktioniert soweit einwandfrei. Nur setzt mein Makro den Standarddrucker auf den Tobit FaxWare und das ist nicht so doll :-)
Wie kann ich das verhinder?

Mein Makro:

Visual Basic:
Sub FaxVersenden()
'
' FaxVersenden Makro
' Makro aufgezeichnet am 04.12.2006 von
'
    ActivePrinter = "Tobit FaxWare"
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
        Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub



Im voraus vielen Dank.


Gruß Sven

Dieser Post wurde am 04.12.2006 um 16:11 Uhr von J-jayz-Z editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
001
04.12.2006, 16:16 Uhr
FloSoft
Medialer Over-Flow
(Administrator)


danach ActivePrinter wieder auf seinen alten Wert setzen. müsste man ja auch abfragen können schätz ich mal vorher, und dann danach wieder herstellen.


Visual Basic:
dim OldPrinter as String;
OldPrinter = ActivePrinter

ActivePrinter = "..."
Application.PrintOut ...

ActivePrinter = OldPrinter



btw. ich hau das mal nach VB(A)
--
class God : public ChuckNorris { };

Dieser Post wurde am 04.12.2006 um 16:17 Uhr von FloSoft editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
002
04.12.2006, 16:59 Uhr
~Muck9999
Gast


Dankschööön es tut.

Nur das ; hinter String ist zu viel.

Gruß Sven
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
003
04.12.2006, 22:34 Uhr
FloSoft
Medialer Over-Flow
(Administrator)



Zitat von ~Muck9999:
Dankschööön es tut.

Nur das ; hinter String ist zu viel.

Gruß Sven

Tja da sieht man mal den C++ler, überalln strichpunkt nachm kommando
--
class God : public ChuckNorris { };
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
Seiten: > 1 <     [ Visual Basic 6.0 / VBA ]  


ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: