Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
404to408
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
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bereich abfragen

Bereich abfragen
28.03.2004 21:53:22
DieterG
Hallo,
per Makro werden Werte aus Tabelle1 in Tabelle2 übertragen!
Mein Problem:
Das Makro soll nur dann laufen, wenn in einem bestimmten Bereich in Tabelle1 z.B. A10:A25 mindestens ein X eingegeben wurde.
Wenn der Bereich leer ist soll abgebrochen werden und eine MsgBox ("X eingeben") erscheinen!
Danke für Euerer Hilfe

Gruß Dieter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich abfragen
28.03.2004 21:58:28
Josef Ehrensberger
Hallo Dieter!
Z.B. so!


Sub test()
Dim intX As Integer
If WorksheetFunction.CountIf([A10:A25], "X") > 0 Then
MsgBox """X"" vorhanden!"
'Anstelle der MsgBox dein Code
Else
MsgBox "Kein ""X"" vorhanden!"
End If
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.

(Sir Winston Churchill)


Anzeige
AW: Bereich abfragen
28.03.2004 22:26:58
DieterG
Hallo Sepp,
perfekt!
Danke
Gruß Dieter
Danke für die Rückmeldung! o.T.
28.03.2004 22:43:11
Josef Ehrensberger
Gruß Sepp

Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.

(Sir Winston Churchill)


Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige