Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Entwicklermodus durch Makro

Forumthread: Entwicklermodus durch Makro

Entwicklermodus durch Makro
09.02.2018 09:09:33
Mario
Hallo Forum!
Ich habe eine kleine Frage zu der ich noch keine Antwort finden konnte. Jetzt probier ich es mal hier :)
Gibt es einen weg durch Makros in den Entwicklermodus zu wechseln?
MfG
Mario
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Entwicklermodus durch Makro
09.02.2018 09:43:31
ChrisL
Hi Mario
Application.VBE.CodePanes(1).Show
n.b. Shortcut Alt+F11
cu
Chris
VBA-Editor oder Entwurfsmodus?
09.02.2018 09:47:48
ChrisL

Sub EntwurfEin()
CommandBars("control Toolbox").Controls(1).Execute
End Sub

Sub EntwurfAus()
CommandBars("control Toolbox").Controls(1).Reset
End Sub
http://www.ms-office-forum.net/forum/showthread.php?t=172281
Anzeige
AW: Entwicklermodus durch Makro
09.02.2018 09:51:36
mumpel
Hallo!
Über die ExecuteMso-Methode:
Public Sub EntwurfsmodusAktivieren()
    EntwurfsmodusEinAus True
End Sub

Public Sub EntwurfsmodusDeaktivieren()
    EntwurfsmodusEinAus False
End Sub

Public Sub EntwurfsmodusEinAus(bEnter As Boolean)
Dim cbrs As CommandBars
Const sMsoName As String = "DesignMode"

    Set cbrs = Application.CommandBars
    If Not cbrs Is Nothing Then
        If cbrs.GetEnabledMso(sMsoName) Then
            If bEnter <> cbrs.GetPressedMso(sMsoName) Then
                cbrs.ExecuteMso sMsoName
            End If
        End If
    End If
End Sub

VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media

Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0

Gruß, René
Anzeige
AW: Entwicklermodus durch Makro
09.02.2018 11:37:41
Luschi
Hallo Mumpel,
Dein Code funktioniert, aber mal sehen ob M$ das CommandBar-Objekt in Excel 2019 auch
sperrt, so wie es in Outlook bereits seit 2013 der Fall ist.
Dann geht die große Suche wieder los. Wenn ich nur daran denke, wie lange im im Internet nach einem funktionieren Code für eine individuelle Mail-Signatur gesucht habe, um es dann doch selber zu programmieren - bis Outluuk 2010 war das ein Kinderspiel mit dem Commandbar-Objekt.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Entwicklermodus durch Makro
09.02.2018 13:02:25
mumpel
Das glaube ich nicht. Die ExecuteMso-Methode wird wohl erhalten bleiben, in Outlook gab es die noch nie.
;
Anzeige

Infobox / Tutorial

Entwicklermodus in Excel durch Makros aktivieren


Schritt-für-Schritt-Anleitung

Um den Entwicklermodus in Excel durch ein Makro zu aktivieren, kannst du die folgenden Schritte befolgen:

  1. VBA-Editor öffnen: Drücke Alt + F11, um den VBA-Editor zu öffnen.

  2. Neues Modul erstellen: Klicke im Menü auf Einfügen und wähle Modul.

  3. Makro-Code einfügen: Füge den folgenden Code ein, um den Entwicklermodus zu aktivieren:

    Sub EntwurfEin()
        CommandBars("control Toolbox").Controls(1).Execute
    End Sub
    
    Sub EntwurfAus()
        CommandBars("control Toolbox").Controls(1).Reset
    End Sub
  4. Makro ausführen: Du kannst das Makro nun ausführen, um in den Entwicklermodus zu wechseln.


Häufige Fehler und Lösungen

  • Fehler: Makro wird nicht ausgeführt
    Lösung: Überprüfe, ob Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu Datei -> Optionen -> Sicherheitscenter -> Einstellungen für das Sicherheitscenter -> Einstellungen für Makros und aktiviere die Option, die Makros zulässt.

  • Fehler: CommandBars nicht gefunden
    Lösung: Stelle sicher, dass du die richtige Excel-Version verwendest, da das CommandBar-Objekt möglicherweise in neueren Versionen eingeschränkt ist.


Alternative Methoden

Eine weitere Methode, um den Entwicklermodus zu aktivieren, ist die Verwendung der ExecuteMso-Methode. Hier ist ein Beispiel:

Public Sub EntwurfsmodusAktivieren()
    EntwurfsmodusEinAus True
End Sub

Public Sub EntwurfsmodusDeaktivieren()
    EntwurfsmodusEinAus False
End Sub

Public Sub EntwurfsmodusEinAus(bEnter As Boolean)
    Dim cbrs As CommandBars
    Const sMsoName As String = "DesignMode"

    Set cbrs = Application.CommandBars
    If Not cbrs Is Nothing Then
        If cbrs.GetEnabledMso(sMsoName) Then
            If bEnter <> cbrs.GetPressedMso(sMsoName) Then
                cbrs.ExecuteMso sMsoName
            End If
        End If
    End If
End Sub

Praktische Beispiele

Hier sind einige praktische Beispiele, wie du den Entwicklermodus in Excel nutzen kannst:

  • Button erstellen: Du kannst Schaltflächen auf einem Arbeitsblatt hinzufügen, um bestimmte Makros auszuführen, ohne den VBA-Editor öffnen zu müssen.
  • Formulare erstellen: Mit dem Entwicklermodus kannst du Formulare erstellen, die Benutzereingaben annehmen und verarbeiten.

Tipps für Profis

  • Vergewissere dich, dass du die aktuellsten Updates von Excel installiert hast, um alle Funktionen des Entwicklermodus zu nutzen.
  • Experimentiere mit verschiedenen Makros, um deine eigenen benutzerdefinierten Funktionen zu erstellen.
  • Beachte, dass das Deaktivieren des Entwicklermodus möglicherweise über die gleichen Methoden wie das Aktivieren geht. Verwende die entsprechenden Makros, um den Entwicklermodus zu deaktivieren.

FAQ: Häufige Fragen

1. Wie kann ich den Entwicklermodus deaktivieren?
Du kannst ein ähnliches Makro verwenden, um den Entwicklermodus zu deaktivieren. Nutze den Code für EntwurfAus() oder EntwurfsmodusDeaktivieren().

2. Ist der Entwicklermodus in allen Excel-Versionen verfügbar?
Ja, der Entwicklermodus ist in den meisten Excel-Versionen verfügbar, jedoch können einige Funktionen wie das CommandBar-Objekt in neueren Versionen eingeschränkt sein.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige