Export Excel valeurs uniquement

Hello pgz.
J'ai une "Erreur définie par l'application ou par l'objet" sur la ligne

Code:

---

vF = ThisWorkbook.Worksheets(i).UsedRange.FormulaLocal

---

:?

Azertix,

C'est i ou i + 1?

Pour comprendre, ceci

Code:

---

vV =ThisWorkbook.Worksheets(i + 1).UsedRange.Value

---

fonctionne, et cela

Code:

---

vF = ThisWorkbook.Worksheets(i + 1).UsedRange.FormulaLocal

---

provoque une erreur?

PGZ

Ben c'est i+1 parce que je n'importe pas le premier onglet.
Je pourrais aussi bien commencer avec i=2 et avoir ensuite i dans la boucle.

Citation:

---

Envoyé par pgz

Pour comprendre, ceci

Code:

---

vV =ThisWorkbook.Worksheets(i + 1).UsedRange.Value

---

fonctionne, et cela

Code:

---

vF = ThisWorkbook.Worksheets(i + 1).UsedRange.FormulaLocal

---

provoque une erreur?

---

Oui. Par contre ça ne bloque pas dès le premier onglet.
Ça bloque à l'avant dernier 8O

Azertix,

Sans voir le classeur je n'ai plus beaucoup d'idées. As-tu essayé de déplacer la feuille sur laquelle ça bloque pour voir si le pb se déplace avec elle?

PGZ

Je viens de tester. Ça bloque toujours sur la même feuille quelle que soit sa position.
Cette feuille contient une grosse cellule fusionnée avec plus de 255 caractères.
Ce qui est curieux c'est que ma seconde feuille contient elle aussi des cellules avec plus de 255 caractères et pourtant ça n'a pas bloqué dessus...

Je sèche moi aussi :roll: