Also wie der Titel schon sagt, schließt sich meine UserForm, sobald ich über die ReplaceLine-Methode CodeZeilen umschreiben möchte. Das Passiert im Workbook_SheetSelectionChange-Event, also mit dem Klick auf eine Zelle.
ReplaceLine-Methode:
With ThisWorkbook.VBProject.vbComponents(ThisWorkbook.CodeName).CodeModule
For x = 1 To .countoflines
If Trim(.Lines(x, 1)) = alteSpalte Then
.ReplaceLine x, neueSpalte
End If
Next x
End With
*Ich wusste leider nicht wie ich den Code hier schön einfügen kann (stand nicht unter den FAQs)
Gibt es eine Möglichkeit das Schließen der UserForm zu unterbinden?
Und noch eine Frage am Rande. Wie müsste der Befehl für vbComponents(ThisWorkbook.CodeName) lauten, damit nur im Event SelectionChange Zeilen geändert werden bzw. nach Übereinstimmungen gesucht wird.
Vielen Dank schonmal,
Gala