bonsoir voilà mon probleme j'ai utiliser une fonction time dans une condition select case
et quand je la teste sur un pc elle marche par contre sur l'autre non
en fait elle converti l'heure en standard dans excel , et meme si je change le format en heure cela ne change rien
quelqu'un a t il deja rencontré ce problème.
voilà une partie de mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 'selectionner la cellule qui va recevoir l'heure Range("A1").Value = (time) 'appliquer le traitement 'dans le cas ou l'heure serait comprise entre les différentes valeurs ci dessous Select Case (time) Case 0 To 6 MsgBox ("Bonne nuit") Case 8 To 11 MsgBox ("Bonjour") Case 12 To 13 MsgBox ("Bon app") Case 14 To 19 MsgBox ("Bon après-midi") Case Else MsgBox ("Bonsoir") End Select End Sub
merci![]()
Partager