Does anyone know a fast way to replace a VBA string IN a VBA module by using VBA code? So I'm not talking about replacing strings in worksheets...
Suppose that I have workbook A with the following sub in a codemodule:
Sub Example()
MsgBox "Just an example.", vbOKOnly
End Sub
So now I want to use VBA code in workbook B to change the string "Example" in the codemulde of A to "ShowMessage", so that the new sub in A will be:
Sub ShowMessage()
MsgBox "Just an example.", vbOKOnly
End Sub
Macro security settings aside, I know you need a reference to the MS VBA Extensibilty, but my problem is the following. The object "codemodule" has no method "replace".
So these are valid codelines:
Workbooks("A.xls").VBProject.VBComponents(1).CodeModule.Find
Workbooks("A.xls").VBProject.VBComponents(1).CodeModule.ReplaceLine
but:
Workbooks("A.xls").VBProject.VBComponents(1).CodeModule.Replace
doesn't exist...
All suggestions are welcome. Thanks in advance.
shoba
Bookmarks