Combobox1.widt ile Açılan listesini eşitleme hk.

[hsayar]

resimdende görüleceği üzere Comboboxta açılan listenin genişli Combonun genişliğinden daha fazla oluyor. Ben eşit olmasını istiyorum ne yapmalıyım?

 

[Ayhan Ercan]

Merhaba

İşinize yararmı bilmem ama Comboboxun Propertiesinden ListWidth'i 20 pt yapıp deneyiniz...

 

[hsayar]

Merhaba

İşinize yararmı bilmem ama Comboboxun Propertiesinden ListWidth'i 20 pt yapıp deneyiniz...

Width değerie ile listwidth değerinin ikisinide propertieste eşitledim. istediğim oldu teşekkür ederim.

 

[hsayar]

Hatta aşağıdaki gibi daha güzel oldu

Private Sub UserForm_Initialize()
'.......................
  Dim ufCTRL As MSForms.Control
  For Each ufCTRL In Me.Controls
    If (TypeOf ufCTRL Is MSForms.ComboBox) Then
      With ufCTRL
        .ListWidth = .Width
      End With
    End If
  Next
  Set ufCTRL = Nothing
'..................
End Sub