Hallo liebe Community,
ich hoffe ich bin mit dieser Frage bei euch richtig und zwar stellt sich mir folgendes Problem:
Ich arbeite an einer Excel Liste bei der die Felder B(x),C(x),D(x) ausgefüllt sein müssen insofern die vorhergehende Spalte A auch einen Wert enthält.
Dadurch das ich bisher noch nicht viel mit VBA gearbeitet habe, war die einzige Lösung die soweit eingefallen ist die folgende:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If (Sheets("Tabelle1").Range("B3")= "" _
Or Sheets("Tabelle1").Range("C3")= "" _
Or Sheets("Tabelle1").Range("D3")= "") Then
Cancel = True
MsgBox "Es sind nicht alle Pflichtfelder ausgefüllt, Datei wurde nicht gespeichert!"
Else
Cancel = False
MsgBox "Es sind alle Pflichtfelder ausgefüllt, Datei wurde gespeichert!"
End If
End Sub
Der Code funktioniert insofern das er zumindest das Speichern verhindert, jedoch fehlt mir hier noch die passende Abfrage ob die vorhergehende Spalte A ausgefüllt ist bevor er diese Funktion anwendet.
Ebenso bietet sich mir das Problem das meine Spalten B,C,D,E... alles eine Auswahl an Dropdowns ist was die ganze Abfrage scheinbar nur noch schwerer macht. Ich würde mich sehr über Hilfen freuen!
Viel Grüße,
Al_K
|