Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
292to296
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
292to296
292to296
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken Wenn

Drucken Wenn
12.08.2003 11:27:16
Lucien
Hallo
Ein kleine Frage
Ich möchte in einem Tabellenblatt die Tabelle ausdrucken wenn in A1 ein"A" steht und NUR dann!! Wer kennt VBA Code hierfür ?
Danke im voraus
gruss Lucien

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken Wenn
12.08.2003 11:35:03
sergiesam
Hi,
versuchs damit:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Range("A1") <> "A" Then
MsgBox "Das Drucken ist nicht möglich!"
Cancel = True
End If
End Sub

Gruß,
sam

AW: Drucken Wenn
12.08.2003 11:36:24
Mike E.
Hallo Lucien,
mit einer if/then-Schleife
If Sheets(1).Cells(1,1) = "A" Then DeinDruckCode
Gruß
Mike

Feedback?
12.08.2003 12:48:01
Ramses
Hallo
hat das Makro das ich dir gestern gesschrieben habe eigentlich funktioniert ?
Gruss Rainer

AW: Feedback?
12.08.2003 13:37:30
Lucien
Hallo Rainer
Zum feedback
der Code funktioniert einwandfrei.
Hatte dies aber gestern gepostet
Danke noch einmal für eure hilfe
Gruss Lucien

Anzeige
AW: Feedback?
12.08.2003 13:37:42
Lucien
Hallo Rainer
Zum feedback
der Code funktioniert einwandfrei.
Hatte dies aber gestern gepostet
Danke noch einmal für eure hilfe
Gruss Lucien

Danke o.T.
12.08.2003 14:08:57
Ramses
...

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige