bonjour, je voudrais que lorsque que je tape une heure dans une cellule
celle-ci soit additionné de 2heures en été (et 1 en hiver)
ex : je tape 10:00 et ça m'affiche 12:00 !
Possible sans trop de vba ou autre macro ?
Merci
Didier.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré) -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "excel" a écrit dans le message de news:48c676de$0$20717$
bonjour, je voudrais que lorsque que je tape une heure dans une cellule celle-ci soit additionné de 2heures en été (et 1 en hiver) ex : je tape 10:00 et ça m'affiche 12:00 ! Possible sans trop de vba ou autre macro ? Merci Didier.
Bonjour,
Qu'est ce que trop de VBA ?
La manip est amha impossible sans y passer, notamment du fait de la
différence entre hiver et été (il faudra à ce sujet préciser les bornes et
l'hémisphère considéré)
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"excel" <sacaordures@free.fr> a écrit dans le message de
news:48c676de$0$20717$426a34cc@news.free.fr...
bonjour, je voudrais que lorsque que je tape une heure dans une cellule
celle-ci soit additionné de 2heures en été (et 1 en hiver)
ex : je tape 10:00 et ça m'affiche 12:00 !
Possible sans trop de vba ou autre macro ?
Merci
Didier.
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré) -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "excel" a écrit dans le message de news:48c676de$0$20717$
bonjour, je voudrais que lorsque que je tape une heure dans une cellule celle-ci soit additionné de 2heures en été (et 1 en hiver) ex : je tape 10:00 et ça m'affiche 12:00 ! Possible sans trop de vba ou autre macro ? Merci Didier.
Modeste
Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré)
;o))) tout ça doit etre récupérable via les API sous windows, il y a des informations qui indiquent : le fuseau horaire du PC Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) ainsi qu'un flag disant si on applique l'heure d'été là je n'ai pas trouvé
reste à trouver l'adaptation à VBA
-- -- @+ ;o)))
Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour,
Qu'est ce que trop de VBA ?
La manip est amha impossible sans y passer, notamment du fait de la
différence entre hiver et été (il faudra à ce sujet préciser les
bornes et l'hémisphère considéré)
;o)))
tout ça doit etre récupérable via les API
sous windows, il y a des informations qui indiquent :
le fuseau horaire du PC
Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC
GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
ainsi qu'un flag disant si on applique l'heure d'été
là je n'ai pas trouvé
Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré)
;o))) tout ça doit etre récupérable via les API sous windows, il y a des informations qui indiquent : le fuseau horaire du PC Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) ainsi qu'un flag disant si on applique l'heure d'été là je n'ai pas trouvé
reste à trouver l'adaptation à VBA
-- -- @+ ;o)))
Philippe.R
Hello, Fort intéressant, j'archive, pour le cas où. Mais j'avoue bien humblement que les API et moi.... Amitiés -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "Modeste" a écrit dans le message de news:% Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré)
;o))) tout ça doit etre récupérable via les API sous windows, il y a des informations qui indiquent : le fuseau horaire du PC Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) ainsi qu'un flag disant si on applique l'heure d'été là je n'ai pas trouvé
reste à trouver l'adaptation à VBA
-- -- @+ ;o)))
Hello,
Fort intéressant, j'archive, pour le cas où.
Mais j'avoue bien humblement que les API et moi....
Amitiés
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Modeste" <nomail@nomail.net> a écrit dans le message de
news:%231rvucrEJHA.612@TK2MSFTNGP06.phx.gbl...
Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour,
Qu'est ce que trop de VBA ?
La manip est amha impossible sans y passer, notamment du fait de la
différence entre hiver et été (il faudra à ce sujet préciser les
bornes et l'hémisphère considéré)
;o)))
tout ça doit etre récupérable via les API
sous windows, il y a des informations qui indiquent :
le fuseau horaire du PC
Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC
GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
ainsi qu'un flag disant si on applique l'heure d'été
là je n'ai pas trouvé
Hello, Fort intéressant, j'archive, pour le cas où. Mais j'avoue bien humblement que les API et moi.... Amitiés -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "Modeste" a écrit dans le message de news:% Bonsour® Philippe.R avec ferveur ;o))) vous nous disiez :
Bonjour, Qu'est ce que trop de VBA ? La manip est amha impossible sans y passer, notamment du fait de la différence entre hiver et été (il faudra à ce sujet préciser les bornes et l'hémisphère considéré)
;o))) tout ça doit etre récupérable via les API sous windows, il y a des informations qui indiquent : le fuseau horaire du PC Michel pierron à déposé un fichier exemple sur Excelabo
et l'heure locale et l'heure UTC GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) ainsi qu'un flag disant si on applique l'heure d'été là je n'ai pas trouvé
reste à trouver l'adaptation à VBA
-- -- @+ ;o)))
Frédéric Sigonneau
Je pense que tu peux savoir si on est ou non en heure d'été avec cette fonction qui utilise le WMI :
Function HeureEte() As Boolean Dim S$ On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_TimeZone") For Each objItem In colItems S = objItem.DaylightName Next HeureEte = InStr(1, S, "heure d'été", vbTextCompare) > 0 End Function
Actuellement, objItem.DaylightName renvoie chez moi : Paris, Madrid (heure d'été)
Je pense que ça renverra autre chose après retour à l'heure d'hiver mais c'est à vérifier (je n'avais jamais utilisé cette propriété auparavant).
Par ailleurs, c'est une fonction utilisable aussi bien en VBA que dans une feuille de calcul.
bonjour, je voudrais que lorsque que je tape une heure dans une cellule celle-ci soit additionné de 2heures en été (et 1 en hiver) ex : je tape 10:00 et ça m'affiche 12:00 ! Possible sans trop de vba ou autre macro ? Merci Didier.
Je pense que tu peux savoir si on est ou non en heure d'été avec cette fonction
qui utilise le WMI :
Function HeureEte() As Boolean
Dim S$
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\" & strComputer & "rootcimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_TimeZone")
For Each objItem In colItems
S = objItem.DaylightName
Next
HeureEte = InStr(1, S, "heure d'été", vbTextCompare) > 0
End Function
Actuellement, objItem.DaylightName renvoie chez moi :
Paris, Madrid (heure d'été)
Je pense que ça renverra autre chose après retour à l'heure d'hiver mais c'est à
vérifier (je n'avais jamais utilisé cette propriété auparavant).
Par ailleurs, c'est une fonction utilisable aussi bien en VBA que dans une
feuille de calcul.
bonjour, je voudrais que lorsque que je tape une heure dans une cellule
celle-ci soit additionné de 2heures en été (et 1 en hiver)
ex : je tape 10:00 et ça m'affiche 12:00 !
Possible sans trop de vba ou autre macro ?
Merci
Didier.
Je pense que tu peux savoir si on est ou non en heure d'été avec cette fonction qui utilise le WMI :
Function HeureEte() As Boolean Dim S$ On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_TimeZone") For Each objItem In colItems S = objItem.DaylightName Next HeureEte = InStr(1, S, "heure d'été", vbTextCompare) > 0 End Function
Actuellement, objItem.DaylightName renvoie chez moi : Paris, Madrid (heure d'été)
Je pense que ça renverra autre chose après retour à l'heure d'hiver mais c'est à vérifier (je n'avais jamais utilisé cette propriété auparavant).
Par ailleurs, c'est une fonction utilisable aussi bien en VBA que dans une feuille de calcul.
bonjour, je voudrais que lorsque que je tape une heure dans une cellule celle-ci soit additionné de 2heures en été (et 1 en hiver) ex : je tape 10:00 et ça m'affiche 12:00 ! Possible sans trop de vba ou autre macro ? Merci Didier.
