Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

DropDown

Forumthread: DropDown

DropDown
20.06.2006 15:40:05
BGrabe
Hallo Zusammen,
ich suche die Syntax zum Einfügen von Formular Dropdowns mit gleichzeitiger Benennung und Zuweisung (Position) und Größenanpassung an eine bestimmte Zelle.
Geht das direkt und wenn wie?
Grüße
Berthold
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: DropDown
20.06.2006 15:58:49
K.Rola
Hallo,
Beispiel:
Option Explicit
Sub dropdown()
Dim ddown As Object
Set ddown = ActiveSheet.DropDowns.Add([c2].Left, [c2].Top, 100, 15.75)
With ddown
.LinkedCell = "$A$1"
.OnAction = "Testmakro"
.ListFillRange = "$B$1:$B$10"
End With
End Sub
Sub Testmakro()
MsgBox "Dropdown"
End Sub

Gruß K.Rola

Der Fleiß ist die Wurzel aller Häßlichkeit.

Oscar Wilde


Anzeige
AW: DropDown
20.06.2006 16:11:42
B Grabe
Vielen Dank K. Rola,
habe aber noch Fragen zum Detail:
Kann das Dopdown der genau der Zellgröße angepaßt werden? Und wie müßte die Syntax dann angepaßt werden?
Set ddown = ActiveSheet.DropDowns.Add([c2].Left, [c2].Top, 100, 15.75)
Danke
Berthold
AW: DropDown
20.06.2006 16:11:50
B Grabe
Vielen Dank K. Rola,
habe aber noch Fragen zum Detail:
Kann das Dopdown der genau der Zellgröße angepaßt werden? Und wie müßte die Syntax dann angepaßt werden?
Set ddown = ActiveSheet.DropDowns.Add([c2].Left, [c2].Top, 100, 15.75)
Danke
Berthold
Anzeige
AW: DropDown
20.06.2006 16:14:50
K.Rola
Hallo,
Set ddown = ActiveSheet.DropDowns.Add([c2].Left, [c2].Top, [c2].Width, [c2].Height)
Gruß K.Rola
AW: DropDown
20.06.2006 16:18:20
BGrabe
Hallo K.Rola,
Prima, genau was ich gesucht habe.
Danke,
Berthold
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige