[VBA/EXCEL] Elenco di date a partire da fino a

[Harding]

Continuo a provare a barcamenarmi nel VBA.

Se io volessi inserire in un cella un elenco a discesa di date nel formato MMYYYY partendo da un anno fa(rispetto alla data di sistema) e arrivando a tra un anno, devo creare una funzione a posta?

[giorgiogio48]

Penso che dovresti crarti prima una tabella con tutte le date che ti interessano e poi usare il metodo AddItem per inserirle nella casella a discesa.

[Harding]

Alla fine ho messo a mano i valori che poi sono nel menù a discesa della cella, ma volevo automatizzare la creazione di questo arco di 24 mesi con punto medio now().

[giorgiogio48]

Se ho capito bene la tua domanda il codice dovrebbe essre questo:

Private Sub Form_Load()
Dim strA(24) As String
For i = 0 To 23
strA(i) = Now + (i - 12) * 30
strA(i) = Format(strA(i), "mm/yyyy")
Combo1.AddItem strA(i)
Next i
End Sub

Ciao.

[Harding]

Grazie per la risposta.
A occhio dovrebbe essere quello che mi serve.

Ma come faccio ad applicare questa sub alle celle che devono essere riempite da questa combo?

Lo so è una domanda da lamer....

[MdE2005]

Giorgiogio48 ha proposto questo codice, tra l'altro corretto, e lo ha applicato ad un combobox: devi modificare quella riga, e con un ciclo for/next scrivere ogni data nelle celle corrispondenti.

Ti consiglio di provare autonomamente, se poi non riesci a farlo riposti qui magari anche un pò di codice..ok?

ciao

[giorgiogio48]

Originariamente inviato da Harding
Grazie per la risposta.
A occhio dovrebbe essere quello che mi serve.

Ma come faccio ad applicare questa sub alle celle che devono essere riempite da questa combo?

Lo so è una domanda da lamer....

Ahhh bè se non sai tu cosa devi fare con la combobox... Cerca che trovi...

[MdE2005]

Originariamente inviato da giorgiogio48
Ahhh bè se non sai tu cosa devi fare con la combobox... Cerca che trovi...

Secondo me Harding vuole selezionare una cella, applicare questa funzione, ed avere una lista di celle ognuna contenente una data precisa: nessuno ha mai parlato di combo, forse l'equivoco è nato dal primo post:

Se io volessi inserire in un cella un elenco a discesa di date nel formato MMYYYY partendo da un anno fa(rispetto alla data di sistema) e arrivando a tra un anno, devo creare una funzione a posta?

in cui si parlava di "elenco a discesa", che rimandava all'uso di una combobox.
A questo punto deve intervenire l'autore della discussione per risolvere il dilemma..

ciao

[giorgiogio48]

Ciao MdE2005,
Harding ha parlato di una cella e non di celle. A questo punto credo che ci sia ancora qualcosetta da fare.

[MdE2005]

In effetti è vero, a questo punto ribadisco il concetto precedente: deve intervenire lui (sempre che sia interessato..)

ciao