Workbook_open
24.06.2002 07:25:58
Jens
Ich möchte per VBA in einenm KlassenModul eine Workbook_Beforeclose Procedure schreiben lassen wie geht das?
HAb folgenden Code in der Recherche gefunden, kann aber nicht viel mit anfangen!
Sub CodeLoeschen()
Dim intRow As Integer, intCount As Integer With Workbooks("Test.xls").VBProject.VBComponents("DieseArbeitsmappe").CodeModule intRow = .ProcBodyLine("Workbook_Open", 0) intCount = .ProcCountLines("Workbook_Open", 0) .DeleteLines intRow, intCount - 1 End WithEnd Sub
Kann mir jemand weiterhelfen wäre dringend!