Probleem Uitzicht Combobox

Status
Niet open voor verdere reacties.
J

Jemp

Gebruiker
Lid geworden
18 feb 2012
Berichten
131
Hoi

Ik heb een combobox waarin als basiswaarde de dag van vandaag moet gekozen zijn.
In de lijst staan dan ook een aantal data voor en na vandaag.
In het bijgevoegde (beperkte) voorbeeld moet ik scrollen om in de lijst 27/5 te zien.

Bedoeling is eigenlijk dat 27/5 in de lijst te zien is en dat voor de latere data moet scrollen.
Voor alle duidelijkheid : in de combobox zelf moet wel 02/06/19 blijven staan.

Groetjes
JP
 

Bijlagen

  • Scroll Combobox.xlsm
    14,2 KB · Weergaven: 34
Zet de listindex op het eerste element in jouw combobox.

Code: 
Private Sub UserForm_Activate()
  ComboBox1.List = [index(Text(today()-7+row(1:12),"dd-mm-yyyy"),)]
  ComboBox1.ListIndex = 0
End Sub
 
Laatst bewerkt:
VenA

Dat is juist het probleem.
Als ik dat doe (had dat ook al geprobeerd) dan krijg ik uiteraard ook 27/5/19 in de dropbox als selectie en ik wil dat daar de dag van vandaag (2/6/19) staat.

Groetjes
 
Wat wil je dan precies? Misschien zo?

Code: 
Private Sub UserForm_Activate()
  With ComboBox1
    .ListRows = 12
    .List = [index(Text(today()-7+row(1:12),"dd-mm-yyyy"),)]
    .ListIndex = 6
    .DropDown
  End With
End Sub
 
Laatst bewerkt:
Hoi VenA

Tx voor de snelle reactie en … de oplossing :thumb:

Gewoon het uitzicht veranderen is inderdaad de oplossing.

Groetjes
JP
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan