ciao
ComboBox1.ListIndex = Month(Date)
oppure
ComboBox1.ListIndex = Format(Now, "mm")
sfruttiamo il valore del mese in questo caso 3
se vuoi il mese corrente devi levare 1 -1
questo perché la prima riga di una combo è la 0
[Modificato da federico460 12/03/2017 10:38]