Microsoft 365 Mettre une condition selon le fomat de la cellule

[ValerieH34]

Bonjour à toutes et à tous,

J'ai besoin de votre aide pour créer une condition selon le format de ma cellule.

C'est à dire que
SI A2 est en format [h]:mm
ALORS A2*B2*24
SINON A2*B2

Merci pour votre aide.

Bolle (belle+bonne) journée

 

[JHA]

Bonjour à tous

A essayer

=SI(HEURE(A2)+MINUTE(A2)=0;A2*B2;(A2*24)*B2)

JHA

 

[ValerieH34]

Merci beaucoup JHA
C'est parfait.

 

[Victor21]

Bonjour à tous

A essayer

=SI(HEURE(A2)+MINUTE(A2)=0;A2*B2;(A2*24)*B2)

JHA

Bonjour à tous.

A condition que la quantité soit toujours inférieure à 24.

 

[JHA]

Bonjour à tous

Victor a raison, cette formule n'est pas correcte.
Second essai

=SI(CELLULE("format";$A2)="H4";(A2*24)*B2;A2*B2)

JHA

 

[ValerieH34]

Bonjour,
La seconde formule ne fonctionne pas si je personnalise le format de la cellule en [h]:mm
La première me convient très bien car je ne fais pas des journées de plus de 24h ;-)
En tout cas un grand merci à tous les 2 Victor21 et JHA.
Bolle journée

 

[job75]

Bonjour le forum,

Une formule un peu plus légère :

=A2*B2*SI(MOD(A2;1);24;1)

MOD(A2;1) renvoie la partie décimale.

A+

 

[job75]

Maintenant comme il est dit :

je ne fais pas des journées de plus de 24h

on peur écrire plus simplement :

=A2*B2*24^(A2<1)

 

[job75]

Pour terminer et répondre strictement à la question du post #1 on utilisera cette fonction VBA :

Function Calcul(Qte As Range, Prix)
On Error Resume Next
Calcul = Qte * Prix * IIf(Qte.Text Like "*:*", 24, 1)
If Err Then Calcul = ""
End Function

Le code doit être placé impérativement dans un module standard.

Formule en C2 =Calcul(A2;B2)

A+