Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
624to628
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
624to628
624to628
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Application.VBE.ActiveCodePane.CodeModule

Application.VBE.ActiveCodePane.CodeModule
15.06.2005 10:47:07
chris
Hallo VbaProfis, ich habe eine frage,
was muss ich umschalten damit ich diese Codes ausführen kann ?
Ich wusste es mal irgendwo muss ich einen Hacken setzen nur wo?
Vielen vielen Dank für den Tipp Christian
Const SuchZeile = " MsgBox ""VBA macht Spaß !"""
Const NeueZeile = " MsgBox ""VBA macht großen Spaß !"""

Sub VBAZeileÄndern()
Set VBE = Application.VBE.ActiveCodePane.CodeModule
With VBE
For x = 1 To .CountOfLines
If .Lines(x, 1) = NeueZeile Then
.ReplaceLine x, SuchZeile
Exit Sub
End If
If .Lines(x, 1) = SuchZeile Then
.ReplaceLine x, NeueZeile
Exit Sub
End If
Next x
End With
End Sub


Sub Testen()
MsgBox "VBA macht Spaß !"
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Application.VBE.ActiveCodePane.CodeModule
15.06.2005 11:03:57
Hajo_Zi
Hallo Chris,
sehe ich das richtig das Du den VBA Code mit VBA ändern willst?
Hast Du unter Extra, Makro den Zugriff auf das VBA Projekt zugelassen?
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.


AW: Application.VBE.ActiveCodePane.CodeModule
15.06.2005 11:13:10
chris
Hajo Danke !!
Genau das wars ich wusste es nur nicht mehr !! Danke !

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige