Date dans macro
Résolu
nancy_soleil08
Messages postés
60
Statut
Membre
-
nancy_soleil08 Messages postés 60 Statut Membre -
nancy_soleil08 Messages postés 60 Statut Membre -
Bonjour, j'ai cette formule dans une macro:
.Range("y" & li - 1).AutoFill Destination:=Range("y" & li - 1 & ":y" & li), Type:=xlFillDefault
f = "=IF($V" & li & ">0,$V" & li & ",$Y" & li - 1 & ")"
Cela est supposé recopier la valeur de la cellule au dessus. La formule fonctionne mais au lieu de recopier la bonne date, elle me donne la date + 1 jour. Exemple, si dans la cellule Y2 j'ai le 28 juin, la réponse de la macro dans la cellule Y3 sera le 29 juin. Qu'est-ce que j'ai écrit de pas correct pour que cela fasse ça?
.Range("y" & li - 1).AutoFill Destination:=Range("y" & li - 1 & ":y" & li), Type:=xlFillDefault
f = "=IF($V" & li & ">0,$V" & li & ",$Y" & li - 1 & ")"
Cela est supposé recopier la valeur de la cellule au dessus. La formule fonctionne mais au lieu de recopier la bonne date, elle me donne la date + 1 jour. Exemple, si dans la cellule Y2 j'ai le 28 juin, la réponse de la macro dans la cellule Y3 sera le 29 juin. Qu'est-ce que j'ai écrit de pas correct pour que cela fasse ça?
A voir également:
- Date dans macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Airpods 3 date de sortie - Guide
- Jm date désabonnement ✓ - Forum Consommation & Internet
3 réponses
Bonjour
Changes le type de la copie
Type:=xlFillCopy
Mais pour une copie dans une seule cellule tu peux faire plus simple
.Range("y" & li - 1).Copy .Range("y" & li)
Cdlmnt
Changes le type de la copie
Type:=xlFillCopy
Mais pour une copie dans une seule cellule tu peux faire plus simple
.Range("y" & li - 1).Copy .Range("y" & li)
Cdlmnt
nancy_soleil08
Messages postés
60
Statut
Membre
Merci!!!!
Bonjour, cela fait longtemps!!! J'ai la même formule à utiliser, je veux copier les données de la ligne au dessus. Par contre cette ligne au dessus contient une formule et ce n'est pas la formule que je veux copier c'est le résultat de la formule. Je devine que je dois insérer le terme value quelque part, mais je ne sais pas ou et ma formule fonctionne, mais elle copie la formule de la ligne précédente, pas la valeur.
.Range("ab" & li - 1).AutoFill Destination:=Range("ab" & li - 1 & ":ab" & li), Type:=xlFillCopy
La formule qui est dans la cellule à copier est ex: =A6, le résultat de cela est ex: 5412B07
Mais au lieu d'avoir 5412B07 comme réponse, j'ai =A7
Merci
.Range("ab" & li - 1).AutoFill Destination:=Range("ab" & li - 1 & ":ab" & li), Type:=xlFillCopy
La formule qui est dans la cellule à copier est ex: =A6, le résultat de cela est ex: 5412B07
Mais au lieu d'avoir 5412B07 comme réponse, j'ai =A7
Merci