begin process at 2008 05 12 11:42:57
1 170 233 membres
135 nouveaux aujourd'hui
13 957 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Soustraction de date [ Divers / Débutants ] (jeanjeandada)

Soustraction de date le 09/05/2008 23:03:38

jeanjeandada
Bonjour tout le monde,

Voila [:)] j'ai une macro qui me donne la date et l'heure du systéme.
J'aimerai savoir s'il était possible de faire une soustraction entre la date du systéme sous la forme "dd-mm-yyyy hh:nn" et la date d'une cellule que je prend via une autre macro (ici c'est "05/05/2008 22:50")  :
 VOici la macro:

Sub Macro1()
Dim Madate As String
Dim resultat As String
Madate = Format(Now, "dd-mm-yyyy hh:nn")
MsgBox Madate
resultat = Madate - "05/05/2008 22:50"
MsgBox resultat
End Sub



En compilant, la maro ne fonctionne pas. Je pense que c'est à cause du format des variables mais je ne sais pas quoi mettre comme format...


Merci d'avance!!!
++;)


Re : Soustraction de date le 09/05/2008 23:16:49

Exploreur
Membre Club
Salut,

Intérèsse toit à : DateDiff pour connaître la différence en 2 dates....

A+
Exploreur

 Linux a un noyau, Windows un pépin


Re : Soustraction de date le 09/05/2008 23:24:26

Exploreur
Membre Club
Réponse acceptée !

Re,

Voici un petit exemple :

Private Sub Command1_Click()

Dim Madate As Date
Dim DestDate As Date
Dim resultat As String

Madate = Format(Now, "dd-mm-yyyy")
DestDate = "05/12/2008"

MsgBox Madate

' ici calcul l'interval en mois sur les 2 dates
resultat = DateDiff("m", Madate, DestDate)

MsgBox resultat

End Sub

A+
Exploreur

 Linux a un noyau, Windows un pépin


Re : Soustraction de date le 09/05/2008 23:28:07

Exploreur
Membre Club
Tiens, si cela peut t'aider :

DateDiff, fonction

       

Renvoie une valeur de type Variant (Long) indiquant le nombre d'intervalles de temps entre deux dates données.

Syntaxe

DateDiff(interval, date1, date2[, firstdayofweek[,firstweekofyear]])

La syntaxe de la fonction DateDiff comprend les arguments nommés suivants :

ÉlémentDescription
intervalExpression de chaîne correspondant à l'intervalle de temps utilisé pour calculer la différence entre date1 et date2.
date1, date2De type Variant (Date), représentent les deux dates utilisées dans le calcul.
firstdayofweekFacultatif. Constante précisant le premier jour de la semaine. Si aucune valeur n'est précisée, la valeur par défaut est dimanche.
FirstweekofyearFacultatif. Constante précisant la première semaine de l'année. Si aucune valeur n'est précisée, la première semaine est par défaut celle du 1er janvier.

Valeurs

L' argumentinterval peut prendre les valeurs suivantes :

ValeurDescription
yyyyAnnée
qTrimestre
mMois
yJour de l'année
dJour
wJour de la semaine
wwSemaine
hHeure
nMinute
sSeconde

L'argument firstdayofweek peut prendre les valeurs suivantes :

ConstanteValeurDescription
vbUseSystem0Utilise le paramètre de l'API NLS.
vbSunday1Dimanche (valeur par défaut)
vbMonday2Lundi
vbTuesday3Mardi
vbWednesday4Mercredi
vbThursday5Jeudi
vbFriday6Vendredi
vbSaturday7Samedi

ConstanteValeurDescription
vbUseSystem0Utilise le paramètre de l'API NLS.
vbFirstJan11Commencer par la semaine du 1er janvier (valeur par défaut).
vbFirstFourDays2Commencer par la première semaine comportant au moins quatre jours dans l'année nouvelle.
vbFirstFullWeek3Commencer par la première semaine complète de l'année.

Remarques

Utilisez la fonction DateDiff pour déterminer le nombre d'intervalles de temps spécifiés entre deux dates. Par exemple, utilisez DateDiff pour calculer le nombre de jours entre deux dates ou le nombre de semaines entre la date d'aujourd'hui et la fin de l'année.

Pour calculer le nombre de jours entre date1 et date2, vous pouvez utiliser les valeurs Jour de l'année ("y") ou Jour ("d"). Si l'argument interval est Jour de la semaine ("w"), DateDiff renvoie le nombre de semaines entre les deux dates. Si date1 tombe un lundi, DateDiff calcule le nombre de lundi jusqu'à date2. La valeur date2 est prise en compte, mais pas la valeur date1. Si l'argument interval est Semaine ("ww"), la fonction DateDiff renvoie le nombre de semaines calendaires entre les deux dates. Le nombre de dimanches entre date1 et date2 est calculé. DateDiff prend en compte date2 si cette date tombe un dimanche, mais pas date1, même s'il s'agit également d'un dimanche.

Si date1 est postérieure à date2, la fonction DateDiff renvoie un nombre négatif.

L'argument firstdayofweek a une incidence sur les calculs qui utilisent les symboles d'intervalle "w" et "ww".

Si date1 ou date2 est un littéral date, l'année spécifiée devient un élément permanent de la date. Toutefois, si date1 ou date2 apparaît entre guillemets (" ") et si vous n'indiquez pas l'année, l'année en cours est insérée dans le code chaque fois que l'expression date1 ou date2 est évaluée. Vous pouvez ainsi écrire du code qui sera réutilisable au fil des années.

Lors de la comparaison des dates 31 décembre et 1er janvier de l'année suivante, DateDiff avec la valeur Année ("yyyy") renvoie 1, même si la différence est seulement d'un jour

A+
Exploreur

 Linux a un noyau, Windows un pépin


Re : Soustraction de date le 10/05/2008 11:30:06

jeanjeandada
Merci Exploreur Jvais prendre le temps de lire tous sa et de faire des essais !!!



Allez ++
Merci


Classé sous : date, macro, format, soustraction, systéme

Participer à cet échange

Appels d'offres

Pub



CalendriCode

Mai 2008
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS