Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
816to820
816to820
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

worksheet_change Ereignis zuweisen?

Forumthread: worksheet_change Ereignis zuweisen?

worksheet_change Ereignis zuweisen?
07.11.2006 15:42:42
Markus
Hallo,
Ich habe eine Tabelle mit dem folgenden Code erstellt.
Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = Name
Wie kann ich der neu erstellten Tabbelle auch einen Code im Worksheets_change Ereignis eintragen.
Danke für eure Hilfe
Markus
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: worksheet_change Ereignis zuweisen?
07.11.2006 15:59:02
Rudi
Hallo,
Sub tt()
Dim wks As Worksheet
Set wks = Worksheets.Add
With ThisWorkbook.VBProject.VBComponents(wks.CodeName).CodeModule
.InsertLines 3, " 

Private Sub Worksheet_Change(ByVal Target As Range)"
.InsertLines 4, "Msgbox Target.Address"
.InsertLines 5, "End Sub
"
End With
End Sub
Gruß
Rudi
Anzeige
AW: worksheet_change Ereignis zuweisen?
07.11.2006 18:23:44
Markus
Hallo Rudi,
danke für deinen code.
Ich habe ihn umgebaut, leider erhalte ich eine Fehlermeldung
"Der programmatische Zugriff auf VBA-Objekte ist nicht sicher"
With ThisWorkbook.VBProject.VBComponents _(Worksheets(TabelleProfiltypName).CodeName).CodeModule
.InsertLines 3, " 

Private Sub Worksheet_Change(ByVal Target As Range)"
.InsertLines 4, "Msgbox Target.Address"
.InsertLines 5, "End Sub
"
End With
End Sub
Anzeige
AW: worksheet_change Ereignis zuweisen?
08.11.2006 09:31:07
Rudi
Hallo,
Extras-Makro-Sicherheit-Vertrauenswürdige Quellen; Zugriff auf... anhaken.
Gruß
Rudi
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige