Formule (ou VBA) pour obtenir prochaine date controle suivant tableau

[zebanx]

Bonsoir à tous,

Je suis coincé sur une formule (ou VBA) permettant de calculer automatiquement la prochaine date de contrôle suivant une catégorie qui rend un contrôle à fréquence variable (mois, trimestre, semestre, année).
Pourriez-vous m'aider svp à obtenir cette formule ou ce code ?
Le fichier excel reste toujours plus explicite.

Vous en remerciant, bonne soirée
zebanx

 

[Dranreb]

Bonsoir.

Function ProchPériode(ByVal Période As String, ByVal Catég As String) As String
Dim N As Long
N = Left$(Période, 4) * 12 - 1 + Right$(Période, 2) + Choose(Asc(Catég) - 64, 1, 3, 6, 12)
ProchPériode = N \ 12 & "M" & Format(N Mod 12 + 1, "00")
End Function

En C2, à propager sur 18 lignes :

=ProchPériode($A2;$B2)

 

[zebanx]

Bonsoir Dranreb

Magnifique fonction. Je te remercie🙂

Bonne soirée
zebanx

 

[zebanx]

Bonsoir @job75

J'ai vu ta formule et t'en remercie.

L'ayant sauvegardé avant la suppression (???), si on rajoute une table pour une partie de ta formule, ça à l'air de bien fonctionner, qu'en penses-tu stp ?

#INDEX(K:N;EQUIV(A2;INDIRECT(RECHERCHEV(B2;$P$2:$Q$5;2;FAUX));0)+1;EQUIV(B2;K$1:N$1;0))


Merci d'avoir regardé en tout cas, très sympa comme toujours😉

zebanx

 

[job75]

Bonsoir zebanx, Bernard,

Ma 1ère formule était simple mais erronée.

Celle-ci est correcte je pense mais pas vraiment simple, en C2 :

=DECALER(J$1;EQUIV(A2;DECALER(J:J;;EQUIV(B2;K$1:N$1;0));0);EQUIV(B2;K$1:N$1;0))

A+

 

[zebanx]

Re-bonsoir

Impeccable😉

Tu vois que ce n'était pas ("que") si facile 😀 et j'ai trois solutions pour cette problématique, je suis très content.

Bonne nuit
@+
zebanx