ThisWorkbook.VBProject ansprechen
10.06.2009 20:44:47
Andreas
wie kann ich in VBA bestimmen, daß die Aktion nicht im Bereich ActiveVBProject.VBComponents, sondern analog zu ThisWorkbook durchgeführt wird?
Konkret will ich eine Messagebox kommen lassen, die die CodeElemente des Workbooks anzeigt aus dem die Messagebox gestartet wird, nicht die CodeElemente des gerade aktiven Workbooks.
For Each oVB In Application.VBE.ActiveVBProject.VBComponents
lngCodeElements = lngCodeElements + 1
lngCodeLines = lngCodeLines + oVB.CodeModule.CountOfLines
Next
Dank und Gruß, Andreas