Utilisation correcte de DateDiff

Bonjour,

dans le bout de code suivant

Code:

---

DateDiff("d", Range(colTradeDate & i), .Range(colCaptureDate & i))

---

est égal à 41156.

Pourtant,

Code:

---

Range(colTradeDate & i) = 03/09/2012

---

et

Code:

---

.Range(colCaptureDate & i)=04/09/2012

---

!

Que se passe-t-il?

Merci d'avance pour vos conseils! :ccool:

Bonjour à tous.

Chez moi, ça fonctionne, j'obtiens 1.

En ayant ajouter, pour essai

Code:

---

colTradeDate = "A": i = 1: colCaptureDate = "B"

---

et écrit 03/09/2012 en A1 et 04/09/2012 en B1 puis

Code:

---

j = DateDiff("d", Range(colTradeDate & i), Range(colCaptureDate & i))

---

J'ai enlevé le "." devant le 2ème Range, sans doute pour un With ??

Les Ranges utilisés doivent être dans le format Date.

Cordialement.

[EDIT] - Je suis perplexe !
J'ai fait un essai avec une date A1 03/09/2012 sur feuille 1 et B1 04/09/2012 sur feuille2
En conservant le ".", là j'obtiens 41156 ? avec le code suivant

Code:

---

1 2 3 4

colTradeDate = "a": i = 1: colCaptureDate = "b" With Sheets("Feuil2") j = DateDiff("d", Range(colTradeDate & i), .Range(colCaptureDate & i)) End With

---

Bonjour,

A quoi sert le "." devant le second "range"?
Cela n'irait-il pas mieux en le supprimant?

Harry

C'est un problème de feuille active.

Le second Range fait appel à la bonne feuille puisqu'elle est nommée par l'instruction With ; en revanche le premier Range part du principe de la feuille active.

si la feuille active est celle où se trouve la date, c'est bon ; à l'inverse, si c'est une autre feuille active où la date voulue n'y est pas, alors le résultat est faussé. on obtient effectivement 41156 avec une cellule vide.

[EDIT] Pour éviter ce genre de problème qui pourrait survenir lors de changements de feuille par l'utilisateur pendant le déroulement du code.

Code:

---

DateDiff("d", Sheets("Feuil1").Range(colTradeDate & i), .Range(colCaptureDate & i))

---

Préciser en dur la feuille du 1er Range

Bonjour,

Un petit complément d’explication.
Le nombre 41156 correspond au numéro de série de la date "04/09/2012".
Si tu obtiens ce résultat, c’est que l’autre argument vaut 0. Ta formule est alors équivalente à

Code:

---

DateDiff("d", 0, DateValue("04/09/2012"))

---

Reste à comprendre pourquoi Range(colTradeDate & i) vaut 0.
Comme l’indique HopPopPop, l’écriture sans le point avant Range(colTradeDate & i) indique que tu fais référence à la feuille active. C’est certainement cette référence qui est incorrecte.
Si tu places un point avant Range(colTradeDate & i), celui-ci te permet de faire référence à l’objet spécifié par l'instruction With .
Si tu souhaites faire référence à une autre feuille, tu dois le noter explicitement (comme indiqué également par HopPopPop) .
Exemple :

Code:

---

DateDiff("d", Sheets("Feuil1").Range(colTradeDate & i), .Range(colCaptureDate & i))

---

Cordialement.

Merci tout le monde!

C'est bel et bien un oubli du "." donc un problème de feuille active.