12. februar 2005 - 19:28Der er
2 kommentarer og 1 løsning
Kombo boks ændring?
Hej! Jeg har en kombo boks hvor man kan har en liste med produkternesnavne og makroen har jeg fået her.Jeg vil gerne have ændre makroen sådan at man kan vælge om man vil have en liste med produkternes navne eller med priserne. Produkternes navne har jeg i kolonne a1 til a 67 mens priserne hra jeg i kolonnerne d1 til d67. Private Sub Workbook_Open() For Each c In Sheets(2).Range("a1:a67").Cells Sheets(1).ComboBox1.AddItem c.Value 'ListIndex = 0 Next c End Sub
Brug af AI afslører de svagheder, virksomheder allerede har opbygget gennem års cloud-transformation, nye SaaS-løsninger og fragmenterede sikkerhedssystemer.
Indsæt en commandoknap i arket tæt ved eller over din combo
Jeg navngiver områderne: Sheets(2).(a1 :a67 ) som Produktnavne og Sheets(2).(d1 :d67 ) som priser
Rettet koden i ThisWorkbook modulet til
Private Sub Workbook_Open() Sheets(1).ComboBox1 = "" Sheets(1).ComboBox1.ListFillRange = "Produktnavne" CommandButton1.Caption = "Priser" End Sub
og koden for knappen
Private Sub CommandButton1_Click() If CommandButton1.Caption = "Produktnavne" Then Sheets(1).ComboBox1 = "" Sheets(1).ComboBox1.ListFillRange = "produktnavne" CommandButton1.Caption = "Priser" Else Sheets(1).ComboBox1 = "" Sheets(1).ComboBox1.ListFillRange = "Priser" CommandButton1.Caption = "Produktnavne" End If End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
