HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Problem mit Code von Hans

Problem mit Code von Hans
22.09.2003 14:35:45
Jens
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

1
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Problem mit Code von Hans
22.09.2003 15:17:35
Nike
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

Meistgelesene Forumthreads (12 Monate)