Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
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
400to404
400to404
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Menueintrag unter 'Datei'

Forumthread: Menueintrag unter 'Datei'

Menueintrag unter 'Datei'
Berndi
Gibt es unter VBA eine Möglichkeit einen Menueintrag in dem PullDown-Menu 'Datei' hinzu zu fügen ?
Wenn ja, wie ?
Danke schonmal
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Menueintrag unter 'Datei'
Nepumuk
Hallo Berndi,
beispielsweise so:
Option Explicit Private Sub Workbook_Open() Dim myCommandBarPopup As CommandBarPopup, myCommandBarButton As CommandBarButton Set myCommandBarPopup = Application.CommandBars("Worksheet Menu Bar").FindControl(ID:=30002) Set myCommandBarButton = myCommandBarPopup.Controls.Add(Type:=msoControlButton, Temporary:=True) With myCommandBarButton .BeginGroup = True .Caption = "Drucken in Datei" .OnAction = "Drucken_in_Datei" .Style = msoButtonCaption End With End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim myCommandBarPopup As CommandBarPopup Set myCommandBarPopup = Application.CommandBars("Worksheet Menu Bar").FindControl(ID:=30002) On Error Resume Next Do Err.Clear myCommandBarPopup.Controls("Drucken in Datei").Delete Loop Until Err.Number <> 0 End Sub
Gruß
Nepumuk
Anzeige
AW: Menueintrag unter 'Datei'
Berndi
Das funktioniert ja einwandfrei !
Kann man den Menüeintrag auch von der Position her verschieben ?
AW: Menueintrag unter 'Datei'
Nepumuk
Hallo Berndi,
die Position bestimmst du mit dem Before - Parameter.
Set myCommandBarButton = myCommandBarPopup.Controls.Add(Type:=msoControlButton, Before:=5, Temporary:=True)
Gruß
Nepumuk
Anzeige
;

Forumthreads zu verwandten Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
VBA Ausgabe in neue Datei
MarkusL

Hallo,
ich habe folgendes Problem:
In einer Datei befinden sich nachfolgende Datensätze
Jahr Monat Feld_1 Feld_2 Feld_3 Feld_4 Feld_5 usw.
es sollen nun per VBA nach Abfrage von Jahr und Monat ein neuer Datensatz in einer neuen Datei erzeugt werden, der allerdings nur noch die F...
08.08.2008 17:42:00
Thread-ID: 1000377
3 Beiträge
Anzeige
Datei oeffnet sich in Entwurfsmodus (Optionsbox)
Alex

Hi @ all!
Also ich weiss nicht ob ich damit hier richtig bin und wenn nicht dann sorry, dacht ich versuchs einfach mal nach zwei Tagen Buecher waelzen...
Also ich habe ein Worddokument, dass ein Fragebogen sein soll, sowohl mit Bewertungsfragen von 1 - 5 als auch mit offenen Fragen...!<...
14.08.2008 15:21:17
Thread-ID: 1001886
10 Beiträge
automatische übertragung in neues tabellenblatt
tomtom

Also zuerst mal, wollt ich sagn dass ich nur mit vb 8.0 bis jetzt ein paar spielereien wie Taschenrechner und so gemacht habe. Also falls das bei mitm vb-excel nicht klappt muss ich halt nochmal nachfragen...
Also nun zu meinem Problem:
Und zwar hab ich eine Liste mit Artikel und in de...
19.08.2008 22:57:53
Thread-ID: 1003053
3 Beiträge
Duplikate, Zeilen einfuegen...
Dirk

Hallo euch allen,
bin mal wieder an einem Punkt angelangt, wo ich allein nicht weiterkomme u. Gefahr laufe, frühzeitig zu ergrauen... ;-)
Eine detaillierte Beschreibung befindet sich in dieser Beispielmappe (gezippt, 2 Dateien).
Folgende Themen werden berührt:
-- csv-Import in...
22.08.2008 20:41:00
Thread-ID: 1004001
15 Beiträge
Thema: automatische übertragung in neues tabellenb
tomtom

hatte dazu schon einen beitrag, man kann aber anscheinend nichts neues dazuschreiben wenn er schon etwas älter ist.
Hier der link: https://www.herber.de/forum/archiv/1000to1004/t1003053.htm
Jedenfalls habe ich noch eine Frage dazu:
Und zwar hängen all diese Artikelzeilen die ins Ta...
27.08.2008 21:34:00
Thread-ID: 1005203
2 Beiträge
Anzeige
UDF - inkl. Übergabe der aktuellen Position
Peter

Guten Tag
Ich möchte selbst eine Funktion basteln, scheitere jedoch schon bei Grundlegendem.
In meiner Tabelle habe ich einen Spaltenbereich mit "Identifier" benannt. Dieser kann sich in Spalte O, P, Q etc.. befinden.
Nun möchte ich in der gleichen Tabelle mittels Funktion den Bezug...
10.09.2008 11:06:00
Thread-ID: 1008684
11 Beiträge
QueryTabels Internet Timeout
Peter

Folgende Aufgabe:
Ich hole mir via unten stehender Webabfrage Daten aus dem Internet.
Nun kommt es hin und wieder mal vor, dass die Abfrage beim Refresh hängen bleibt und ich VBA mit ESC stoppen muss.
Gerne hätte ich einen Timer, der z.B. nach 5 Sekunden aus der Abfrage aussteigt u...
23.09.2008 14:42:00
Thread-ID: 1011746
2 Beiträge
Anzeige
Daten aus Zellbereich in eine neue Arbeitsmappe
André

Für eine "Tägliche Auswertung" suche ich ein Makro.
Meine erste Idee war es, hier im Forum zu suchen, ob es da nicht schon was gibt. Leider erfolglos. Ich hab zwar Makros gefunden, die ein neues Wks erstellen mit genau den Vorgaben, die ich brauche und ein Makro zum Zellenbereich kopieren,...
26.09.2008 10:23:00
Thread-ID: 1012532
3 Beiträge
Anzeige
blaue Titellesite eines Fensters ausblenden
Dieterlem

Hallo Excelfreunde,
Ich habe eine Datei in der ich mit mehreren Fenstern arbeite.
Ich "teilte" diese Datei über "Fenster - Neues Fenster" und zeige drei verschiedene Tabellenblätter untereinander an. Hier wird dann bei allen Seiten die Titelleiste (inkl. Schließen-Button etc.) angezeigt...
30.09.2008 19:33:00
Thread-ID: 1013468
2 Beiträge
Schleife um ein Makro bauen
Matthias

Hallo zusammen,
ich habe folgendes Makro, das per vlookup auf ein zweites Tabellenblatt greift:
Sub importSortKey() Range("A2").select ActiveCell.FormulaR1C1 = _ "=IF(RC[1]="""","""",VLOOKUP(RC[1],Sortierschlüssel!C:C[1],2))" End Sub
Zur Formel: RC[1] = Zelle B2;
Ich würde d...
01.10.2008 11:26:00
Thread-ID: 1013562
7 Beiträge
Array-Formel in VBA-Code umwandeln?
Robert

Hallo,
ich bräuchte bitte eure Hilfe.
Hab folgende Formel...
Selection.FormulaArray = _
=IF(ROW(R[-107]C[-3])>COUNTA('1'!R5C[4]:R200C[4]),"""",INDEX('1'!R5C4:R200C4,SMALL(IF('1'!R5C[4]:R200C[4]<>"""",ROW(R1:R196),""""),ROW(R[-107]C[-3]))))"
Mein Problem ist, dass ic...
26.10.2008 10:56:28
Thread-ID: 1019326
13 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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