Incompatibilité de type

Bonjour
je declare un tableau

Code:

---

Dim tri() as variant

---

après plusieurs manipulations de mon tableau
le redim preserve me construit un tableau tri(1 to 16; 1 to 308)
lorsque que je veux le poser sur la feuille avec l'instruction

Code:

---

1 2 3

With Sheets(5) .Range("a2").Resize(UBound(tri, 1), UBound(tri, 2)).Value = Application.WorksheetFunction.Transpose(tri) End With

---

j'ai un retour d'erreur : incompatibilité de type
:calim2:

Bonjour,
comme tu transpose, ne faut-il pas mettre ta 2ème dimension en premier dans ta plage ?

Code:

---

1 2 3

With Sheets(5) .Range("a2").Resize(UBound(tri, 2), UBound(tri, 1)).Value = Application.WorksheetFunction.Transpose(tri) End With

---

hélas j'ai déjà tenté le coup et j'ai la même erreur8O
j'ai changer le nom du tableau ( comme le programme est assez gros je ne voulais pas qu'une variable de même nom puisse générer cette erreur
puis j'ai essayer avec la plage numérotée

Code:

---

.Range("a2:p309").Value = Application.WorksheetFunction.Transpose(tableau_corIG)

---

même réultats

Tu as essayé de le coller sur la feuille en bouclant dessus ?
Il y a peut-être une valeur dans ton tableau qui génère l'erreur (genre trop de caractères ou je ne sais quoi) ???

Au moins tu verrais à quel index ça plante.

bon le truc était finalement la solution
long , très long mais finalement une date était entré avec un - :cry:
j'ai corrigé la valeur et le programme tourne correctement
Merci
bon ça rebug:calim2:
finalement j'ai résolu le problème avec cette petite astuce

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim pose(1 To 500, 1 To 16) For t = 1 To UBound(tri, 2) For u = 1 To 16 pose(t, u) = tri(u, t) Next Next For t = UBound(tri, 2) To 500 For u = 1 To 16 pose(t, u) = "" Next Next

---

pas des plus orthodoxe mais ça soulage mes maux de têtes:mrgreen:
et la pose se faite simplement par

Code:

---

1 2 3

With Sheets(1) .Range("a2").Resize(UBound(pose, 1), UBound(pose, 2)).Value = pose End With

---

je vais d'ailleurs regarder si le fait de prendre les limites de tri ne supprimerait pas les #NA
bon ça tourne les limite du tableau tri permettent de supprimer la deuxième double boucle.