lilakaffeetasse

hallo zusammen, ich habe eine excel liste in der ich pflichtfelder eingegeben habe. es funktioniert einwandfrei- habe auf einem tabellenblatt eine formel erstellt, dass das dokument erst abzuspeichern ist, wenn alle pflichtfelder ausgefüllt sind. unter 'DieseArbeitsmappe' habe ich folgende Formel eingegeben: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Dim Pflichtbereich As Range, Anzahl With Worksheets("Schreibauftrag") Set Pflichtbereich = Union(.Range("B15"), .Range("B17"), .Range("B19"), .Range("C21"), .Range("E21"), .Range("C23"), .Range("E23")) End With Anzahl = Pflichtbereich.Cells.Count If Application.WorksheetFunction.CountA(Pflichtbereich) <> Anzahl Then MsgBox "Bitte füllen Sie zuerst alle Pflichtfelder aus !", vbOKOnly + vbInformation, _ "Datei wurde NICHT gespeichert !" Cancel = True End If End Sub wie gesagt, es klappt bestens. Nur habe ich jetzt ein Problem. Ich habe mehrere Tabellenblätter in der ich Pflichtfelder eingeben muss. Wenn ich die Formel jetzt kopiere und das Tabellenblatt "Schreibauftrag" und die Zeilenbezeichnungen ändere, wie ich es brauche, dann klappt es nicht. Darf ich die Formel nur einmal verwenden? Wie mach ich das? (Ich kenn mich in Excel nicht wirklich sehr gut aus, also bitte nicht mit Fachbegriffen umherwerfen ) Vielen Dank im Voraus!!!!