Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makros in ComboBox auflisten

Makros in ComboBox auflisten
25.04.2005 14:28:16
Matthias
Hallo Leute
Ich möchte alle Makros in einer ComboBox auflisten. Ich will ein bestimmtes Makro aus der Liste auswählen und seinen Namen in einer Stringvariable speichern können.
Kann mir jemand sagen wie ich das machen könnte?
Grüsse Matthias

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

Betreff
Datum
Anwender
Anzeige
AW: Makros in ComboBox auflisten
25.04.2005 14:39:43
u_
Hallo,
mal als Anregung:

Private Sub Makroliste()
Dim vbc As Object, sh As Worksheet
Dim iRow As Integer, iCol As Integer, iCounter As Integer
Set sh = ActiveWorkbook.Sheets(1)
sh.Cells.Clear
iRow = 1
iCol = 1
For Each vbc In ActiveWorkbook.VBProject.VBComponents
With vbc.CodeModule
For iCounter = 1 To .CountOfLines
If .ProcOfLine(iCounter, 0) > "" Then
If Trim(.Lines(iCounter, 1)) Like "Sub *" Then
sh.Cells(iRow, iCol).Value = .ProcOfLine(iCounter, 0)
iRow = iRow + 1
End If
End If
Next iCounter
End With
Next vbc
sh.Range("A1").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers
sh.Columns.AutoFit
End Sub

Gruß
Anzeige
AW: Makros in ComboBox auflisten
25.04.2005 15:12:46
Matthias
Hallo
Der Code ist zwar interessant und erstellt auch eine Liste, aber ich bringe die Liste nicht ins DopDown Feld.
Matthias
AW: Makros in ComboBox auflisten
26.04.2005 09:47:07
Matthias
Hallo
Hat keiner eine Lösung für mich?
Grüsse Matthias

Links zu Excel-Dialogen

ComboBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige