Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Im Makro Sachen aus den Symbolleisten wählen





Frage

Ich möchte über ein Makro Funktionen aus der Symbolleichte wählen können, z.B. ´öffnen´ oder die Farbenpalette. Also das ich dann über eine Befehlsschaltfläche eine Farbe auswählen kann und eine Datei, die ich öffnen will. Ich weiss leider nicht ob das überhaupt möglich ist, oder ob des dafür andere Funktionen gibt. Ich hoffe ihr könnt mir weiter helfen. Danke schon mal, Gruß Dungemond

Antwort 1 von fürLau

Hallo

Guck Dir ´mal die Application.Dialogs(Argumente) an.

Private Sub CommandButton1_Click()
Application.Dialogs(xlDialogOpen).Show
Application.Dialogs(xlDialogFormatFont).Show
End Sub


Dieses Beispiel öffnet den Datei-Öffnen-Dialog, und anschliesend die Textformatierung.

Gruß[h3]{[h1]Ó¤[sup...fürLau

Antwort 2 von Flupo

Du gehst das Problem imho von der falschen Seite an.
Wenn du die Farbe eines Objektes ändern willst, dann tu das doch mit den direkten Befehlen für dieses Objektes. Welche das sind, lässt sich recht einfach über die Aufzeichnung eines Makros herausbekommen. Führe dabei genau die Schritte aus, die später das Makro übernehmen soll und guck dir dann den Code dazu an.
Für die Sachen, die dann eine Benutzereingabe erfordern, gibts die Standard-Dialoge aus Antwort 1.

Gruß Flupo

Antwort 3 von Dungemond

Danke schon mal.

Das Problem mit der Farbe ist halt, ich will es wie so eine kleine Oberfläche haben und habe Tabellen mit Daten die ich in einem Digramm darstellen will. Ich will nun die Auswahl der Farben noch offen lassen, so das man die Farbe der Kurfe wählen kann und dann das Diagramm erstellen lässt.

Gruß Dungemond

Antwort 4 von Dungemond

Hab das Problem mit der Farbe soeben gelöst.
Die Farbpalette bekommt man über
Application.CommandBars("Fill Color").Visible = True

Danke nochmal ;)

Antwort 5 von Dungemond

Habe noch eine Funktion gefunden, die vielleicht sogar besser ist. Für alle die das selbe Problem haben.

Application.Dialogs(xlDialogPatterns).Show

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: