Format nombre se change en [$-40C]j*

Par quoi dois-je remplacer ou comment dois-je faire évoluer cette formule ?

Bonjour,
Pour copier une valeur, on doit utiliser la propriété Value de l'objet Range

Exemple : La ligne ci-dessous

Code:

---

Planning.Cells(ligne_à_compléter, 1) = Format$(BDD.Cells(ligne_info, 1), "dd/mm/yyyy") 'Ordre Mh

---

doit être remplacée par

Code:

---

Planning.Cells(ligne_à_compléter, 1).Value = BDD.Cells(ligne_info, 1).Value 'Ordre Mh

---

J'ajouterai, que certains blocs de lignes pourraient se résumer à une boucle tenant sur trois lignes

Je suis ouvert à tout pour progresser, dans mes lignes inutiles.
En tout cas je vais faire un test sur votre solution et vérifier l'ensemble de la macro, pour corriger ce genre de cas.

Lorsqu'il y a une formule dans ce que je souhaite copier comme ceci :

Code:

---

BDD.Cells(ligne_BDD, 37).Value = BDD.Cells(ligne_BDD, 16) - 14

---

Dois-je remplacer par ça ?

Code:

---

BDD.Cells(ligne_BDD, 37).Value = BDD.Cells(ligne_BDD, 16).Value - 14

---

Bonjour,
Oui, puisque BDD.Cells(ligne_BDD, 16).Value renvoie une valeur dont on soustrait 14

Citation:

---

Envoyé par leloup84

Lorsqu'il y a une formule dans ce que je souhaite copier comme ceci :

Code:

---

BDD.Cells(ligne_BDD, 37).Value = BDD.Cells(ligne_BDD, 16) - 14

---

---

Pour faire une réponse fiable, il faudrait que tu décrives ta "formule" (en particulier les références qu'elle contient), mais essaye ceci :

Code:

---

BDD.Cells(ligne_BDD, 37).Formula = BDD.Cells(ligne_BDD, 16).Formula & "-14"

---

Bonjour Menhir,
Bien vu :ccool:
Je n'avais lu la première ligne de la question "(Lorsqu'il y a une formule dans ce que je souhaite copier ...)" :oops:

Merci je continu de corriger l'écriture de mon code avec vos recommandations.