Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1172to1176
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
Inhaltsverzeichnis

VBA: Suche in anderen VBA Quelltexten

VBA: Suche in anderen VBA Quelltexten
Christian
Hallo,
ich suche einen Weg, wie ich ein Makro schreiben kann, dass in den Quelltexten anderer Dateien
nach einem Begriff sucht und diesen dann ersetzt. Habe schon mal probiert mit dem Recorder einen Anfang zu finden, was leider nicht viel gebracht hat.
Wie muss ich hier vorgehen? Hat das jemand schon mal gemacht?
Vielen Dank und beste Grüße
Christian

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: VBA: Suche in anderen VBA Quelltexten
23.08.2010 11:32:50
Hajo_Zi
Hallo Christian,
bei Deinem Level würde ich das sein lassen. Dazu ist ein Zugriff au das VBA Projekt notwendig.

AW: VBA: Suche in anderen VBA Quelltexten
23.08.2010 11:34:07
Christian
Habe leider keine Wahl :)
Daher wäre ich für Hilfe dankbar!
AW: VBA: Suche in anderen VBA Quelltexten
23.08.2010 11:59:45
Christian
..daher Frage noch offen
sehr gefährlich!
23.08.2010 12:59:50
Rudi
Hallo,
Mappe 4 muss geöffnet sein.
Sub prcStart()
CodeErsetzen "Mappe4", "Hallo", "Test"
End Sub

Sub CodeErsetzen(sWKB As String, sMatch As String, sReplace As String)
Dim vbc As Object, iCounter As Long, wkb As Workbook
Set wkb = Workbooks(sWKB)
For Each vbc In wkb.VBProject.VBComponents
With vbc.CodeModule
For iCounter = 1 To .CountOfLines
If InStr(.Lines(iCounter, 1), sMatch) > 0 Then
.ReplaceLine iCounter, Replace(.Lines(iCounter, 1), sMatch, sReplace)
End If
Next
End With
Next vbc
End Sub

Gruß
Rudi
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige