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
Anzeige