Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
672to676
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
672to676
672to676
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Im VBA-Modul Befehlscode austauschen!

Im VBA-Modul Befehlscode austauschen!
26.09.2005 10:12:03
Holger
Hallo zusammen,
wie kann ich es automatisieren, dass ich per Click auf einen Button, eine Bestimmte Codezeile im VBA-Editor gegen eine andere austausche?
Quasi das selbe, was ich im VBA-Editor mit Suchen-Ersetzen mache, halt nicht über den Weg sondern, das ich das mit einem Button aus Excel heraus machen kann.
Ist dieses möglich? Würde mich über Hilfe sehr freuen.
MfG
Holger Wächter

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 11:00:10
Holger
Danke,
das habe ich gesucht. Hat geklappt. Wie bekomme ich es jetzt nur hin, das er alle Module durchsucht und nicht nur ein bestimmtes:
With ThisWorkbook.VBProject.VBComponents("Kalkulation").CodeModule
Was muss ich anstatt VBComponents("Kalkulation") schreiben, damit er nicht nur das Modul Kalkulation durchsucht?
MfG
Holger Wächter
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 11:19:33
Matthias
Hallo Holger,

Dim vbc
For Each vbc In ThisWorkbook.VBProject.VBComponents
With vbc.CodeModule
End With
Next vbc

Gruß Matthias
Anzeige
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 11:27:59
Holger
Super,
auch das konnte ich nun umsetzen, wenn mir jetzt noch jemand sagen könnte, wie ich vorher den Projektschutz entfernen kann und danach wieder setzen kann, dann hätte ich es komplett.
MfG
Holger Wächter
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 11:30:51
Fred
Hi,
dafür gibt es keine Methode, der einzige Weg ist eine Sendkeys- Anweisung.
Wie es geht, findest du in der Recherche.
mfg Fred
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 11:35:51
Matthias
Hallo Holger,
geht nur mit SendKeys.
Bei Excel XP:

Sub VBASchutzAus(ByVal kwVBA As String) 'kwVBA = VBA-Kennwort
AppActivate Application.Caption
Application.SendKeys "%{F11}%xi" & kwVBA & "{RETURN}{RETURN}%{q}", True
End Sub

Gruß Matthias
Anzeige
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 12:07:48
Holger
Auch das funktioniert super,
wie kann ich mit sendkeys denn nun das Passwort wieder setzen.
MfG
Holger Wächter
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 12:35:52
Matthias
Hallo Holger,

Sub VBASchutzEin()
Application.SendKeys "%{F11}%xi^{PGDN}{a}{RETURN}%{q}", True
End Sub

Gruß Matthias
AW: Im VBA-Modul Befehlscode austauschen!
26.09.2005 13:41:09
Holger
Vielen Dank für die Hilfen.
MfG
Holger Wächter

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige