[Risolto]Quante volte c'è un determinato mese tra due date?

[Frantic]

Ciao a tutti,

getto la spugna e chiedo a voi, che ormai sono due mesi che ci provo, ma non sono mai soddisfatto dal risultato.

Mettiamo che io abbia due date (01/02/2018 - 01/06/2020) e voglia sapere quante volte ci sarà il mese di giugno nell'intervallo. E' possibile farlo con le formule o è obbligatoria una macro?

[Gaetanopr]

Con formule la vedo dura, ti allego un file con la seguente function

Codice: Seleziona tutto

Function FMesi(DataIn, DataFin, FMese)
 Fmesi = 0
 NMesi = DateDiff("m", DataIn, DataFin)
 Anno = Year(DataIn) : Mese = Month(DataIn) : Giorno = Day(DataIn)

 For i = 0 To NMesi
   Data = DateAdd("m",i,DataIn)  
   If Month(Data) = FMese Then 
      FMesi = FMesi + 1
   End if   
 Next i 
End Function

Ti basta indicare le 2 date, iniziale - finale e il mese espresso a numero.
Vedi esempio

[Frantic]

Con formule la vedo dura...

Lo immaginavo... grazie, ora funziona tutto.

[gioh66]

Salve! Ho visto questo quesito interessante e siccome io non so scrivere codice, ho voluto provare a trovare una soluzione con formule.
Per far funzionare il sistema ho messo la data iniziale in C2 e la finale in D2.
Poi in A1:A1000 ho creato una colonna d'appoggio che estrae i numeri dei mesi tra le due date con la formula

Codice: Seleziona tutto

=SE(RIGHE(A$1:$A1)>MESI($C$2;$D$2;1)+1;"";SE(RESTO(MESE($C$2)+RIGHE(A$1:$A1)-1;12)=0;12;RESTO(MESE($C$2)+RIGHE(A$1:$A1)-1;12)))

Poi in G2 ho messo la formula

Codice: Seleziona tutto

=CONTA.SE(A1:A1000;F2)

per il conteggio dei mesi.
Ps.: in F2 ho messo un menù a tendina per la scelta del mese da conteggiare.

[Frantic]

Salve! Ho visto questo quesito interessante e siccome io non so scrivere codice, ho voluto provare a trovare una soluzione con formule....

Fantastico, anche questo lavora benissimo. Io l'ho sviluppato su righe, ma è perfetto.

...a dire il vero, dopo 2 mesi di tentativi, sono un po' deluso di non aver risolto da solo. Me la cavo nella programmazione in Python e avevo già risolto, ma devo assolutamente, per ora, usare un foglio e siccome non ho molta pratica, mi sono incagliato. Vi ringrazio entrambi.
E poi, leggendo qua e là, scopro oggi che le macro si possono scrivere in Python. Non si finisce mai di imparare!

[gioh66]

Grazie del riscontro!

[Gaetanopr]

Ciao, giusto per volere abbondare ti fornisco una soluzione con la seguente formula

Codice: Seleziona tutto

=MATR.SOMMA.PRODOTTO(MESE(DATA(ANNO(A3);MESE(A3)-1+RIF.RIGA(INDIRETTO("A1:A"&MESI(A3;B3;0)+1));1))=G3)

Allego file con la funzione personalizzata nella cella D3 e la formula nella cella I3

[gioh66]

grande! Formula unica...soluzione migliore della mia

[Gaetanopr]

La potenza delle matrici!!!