Funktionsaufruf und -definition an versch. Orten?
27.01.2006 13:49:54
tobias
ich hänge an meinem Problem mit den Funktionen fest:
Ich habe eine Funktion im Code "Tabelle1" geschrieben und als "public" gesetzt.
Public
Function PruefeGanzeZeile(zeile As Range) As Boolean
Im Code unter "MeineArbeitsmappe" habe ich in der Subfunktion "Workbook_BeforeSave()" den Funktionsaufruf eingebaut.
Private
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim fehler As Boolean
Dim zelle As Range
fehler = False
For Each zelle In ActiveSheet.Range("A1:J1000")
fehler = PruefeGanzeZeile(zelle)
If fehler Then
MsgBox "Aufgrund der Fehlereingaben kann die Mappe nicht gespeichert werden! Bitte korrigieren!"
zelle.Select
Cancel = True
Exit For
End If
Next
End Function
Dennoch bekomme ich eine Fehlermeldung beim Kompilieren:
Sub oder
Function nicht definiert!
Soll das heissen, dass die Funktion nicht unter "MeineArbeitsmappe", sondern in "Modul" stehen muss, damit es dort korrekt erkannt werden kann?
Ich denke, es ist eigentlich egal, wo die Funktion definiert sein kann, oder irre ich mich?
Gruss
Tobias