Listbox Position

[accessy]

Private Sub Liste_Werkstoffe_Click()
   Me.Liste_Werkstoffe.Left = 10.8
   Me.Liste_Werkstoffe.Top = 10.7
   Me.Liste_Werkstoffe.Height = 13.6
   Me.Liste_Werkstoffe.Width = 7
   Me.Material = Liste_Werkstoffe.Value
   Me.Material.SetFocus
   Me.Liste_Werkstoffe.Visible = False
End Sub

Also das scheint hier in Access so nicht zu funktionieren.

Es sind insgesamt 11 Listboxen, die ich in diesem Formular habe.
Gehe ich in den Editmodus des Formulars, würden alle Listboxen die ganzen Textboxen verdecken.
Deshalb habe ich die Listbox schön klein "zusammengefaltet" und in die Ecke des Formulars gelegt.

Aber die Positionsvorgaben .TOP und .LEFT scheint Access gar nicht zu lesen.
Eine Fehlermeldung erhalte ich auch nicht.

Was muss ich ändern?

[database]

Die Eigenschaftswerte für die Positionen werden normalerweise in Twips angegeben.
567 Twips = 1 cm

somit sollte der Wert 6124 für die Eigenschaft LEFT und 6067 für TOP schon funktionieren.
CM-Werte werden eigentlich nur im Entwurfsmodus des Formulars in den Formateigenschaften angegeben, in VBA Twips

[accessy]

Hallo Peter,

das schein nur bedingt zu funktionieren.

Private Sub Material_DblClick(Cancel As Integer)
   Me.Liste_Werkstoffe.Left = 6124
   Me.Liste_Werkstoffe.Top = 6068
   Me.Liste_Werkstoffe.Height = 7712
   Me.Liste_Werkstoffe.Width = 3850
   Me.Liste_Werkstoffe.Visible = True
End Sub

Wenn sich die Listbox öffnet, dann erscheint eine Art vertikale Linie.
Sieht aus wie eine Abgrenzung zur nächsten Spalte.
Aber es gibt definitiv nur EIN Feld.

Dann habe ich mal in den Eigenschaft die voreingestellte Breite des Felds von 2,54cm ganz rausgenommen.
Aber das bewirkte auch nichts.

Ich denke, das wird hier in Access nicht so gehen wie ich es mir vorstelle.
Scheint wohl kein Weg daran vorbeizufühen, die Listboxen in ihrer benötigten Größe
wieder an ihrer Stelle zu platzieren.

[database]

Hallo,

Sieht aus wie eine Abgrenzung zur nächsten Spalte.

was pasiert wenn du deinem Code hinzufügst ...

Me.Liste_Werkstoffe.ColumnCount = 1

[accessy]

Das ColumnCount = 1 brachte nichts.
Ich habe jetzt die Listboxen auf ihre benötigte Breite im Entwurfsmodus unter den Textboxen angeordnet platziert.
Die Left, Top, Height und Width Anweisungen funktionieren mit diesem Umrechnungsfaktor 567.

Dennoch vielen Dank für die Hinweise.