Zitat
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?
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
Hallo Peter,
das schein nur bedingt zu funktionieren.
Zitat
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.
Hallo,
ZitatSieht aus wie eine Abgrenzung zur nächsten Spalte.
was pasiert wenn du deinem Code hinzufügst ...
Me.Liste_Werkstoffe.ColumnCount = 1
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.