Microsoft Excel

Herbers Excel/VBA-Archiv

Makro läuft seit Excel 2007 nicht mehr | Herbers Excel-Forum


Betrifft: Makro läuft seit Excel 2007 nicht mehr von: Bernd
Geschrieben am: 13.08.2012 18:22:29

Hallo werte Excel-Community,

nachfolgendes Makro - das ein Inhaltsverzeichnis erstellt - lief unter Office 2003 problemlos. Nur jetzt, mit Excel 2007, weigert es sich hartnäckig, das Inhaltsverzeichnis zu erstellen (das Ausführen von Makros habe ich selbstverständlich erlaubt). Weiss jemand Rat? Herzlichen Dank vorab und Gruß, Bernd

Sub Menu_einfügen()
  Dim NeuesMenue As CommandBar, Pop1 As CommandBarButton, sh As Worksheet
    On Error Resume Next
    Application.CommandBars("Tabellen").Delete
    On Error GoTo 0
    
    Set NeuesMenue = CommandBars.Add(Name:="Tabellen", temporary:=True)
    
    With NeuesMenue
      .Position = msoBarFloating
      .Visible = True
    End With
    
    For Each sh In ActiveWorkbook.Sheets
      Set Pop1 = NeuesMenue.Controls.Add(Type:=msoControlButton)
      With Pop1
        .Style = msoButtonCaption
        .Caption = Left(sh.Name & "                ", 16)
        .Tag = sh.Name
        .OnAction = "Start"
        .BeginGroup = True
      End With
    Next sh
      Set Pop1 = NeuesMenue.Controls.Add(Type:=msoControlButton)
      With Pop1
        .Style = msoButtonCaption
        .Caption = "Auffrischen"
        .OnAction = "Menu_einfügen"
        .BeginGroup = True
      End With
  NeuesMenue.Width = 1
End Sub

  

Betrifft: Ach nee, CommandBars! Schon mal was von ... von: Luc:-?
Geschrieben am: 13.08.2012 18:34:31

Ribbons gehört, Bernd?
Thema haben wir schon seit 4 Jahren im Archiv!
Gruß Luc :-?


  

Betrifft: AW: Ach nee, CommandBars! Schon mal was von ... von: mumpel
Geschrieben am: 13.08.2012 22:13:04

Hallo!

4 Jahre? Ich habe 6 gezählt. ;-)

Gruß, René


  

Betrifft: War vorsichtig geschätzt! ;-) von: Luc:-?
Geschrieben am: 14.08.2012 01:09:07

:-?


  

Betrifft: AW: Makro läuft seit Excel 2007 nicht mehr von: Hajo_Zi
Geschrieben am: 13.08.2012 18:45:00

schaue unter Add Ins nach.

GrußformelHomepage


  

Betrifft: warum wird man denn jetzt hier beleidigt? von: Bernd
Geschrieben am: 14.08.2012 16:48:02

... ich wusste nicht, dass man im Herber-Excel-Forum neudings beleidigt wird.

Erstens, habe ich im Archiv gesucht, und nicht nur ein paar Sekunden. Zweitens schätzt euch glücklich, wenn ihr so Freaks seid. Aber sich über andere lustig zu machen, finde ich daneben.

Grüße, Bernd


  

Betrifft: AW: warum wird man denn jetzt hier beleidigt? von: Hajo_Zi
Geschrieben am: 14.08.2012 17:14:44

Hallo Bernd,

hast Du den vorgeschlagenen Weg getestet. Mir scheint NEIN.

Gruß Hajo


  

Betrifft: AW: warum wird man denn jetzt hier beleidigt? von: mumpel
Geschrieben am: 14.08.2012 20:23:24

Niemand hat Dich beleidigt. Man hat Dich lediglich darauf hingewiesen, dass es ab Office 2007 keine Symbolleisten mehr gibt und Du im Archiv nachsehen sollst.

RibbonX-Workshop


  

Betrifft: ...denn das war bei DEM zeitl Abstand ja ... von: Luc:-?
Geschrieben am: 14.08.2012 20:32:43

…wohl wirklich 'ne „Mustopp“-Frage… ;->