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

Pflichtfelder

Pflichtfelder
27.04.2005 14:52:49
Thomas
Hallo Leute,
ich habe in der Recherche schon einige Abhandlungen zum Thema Pflichtfelder gefunden. Ich konnte mir auch schon etwas zusammen bauen. Nun habe ich aber eine Tabelle die auch in mehrere Zeilen gefüllt werden kann(eine Art Sammelliste).
Wenn ich den Code den ich angefügt habe verwende, bezieht es sich immer auf die eine Zeile. Wie kann ich es anderst gestalten, das er alle Zeilen beachtet?
MFG Thomas
Public

Sub Workbook_BeforeClose(Cancel As Boolean)
Dim PruefIndexSeite1 As Integer
'Dim PruefIndexSeite2 As Integer
Dim MsgTitel, MSGTEXT As String
MsgTitel = ""
PruefIndexSeite1 = Worksheets("Pruefung").Range("B1").Value
'PruefIndexSeite2 = Worksheets("Pruefung").Range("E1").Value
If PruefIndexSeite1 = 0 Then
Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Controls("Senden an").Enabled = True
Exit Sub
End If
If PruefIndexSeite1 > 0 Then
MsgBox "Auf der Seite 1 fehlen noch " & PruefIndexSeite1 & " Eintragungen" & Chr(10) _
& "Bitte überprüfen Sie diese !", vbCritical, MsgTitel
'        Application.CommandBars("Worksheet Menu Bar").Controls("Datei").Controls("Speichen unter...").Enabled = False
Cancel = True
Exit Sub
End If
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pflichtfelder
27.04.2005 20:21:11
Frigo
Hi Thomas,
dein Makro verarbeitet einen Wert vom Blatt "Prüfung", Zelle B1.
Dort prüfst Du wahrscheinlich per Formel bestimmte Felder ab.
Warum dehnst Du die Formel nicht auf Deine anderen Zeilen aus?
Hab ich was nicht verstanden?
Frigo

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige