Das Archiv des Excel-Forums

Problem mit Code von Hans

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Problem mit Code von Hans
von: Jens

Geschrieben am: 22.09.2003 14:35:45

Hallo zusammen. Ich habe ein kleines Problem mit einem Code(154801) von Hans.
das zu kopierende TB enthält bei mir einen "Worksheet_Activate()-Makro"
beim kopieren soll dieses aber unterdrückt werden, also nicht ausgeführt werden. Wie muß ich da den Code ändern? Hat jemand von euch eine Idee?


Private Sub CommandButton1_Click()
Worksheets("Tabelle1").Copy
ActiveSheet.OLEObjects.Delete
With ActiveSheet.UsedRange
.Value = .Value
End With
With ActiveSheet.Parent.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
.DeleteLines 1, .CountOfLines
End With
On Error GoTo ERRORHANDLER
ActiveWorkbook.SaveAs Range("B1").Value & "\test.xls"
Exit Sub
ERRORHANDLER:
MsgBox "Die Datei konnte nicht gespeichert werden!"
End Sub


Danke für jede Hilfe Jens
Bild


Betrifft: AW: Problem mit Code von Hans
von: Nike
Geschrieben am: 22.09.2003 15:17:35

Hi,
vor dem Kopieren ein
Application.enableevents=false
und danach dann wieder auf true
Wüßte aber nicht, an welcher Stelle das Ereignis
tatsächlich ausgelöst werden soll...

Bye

Nike


 Bild

Excel-Beispiele zum Thema " Problem mit Code von Hans"

Verschnittproblem mit Solver lösen download