Merci beaucoup pour les aides reçues. 
Ça fonctionne. 
Bug up.
 
Envoyé depuis l'application Mail Orange
----------------
Le 28/03/2019, à 21:42, C Fourcroy a écrit :

PS : les slash en début et fin de ligne ne font pas partie du code, ils 
otn été ajoutés à l'envoie du mail.. je ne sais pas trop pourquoi ..

Le 28/03/2019 à 21:38, C Fourcroy a écrit :
> Re bonsoir
>
> Voilà un exemple vite fait du code la fonction en Basic
>
> /Function test(v1,v2)//
> //' V1 serait D10 : forcément soit vide, soit une heure//
> //' V2 serait E10 : forcément du texte//
> //
> //' UTILISATION : se mettre dans la cellule où l'on veut le résultat 
> et taper =TEST(coordonnée de la cellule de type D10; coordonnée de la 
> cellule du type E10)//
> //' si l'on utilise vraiment D10 et E10, ça donne =TEST(D10;E10)//
> //
> //' =SI(D10="";"";SI(E10="";D10;SI(E10="12 B";D10-"0:32";SI(E10="11 
> B";D10-"1:04";SI(E10="10 B";D10-"1:36";SI(E10="9 
> B";D10-"2:08";SI(E10="8 B";D10-"2:40";SI(E10="7 
> B";D10-"3:12";"")))))))) //
> //
> //Dim res As Date  ' res : variable intermédiaire pour savoir si le 
> résultat est négatif ou non//
> //
> //v2=ucase(v2) ' forcer le passage en majuscules//
> //
> //If v1="" Then//
> //    test=""//
> //Else//
> //    h=v1//
> //    Select Case v2://
> //        Case ""//
> //            res=h//
> //        Case "12 B"//
> //            res = h - timevalue("00:32:00")//
> //        Case "11 B"//
> //            res = h - timevalue("01:04:00")//
> //        Case "10 B"//
> //            res = h - timevalue("01:36:00")//
> //        Case "9 B"//
> //            res = h - timevalue("02:08:00")//
> //        Case "8 B"//
> //            res = h - timevalue("02:40:00")//
> //        Case "7 B"//
> //            res = h - timevalue("03:12:00")//
> //        Case Else//
> //            Msgbox "Y'a un problème ! dans la valeur  de 'E10' !"//
> //    End Select//
> //    If res<0 Then//
> //        test=timevalue("00:00")//
> //    Else//
> //        test=res//
> //    endif//
> //End If//
> //End Function/
>
> Le mode d'emploi est indiqué au début. il faut rentrer quelque chose 
> comme =Test(D10;E10) dans la cellule voulue
>
> Bon amusement
>
> Christian F
>
> Le 28/03/2019 à 14:03, FRED55 a écrit :
>> =SI(D10="";"";SI(E10="";D10;SI(E10="12 B";D10-"0:32";SI(E10="11
>> B";D10-"1:04";SI(E10="10 B";D10-"1:36";SI(E10="9 B";D10-"2:08";SI(E10="8
>> B";D10-"2:40";SI(E10="7 B";D10-"3:12";""))))))))
>>
>> est ma formule de base,mais si j'ai D10 égal à 1:38 et que par exemple
>> E10=8B ce qui donne 1:38-3:12 cela m'affiche un volume horaire 
>> négatif et je
>> voudrais dans ce cas par exemple avoir un résultat affiché de 0:00 ne 
>> tenant
>> pas compte du négatif.
>> Il s'agit d'un système de crédit débit de temps
>>
>>
>>
>> -- 
>> Sent from: 
>> http://document-foundation-mail-archive.969070.n3.nabble.com/Users-f1744091.html
>>
>
>


-- 
Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à 
https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy

Répondre à