ComboBox and Today's Date 1

[xlhelp]

I have a combox that's tied to a table with values 1 through 31.

I would like the default value in the combobox to be today.

I have searched this forum and Google and haven't found an answer that works for me.

Anyhelp would be apprecuated.

Thanks.

Me transmitte sursum, Caledoni!

 

[xlhelp]

PS. The combobox is on a userform

Me transmitte sursum, Caledoni!

 

[firefytr]

Hi xlhelp,

Some basics..

What app?
What type of combobox? ActiveX? Forms?
Where is it located? Worksheet? Userform?
What is the range of your data (1-31)?

Regards,
Zack Barresse

Simplicity is the ultimate sophistication. What is a MS MVP? PODA
- Leonardo da Vinci

 

[xlhelp]

Sorry....

I usually am fairly good at this.

It's Excel, ActiveX. UserForm. Table is in D232, sheet3

Me transmitte sursum, Caledoni!

 

[SkipVought]

Hi,

By TODAY, do you mean 1, since TODAY is 1/1/2006.

so

MyCombobox.Value = Day(Date)

Skip,

_[red][/red]

 

[xlhelp]

Skip,

That works like a charm. Thanks

Me transmitte sursum, Caledoni!

 

[firefytr]

If you already loaded the data, you can use the index as well (it's what I use anyway)..

Me.ComboBox1.ListIndex = Day(Date) - 1

Regards,
Zack Barresse

Simplicity is the ultimate sophistication. What is a MS MVP? PODA
- Leonardo da Vinci