Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
24.04.2024 12:38:40
Formeländerung durch Wechsel von Excel 2021 auf 2019
24.04.2024 12:31:18
Excel - Sverweis mit Wenn-Abfrage kombinieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
692to696
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
692to696
692to696
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wie prüfe ich ob ein Drucker ...

Wie prüfe ich ob ein Drucker ...
13.11.2005 19:20:08
Walter
Guten Abend,
hatte schon mal nachgefragt, Hans konnte mir leider auch nicht helfen.
Hatte alles mögliche schon mal in der Recherche nachgeschaut, leider ebenfalls ohne Erfolg.
Hier noch einmal meine Frage:
Wie kann ich mehr Makro prüfen ob ein Drucker angeschlossen ist und oder ob der Drucker betriebsbereit ist?
Das Druckermenü hilft mir nicht weiter, hoffentlich kann mir jemand einen Tip
geben ?
Gruß Walter

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 19:21:21
BUGS
Hi,
welchen Grund gibt es dafür dieses zu Wissen, versteh ich nicht?
mfg Bugs
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 20:00:48
Walter
Hallo Bugs,
wenn ich in meiner Datei dies Ausdrucken möchte, kann es sein (Laptop) das der Drucker nocht nicht angeschlossen ist. Hier soll der Anwender nach Möglichkeit direkt informiert werden und nicht erst bis die Druckerfehlmeldung kommt.
Gruß Walter
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 20:09:31
BUGS
Hallo,
sei mir net bös, aber die fehlermeldung ist ja gedacht dafür.
Gruss Bugs
AW: den Anwender zu ärgern? o.T.
13.11.2005 20:35:49
HansH
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 20:33:52
Nepumuk
Hallo Walter,
ob ein Drucker angeschlossen ist, kannst du ganz einfach so herausbekommen:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Private Declare Function EnumPrinters Lib "winspool.drv" Alias "EnumPrintersA" ( _
    ByVal flags As Long, _
    ByVal name As String, _
    ByVal Level As Long, _
    ByRef pPrinterEnum As Long, _
    ByVal cdBuf As Long, _
    ByRef pcbNeeded As Long, _
    ByRef pcReturned As Long) As Long

Private Const PRINTER_ENUM_LOCAL = &H2

Public Function PrinterExist() As Boolean
    Dim longbuffer() As Long, numbytes As Long
    Dim numneeded As Long, numprinters As Long, RetVal As Long
    numbytes = 3076
    Redim longbuffer(0 To numbytes / 4) As Long
    RetVal = EnumPrinters(PRINTER_ENUM_LOCAL, "", 2, longbuffer(0), numbytes, _
        numneeded, numprinters)
    If RetVal = 0 Then
        numbytes = numneeded
        Redim longbuffer(0 To numbytes / 4) As Long
        RetVal = EnumPrinters(PRINTER_ENUM_LOCAL, "", 2, longbuffer(0), numbytes, _
            numneeded, numprinters)
        If RetVal = 0 Then Exit Function
    End If
    PrinterExist = numprinters 0
End Function

Public Sub Test()
    If Not PrinterExist Then MsgBox "Kein Drucker angeschlossen", 16, "Warnung"
End Sub

Schwieriger wird es, herauszubekommen, ob er betriebsbereit ist. Viele Drucker werden durch den Treiber eingeschaltet, der gibt praktisch immer den Status "Betriebsbereit" zurück. Außer das Netzkabel wurde nicht angeschlossen. An dem Code muss ich aber noch etwas basteln. Mal sehen, vielleicht wird's noch was im laufe der kommenden Woche.
Gruß
Nepumuk
Anzeige
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 20:51:54
Walter
Hallo Nepumuk,
Danke.
Genau das brauche ich, ob der Drucker dann aktiv ist vielleicht gelingt es Dir.
Ich habe 0 Ahnung !!!
Gruß Walter
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 21:13:34
Uduuh
Hallo Nepumuk,
du Tiefstapler! :-))
...und ab in die Sammlung.
Gruß aus’m Pott
Udo

AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 21:28:38
Fred
Hi,
nützt aber nichts, wenn der Drucker ausgeschaltet ist.
mfg Fred
AW: gehts auch konstruktiver ?
13.11.2005 21:41:56
HansH
AW: Wie prüfe ich ob ein Drucker ...
13.11.2005 21:56:45
Uduuh
Hallo,
lesen kann ich selbst.
Gruß aus’m Pott
Udo

301 Forumthreads zu ähnlichen Themen

Wie bau ich den Code ein?
Baywatch

Hi
Habe unten schon einen Tread aufgemacht, wo es ums drucken geht und es gibt auhc jemanden der mir eine super ANtwort gegeben hat, nur leider weiß ich jetzt nicht, wei ich dies in mein Programm einbauen soll, kann mir ja jemand bei helfen?
https://www.herber.de/bbs/user/54811.xls
22.08.2008 13:44:00
Thread-ID: 1003844
5 Beiträge
Anzeige
Wie kann ich hier eine Schleife ...
Thomas

Hi Profis,
Wie kann ich hier eine Schleife einbauen sodas das Passwort nur einmal eingegeben wird und die Tabelle somit für einen Zeitraum von ca 60minuten freigeben wird. Den Code hab ich hier aus dem Archiv und an meine Bedürfnisse mit basteln angepasst. Er überwacht einen Zellbereich und...
02.02.2009 11:29:00
Thread-ID: 1046127
9 Beiträge
Webabfrage gibt Hyperlink nicht wieder
MBorn

Hallo,
auf der Seite von Wikipedia für Aston Villa http://de.wikipedia.org/wiki/Aston_Villa
gibt es einen Link zum Stadion dieser Fußballmannschaft.
Bei einer Excel-Webabfrage wird dieser Link nicht importiert. Trotz xlWebFormattingAll.
Weiß jemand, warum das so ist oder wie da...
09.02.2009 11:18:00
Thread-ID: 1048594
5 Beiträge
Anzeige
Wie Unterverzeichnisse einlesen
Mindjogger

Servus,
um mein Problem weiter herunterzubrechen moechte ich aus einem bekannten Verzeichnis die Datei index.html aus allen Unterverzeichnisssen einlesen.
Nur, wie starte ich das Filemodul um auf Verzeichnisse bzw. Dateien zuzugreifen?
So geht es nicht:
Private Function GetAO...
30.03.2009 17:39:40
Thread-ID: 1065364
6 Beiträge
Wie index.html aus allen Unterverzeichnissen einle
Mindjogger

Servus,
ich verzweifle an diesem Prlem bald. Ich moechte einfach in einem bekannten Verzeichnis durch alle Unterverzeichnise gehen und die dort leigende index.html einlesen.
Aber wie greife ich auf die Verzeichnisse zu bzw. wie bastle ich mir darum eine Schleife?
Ich habe nur die al...
01.04.2009 14:14:33
Thread-ID: 1066000
2 Beiträge
einzelne Zellen nicht schützen, wie?
dietmar

Hallo,
ich möchte bei einem EXCEL-Formular, dass man nur einzelne Zellen befüllen kann und der Rest des Formulars gesperrt ist. Die auszufüllenden Zellen (z.B. Name, Adresse, usw.) sollten durch Tab angewählt werden können. Zur Zeit kann ich nur einzelne Zellen sperren aber nicht umgekehrt?...
05.04.2009 22:41:32
Thread-ID: 1066974
6 Beiträge
Dateneingeben, Wegspeichern und wieder eingeben
Peter_weber

Liebes Forum,
bin blutiger aber lernwilliger VBA Anfänger.
Wahrscheinlich ist meine Frage schon Tausend mal gestellt worden und wird von den Experten mit einem wohlwollendem Lächeln begleitet.
Also, ich benötige Eure Unterstützung. Wie könnte ein einfaches VBA Progrämchen für mein...
09.04.2009 09:39:18
Thread-ID: 1067898
7 Beiträge
zahleneingabe tut nicht so wie sie soll
christoph

das eingeben von mehrstelligen zahlen funktioniert bei mir nicht.
wenn ich zahlen von 0-9 eingebe, werden diese korrekt angezeigt bzw berechnet. von 10-999 ersetzt sich der wert mit 0 oder 1. ab 1000 wird der wert nur dann korrekt dargestellt bzw berechnet, wenn ich ihn so eingebe: 1.000
13.07.2009 00:48:50
Thread-ID: 1088088
12 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
4
8
8
4
2
5
1
5
6
11
4
8
2
3
5
2
3
9
10
4
2
3
5
3
5