Rapport de message :*
 

Re: Bonjour, et calage de date

Titre du sujet : Re: Bonjour, et calage de date
par Guy le 20/09/2009 19:35:30

Bonjour,

Quand tu dis que tu es confronté à l'utilisation de FirstDayOfWeek.Monday, d'où tiens-tu ça?
Dans la liste des paramètres d'Application dont la liste est donnée dans le fichier d'aide à la méthode Application.International() il n'y a, concernant les date, rien qui ressemble à un paramètre fixe. Tu as donc tous loisirs d'écrire ta fonction avec le paramètre de ton choix.

  Resultat = DateDiff("ww", "01/03/01", "11/09/01", VbDayOfWeek.vbThursday, VbFirstWeekOfYear.vbFirstFullWeek)
  Resultat = DateDiff("ww", "01/03/01", "11/09/01", VbDayOfWeek.vbThursday, VbFirstWeekOfYear.vbFirstJan1)
  Resultat = DateDiff("ww", "01/03/01", "11/09/01", VbDayOfWeek.vbSunday, VbFirstWeekOfYear.vbFirstFullWeek)
  Resultat = DateDiff("ww", "01/03/01", "11/09/01", VbDayOfWeek.vbMonday, VbFirstWeekOfYear.vbFirstJan1)


Ou toute autre combinaison. L'énumération VbDayOfWeek n'a rien à voir avec un quelconque paramètre d'Application.

Me trompe-je?

Guy

Date et heure

Index Type Signification
xI24HourClock Boolean True pour le format 24 heures, False pour le format 12 heures.
xI4DigitYears Boolean True si les années comportent quatre chiffres, False si elles comportent deux chiffres.
xIDateOrder Long Ordre des éléments de la date :
0 = mois-jour-année
1 = jour-mois-année
2 = année-mois-jour
xIDateSeparator String Séparateur de date (/ ).
xIDayCode String Symbole du jour (j).
xIDayLeadingZero Boolean True si un zéro est affiché à gauche dans les jours.
xIHourCode String Symbole des heures (h).
xIMDY Boolean True si la date complète utilise l'ordre mois-jour-année, False si elle utilise l'ordre jour-mois-année.
xIMinuteCode String Symbole des minutes (m).
xIMonthCode String Symbole du mois (m).
xIMonthLeadingZero Boolean True si un zéro est affiché à gauche dans les mois (lorsque les mois sont affichés sous forme numérique).
xIMonthNameChars Long Cette propriété renvoie toujours trois caractères pour la compatibilité amont. Les noms de mois courts sont lus à partir de Microsoft Windows et peuvent avoir n'importe quelle longueur.
xISecondCode String Symbole des secondes (s).
xITimeSeparator String Séparateur d'heure (:).
xITimeLeadingZero Boolean True si un zéro est affiché à gauche dans l'heure.
xIWeekdayNameChars Long Cette propriété renvoie toujours trois caractères pour la compatibilité amont. Les noms de jours courts sont lus à partir de Microsoft Windows et peuvent avoir n'importe quelle longueur.
xIYearCode String Symbole de l'année dans les formats numériques (a).