Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
788to792
788to792
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Postion benutzerdefinierter Toolbars festlegen

Forumthread: Postion benutzerdefinierter Toolbars festlegen

Postion benutzerdefinierter Toolbars festlegen
04.08.2006 13:27:48
Martin
Hallo Excelianer!
ich brauche nach langer erfogloser Versuche und Recherchen Eure Hilfe: Ich erzeuge eine benutzerdefinierte Toolbar so:
Toolbars.Add Name:="Toolbox"
Toolbars("Toolbox").Visible = True
Wie kann ich festlegen, dass diese Toolbar unterhalb des Blattregisters und oberhalb der Statusleiste integriert wird. Bis jetzt musste ich die Toolbar immer an meine gewünsche Position mit der Maus ziehen! Ich vermute mal, dass man das mit "Toolbars("Toolbox").Position = XXXXXXXX" hinbekommt. Falls das der richtige Ansatz sein sollte, was muss ich für das XXXXXXXX einsetzen?
Wäre für Vorschläge sehr dankbar!
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Postion benutzerdefinierter Toolbars festlegen
04.08.2006 13:32:03
u_
Hallo,
ein Toolbar-Objekt kenne ich nicht. Kannst du mich belehren?
Gruß
Lesen gefährdet die Dummheit
AW: Postion benutzerdefinierter Toolbars festlegen
04.08.2006 13:39:11
Martin
Hallo u_
hier mal meine Toolbars:

Sub makro1()
Toolbars.Add Name:="Toolbox"
Toolbars("Toolbox").Visible = True
Toolbars("Toolbox").Width = 1527
With Application
.ShowToolTips = True
.LargeButtons = False
.ColorButtons = True
End With
With Toolbars("Toolbox")
.ToolbarButtons.Add Button:=238, Before:=1
.ToolbarButtons(1).OnAction = "Makro19"
.ToolbarButtons.Add Button:=14, Before:=2
.ToolbarButtons(2).OnAction = "Makro3"
.ToolbarButtons.Add Button:=172, Before:=3
.ToolbarButtons(3).OnAction = "Makro69"
.ToolbarButtons.Add Button:=9, Before:=4
.ToolbarButtons(4).OnAction = "Makro70"
.ToolbarButtons.Add Button:=248, Before:=5
.ToolbarButtons(5).OnAction = "Makro49"
.ToolbarButtons.Add Button:=3, Before:=6
.ToolbarButtons(6).OnAction = "Makro12"
.ToolbarButtons.Add Button:=4, Before:=7
.ToolbarButtons(7).OnAction = "Makro18"
.ToolbarButtons.Add Button:=207, Before:=8
.ToolbarButtons(8).OnAction = "Sicherheitsspeichern"
.ToolbarButtons.Add Button:=220, Before:=9
.ToolbarButtons(9).OnAction = "Makro2"
.ToolbarButtons.Add Button:=229, Before:=10
.ToolbarButtons(10).OnAction = "Auto_Schließen"
.ToolbarButtons(1).Name = "zur Hauptauswahl"
.ToolbarButtons(2).Name = "Schütze eingeben/auswerten"
.ToolbarButtons(3).Name = "Protokolle "
.ToolbarButtons(4).Name = "Mannschaftswertungen"
.ToolbarButtons(5).Name = "Schützen suchen"
.ToolbarButtons(6).Name = "Ansicht drucken"
.ToolbarButtons(7).Name = "Seitenansicht"
.ToolbarButtons(8).Name = "Programm speichern"
.ToolbarButtons(9).Name = "Einstellungen"
.ToolbarButtons(10).Name = "Programm beenden"
End With
Toolbars("Toolbox").ToolbarButtons(1).Pushed = True
CommandBars("Toolbox").Controls(5).BeginGroup = True
CommandBars("Toolbox").Controls(8).BeginGroup = True
CommandBars("Toolbox").Controls(5).FaceId = 46
End Sub

Anzeige
AW: Postion benutzerdefinierter Toolbars festlegen
04.08.2006 13:46:12
u_
Hallo,
aha! Handelt sich um ein ausgeblendetes Element. du solltest darauf verzichten (Kompatibilität) und statt dessen auf Commandbars zurückgreifen.
Zu deinem Prob:
CommandBars("Toolbox").Position = msoBarBottom
Gruß
Lesen gefährdet die Dummheit
Vielen Dank! Noch eine Frage zu deiner Antwort!
04.08.2006 13:50:32
Martin
Vielen Dank für Deine Hilfe! Was ist der Unterschied zwischen Toolbars und CommandBars?
Anzeige
;

Forumthreads zu verwandten Themen

Liste "definierter Namen" per VBA?
David

Hallo zusammen,
ist es per VBA möglich, die in einer Tabelle definierten Namen auszulesen, in einem neuen Sheet aufzulisten und daneben den/die mit dem Namen verbundene(n) Bereich bzw. Formel?
Ich würde mir gern bei umfangreichen Namensdefinitionen das Nachschauen im Menü ersparen, da j...
14.08.2008 12:15:44
Thread-ID: 1001809
5 Beiträge
LZF 1004 Anwendungs- oder objektdefinierter Fehler
Himmelsbach

Hallo zusammen,
Ich habe ein kleines Problem beim Einfügen eines Kommentars in ein Zelle.
Der Code lautet:
Sub vergleichen () dim icolmax as integer dim irowmax as integer dim icol as integer dim irow as integer dim kommentar$ icolmax = 16 irowmax = thisworkbook.worksheets("IASEK...
20.10.2008 20:20:00
Thread-ID: 1017794
6 Beiträge
Wochenenden und definierter Datumsbereich
Daniel

Hallo zusammen,
da meine letzte Fragestellung so super beantwortet wurde habe ich sogeich die nächste:
Wie kann man folgendes realisieren? Es sollen die Wochenenden und die Schulferien(die ich in einem separatem Tabellenblatt definiert habe) farblich hinterlegt werden.
Das Tabellen...
11.02.2009 17:14:00
Thread-ID: 1049704
3 Beiträge
Unnötiger Aufruf von Benutzerdefinierter Funktion
Benutzerdefinierter

Hallo!
Ich versuche schon seit 2 Tagen folgendes Problem zu lösen:
Ausgangslage:
Ich habe mehrere Benutzerdefinierte Funktionen (UDF) geschrieben. Diese beinhalten SQL-Abfragen auf eine Accessdatenbank. Insgesamt rufe ich diese Funktionen einige hunderte mal in meiner Mappe auf. Das...
11.03.2009 10:24:35
Thread-ID: 1058997
3 Beiträge
Anwendungs- oder objektdefinierter Fehler
Josef

Hallo!
Ich bekomme nach dem Start des Makros immer den Fehler Anwendungs- oder objektdefinierter Fehler.
Das Makro hatte bereits funktioniert . Ich hatte nur den Pfad geändert:
Im Ordner mit der Variable dokname3 befinden sich csv Dateien, welche dann eingelsen werden.
Wo könnte...
07.07.2009 10:00:05
Thread-ID: 1086825
6 Beiträge
Anwendungs- oder objektdefinierter Fehler
Josef

Hallo!
Ich bekomme nach dem Start des Makros immer den Fehler Anwendungs- oder objektdefinierter Fehler.
Das Makro hatte bereits funktioniert . Ich hatte nur den Pfad geändert:
Im Ordner mit der Variable dokname3 befinden sich csv Dateien, welche dann eingelsen werden.
Wo könnte...
07.07.2009 08:08:22
Thread-ID: 1086829
3 Beiträge
"Anwendungs- oder objektdefinierter Fehler"
eres

Hallo Excel-Freunde,
habe mir in die Standard-Symbolleiste eine benutzerdefinierte Schaltfläche eingebaut und dieser ein Makro aus der personl.xls zugewiesen. Diese Makro besteht nur aus einer Zeile, in der ich eine Datei öffne (also Workbooks.Open Filename:= ...)
In der zu öffnenden...
28.07.2009 13:18:05
Thread-ID: 1091892
7 Beiträge
Anzeige
verkette Liste als benutzerdefinierter Datentyp | Herbers Excel-Forum
suchehilfe
Hallo zusammen,
ich möchte mir eine verkettete Liste als benuterdefinierten Typ erstellen.
Nutze dazu folgenden Code: Type Element Inhalt As Integer nachfolger As Element End Type Type Liste Start As Element End Type Public Sub test() Dim A As Liste Dim d,e As Element A.Start = d d.Inhalt =...
06.02.2010 15:04:17
Thread-ID: 1136407
17 Beiträge
Benutzerdefinierter Typ nicht definiert
Bernd

Hallo zusammen,
ich erhalte bei Folgendem Code immer die meldung Fehler beim Kompilieren, Benutzerdefinierter Typ nicht definiert!
Option Explicit Private WithEvents Timer1 As APITimer Wisst ihr, was ich da tun muss, um den Fehler zu beheben?
Schöne Grüße, Bernd
09.02.2010 09:47:37
Thread-ID: 1136895
4 Beiträge
Anzeige
Benutzerdefinierter Typ
eric

Hallo,
ich möchte einen benutzerdefinierten Typ erstellen, so der Standart
Dim WithEvents ctlTb00601 As MSForms.TextBox
so soll der definierte Typ aussehen
Dim WithEvents ctlTb00601 As MSForms.TextBox1
geht das,wenn ja, dann wie ?
Danke im voraus ERIC
11.02.2010 20:34:53
Thread-ID: 1137905
2 Beiträge
Anzeige
Fehler beim Kompilieren - Benutzerdefinierter Typ
Himmelsbach

Hallo zusammen,
Leider habe ich keine Ahnung von VBA und soll nichts desto trotz eine aus meiner Sicht anspruchsvolle Logik programmieren.
Da eine reine textuelle Beschreibung nicht sonderlich hilfreich wäre, habe ich die Excelmappe beigelegt.
Jetzt aber zu meinem Problem:
Im Ta...
11.03.2010 19:06:04
Thread-ID: 1145179
3 Beiträge
Argumente in benutzerdefinierter Funktion
Jo

Hallo VBA Freunde,
ich habe eine Frage zu den Argumenten bei benutzerdefinierten Funktionen:
1)
Wenn ich ein k zu einem K bei den Argumenten verändere, tut sich ja automatisch das k
zu einem K verwandeln, jedesmal dort wo in der Funktion k auftaucht. (Bestätigung am Ende der Zei...
26.03.2010 01:06:27
Thread-ID: 1148590
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige