Just nu i M3-nätverket
Jump to content

Rensa combobox


JohannaÖ

Recommended Posts

Hej!

Detta är min förkortade vba kod:

 

Dim x As Integer
Private Sub CommandButton1_Click()
x = 1
Call Combobox1_Click

Private Sub Combobox1_Click()
Combobox1.RemoveItem 0
If x = 1 Then
Combobox1.ListFillRange = "Parametrar!$A$4:$A$17"
End If
If Combobox1.Value = "Volym" Then
ChartObjects("Diagram 5").Visible = True
End If
End Sub

 

Mitt problem är att jag inte får tömt comboboxen, det kommer bara ett errormeddelande. Inte heller

[Combobox1.Clear ]

fungerar. Någon som ser vad jag gjort fel??

 

ed av moderator, kod-taggar infogade

 

[inlägget ändrat 2009-04-16 16:57:03 av Monshi]

Link to comment
Share on other sites

Combobox1.Clear fungerar, som du märker, enbart om man har en "mjuk" lista (typ en array) och inte när man länkat den mot celler.

 

Skriv istället:

Combobox1.ListFillRange = ""

 

 

/T

 

Even when we know we´ll never find the answers, we have to keep on asking questions.

 

Link to comment
Share on other sites

Du menar nolla valet?

 

Me.ComboBox1.ListFillRange = ""
Me.ComboBox1.ListIndex = -1

 

bara en rad till...

 

 

/T

 

Even when we know we´ll never find the answers, we have to keep on asking questions.

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...