Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
15.10.2025 13:24:59
Werte aller 4 Zeilen eintragen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anordnung von eigenen Symbolen in Symbolleiste

Forumthread: Anordnung von eigenen Symbolen in Symbolleiste

Anordnung von eigenen Symbolen in Symbolleiste
28.07.2004 14:46:50
eigenen
Hallo Excelperten,
ich habe einige Buttons erstellt, die ich nun in der Symbolleiste habe. Ich möchte diese aber nebeneinander, nicht untereinaner angeordnet haben.
Ist das in VBA möglich?
Gruß
Marcl
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Anordnung von eigenen Symbolen in Symbolleiste
eigenen
Ist die Leiste per Hand oder Code erstellt worden? Width und Height festlegen und Schutz so einstellen, dass die Leiste in der Größe nicht mehr geändert werden kann.
Protection = msoBarNoResize
Ulf
AW: Anordnung von eigenen Symbolen in Symbolleiste
eigenen
Moin Ulf,
die hab ich mit VBA geschrieben:

Sub CreateMenu()
Dim CB As CommandBar
Dim CBP As CommandBarPopup
Set CB = Nothing
On Error Resume Next
Application.CommandBars("IC-druck").Delete
On Error GoTo ErrorHandle
Set CB = Application.CommandBars.Add(Name:="IC-druck", Position:=msoBarTop)
Set CBP = CB.Controls.Add(Type:=msoControlPopup, temporary:=False)
With CBP
.Caption = "Druck und pdf-Druck"
.OnAction = "pdfdruck"
End With
CB.Visible = True
Exit Sub
ErrorHandle:
MsgBox Title:="Es ist ein Fehler aufgetreten", _
Prompt:="Fehlernummer: " & Err.Number & vbCrLf & _
"Fehlerbeschreibung: " & Err.Description, _
Buttons:=vbCritical
End Sub

Außerdem nervt die Leiste "Überarbeiten".
Kann ich die dauerhaft ausblenden. Wird bei jedem Öffnen von Excel angezeigt :-(
Danke
Gruß
Marcl
Anzeige
AW: Anordnung von eigenen Symbolen in Symbolleiste
eigenen
CB.Visible = True
CB.Left = 0
Ulf
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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