Office: Entwurfsmodus per VBA ein- und ausschalten

Hallo zusammen,

ich möchte gerne per VBA Zeilen kopieren. Das ist auch kein Problem. Leider kopiert er alles (ich habe in der Zeile einpaar Optionsfelder) nur wenn ich im Entwurfsmodus bin.
Ich möchte gerne das die Optionsfelder mitkopiert werden.

Ich habe auch was gefunden. Das funktioniert aber nicht für mein Fall da das Makro weiterlaufen soll.

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

Sub EntwurfAus()
CommandBars("control Toolbox").Controls(1).Reset
End Sub

Vielleicht hat jemand eine Idee?

Gruss und Dank

Daniel

:)

 

Hi Daniel,

vielleicht hilft dies hier:
Code:

 

Moin, Daniel,

dann wird Dir wohl nur übrig bleiben, Deine Optionsschaltflächen nachträglich zu kopieren...

Da stellt sich dann die Frage, ob sie nicht gleich per VBA neu angelegt werden sollen:
Code:

 

Moin, Karin,

ich glaube nicht, dass Daniel die Symbolleiste ausblenden möchte...

 

\@ jinx, @ Daniel

bei mir funktioniert folgendes mit dem Recorder aufgezeichnete (nicht von "Select" bereinigte) Makro, wenn ich die Fragestellung richtig verstanden habe:

Code:

 

Moin, Karin,

blende bitte vor der Ausführung des Makros (keine Schaltfläche, sondern Optionsbutton) die Symbolleiste Steuerelement-Toolbox ein - ich verwende nur Excel2002, aber bei mir ist diese eigentlich in meiner Konstellation vorhandene Symbolleiste danach ausgeblendet...

 

Hi jinx,

1. Mein Code funktioniert nur dann, wenn außer dem Optionsfeld noch ein CommandButton im Bereich vorhanden ist. Ohne CommandButton funktioniert nur dein Code.

2. Bei der Aufzeichnung des Makros war die Auswahl des CommandButtons nur möglich, wenn die Steuerelemente-Toolbox eingeblendet und der Entwurfsmodus aktiviert war. Deshalb auch die beiden Zeilen
Code:

Aber jetzt funktinoiert dieser Code komischerweise auch generell ohne diese Zeilen.

 

Hallo Zusammen,

ich konnte mein Problem etwas umgehen und muss die Schaltflächen nachträglich einfügen.

Gruss und Dank

Daniel