Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
19.04.2024 11:45:34
Anzeige
Archiv - Navigation
228to232
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
228to232
228to232
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Aktion ausführen wenn

Aktion ausführen wenn
14.03.2003 11:50:14
andrea
Hallöchen
ich habe folgendes Problem:
ich habe eine Mappe als eine Art Eingabemaske umstrukturiert, in der 6 Eingaben erfolgen müssen!!! um über ein Button in eine weitere Mappe zu gelangen.
wie kann ich es hinkriegen, daß alle notwendigen Eingaben in die Felder D8, D10, D12, D14, D16 und D18 erfolgt sind. Vorher soll der Button nicht die 2.Mappe öffnen.
vielen dank schon im vorraus!!!!

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

Betreff
Datum
Anwender
Anzeige
Re: Aktion ausführen wenn
14.03.2003 12:02:55
Willie

Versuch es mal damit:

Sub test()
Dim i As Variant
For i = 8 To 16 Step 2
If Cells(i, 4).Value = "" Then
z = z + 1
MsgBox "Nicht öffnen!"
Exit Sub
Else
End If
Next
MsgBox "Es sind " & z & " Felder nicht gefüllt!"
End Sub

Gruß Willie

Re: Aktion ausführen wenn
14.03.2003 12:03:13
Kobra

Hi,

Versuchs mit einer if-Abfrage:

if ...D8="" or ...D10="" ... then
erg = msgbox("Es müssen alle Felder ausgefüllt werden")
else
'Deine Aktion zum Sprung
endif

Gruss
Markus

DANKE !!!!
14.03.2003 14:47:19
andrea

SUUPPER
hat ja wunderbar geklappt. bin jetzt um einen großen schritt weitergekommen. klappt alles so wie es soll.

D A N K E andrea

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige