Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
208to212
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Skript ändern

Skript ändern
27.01.2003 10:09:13
Nino19
Hallo
ich würde gern Teile meines Skripts ändern. Es befindet sich in 7 Tabellenblättern einer Datei, und diese Datei ist 25 Mal kopiert und verteilt worden.
Gibt es eine Möglichkeit einer automatischen Skript-Bearbeitung?
LG, Nino

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Skript ändern
27.01.2003 10:19:26
Bernd Held
Hallo Nino,

dazu kann man mit der VBE-Programmierung arbeiten. Dabei kannst Du den code per Makro löschen lassen und über eine Importfunktion wieder einfügen.
sowas könnte dann in etwa wie folgt aussehen:

Sub EntfernenEreignise()
With ThisWorkbook.VBProject.VBComponents("Tabelle1").CodeModule
.DeleteLines 1, .CountOfLines
End With
End Sub

Sub EreignisEinstellen()
With ThisWorkbook.VBProject.VBComponents("Tabelle1").CodeModule
.InsertLines 1, _
"Private Sub Worksheet_Change(ByVal Target As Range)" & Chr(13) & _
" Msgbox ""Zellenänderung durchgeführt in Zelle: "" & Target.Address" & Chr(13) & _
"End Sub"
End With
End Sub

Viele Grüße
Bernd
MVP für Microsoft Excel
Noch mehr Excel-Tipps und VBA-Datenbank unter: http://held-office.de

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige