Erreur exécution '13' incompatibilité type

Anonyme
2023-02-03T18:17:58+00:00

Bonjour,

Sur cette ligne :

Sheets("récap").Range("A3").Resize(lignetab, 11) = Application.Transpose(TabOngletRecap)

j'ai le message : "erreur exécution'13' incompatibilité type" quand je lance la macro sur Excel 2016 MSO 64 bits alors que sur Excel 365, mon tableau se copie bien dans la feuille récap.

Dans la fenêtre espion sur la 1ère ligne, j'ai bien en type variant/variant(1to11,1to259), ce qui correspond à la variable lignetab (256)

Si vous avez une idée.

merci de votre aide

ptck

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire

Réponse acceptée par l’auteur de la question

Hecatonchire 53,870 Points de réputation Modérateur bénévole
2023-02-04T13:33:14+00:00

Bonjour,

Pas de problème pour moi avec

Sub test()

Dim lignetab(1 To 11, **1 To 256**) 

**Sheets("récap").Range("A3").Resize(UBound(lignetab, 2), 11)**.Interior.Color = vbRed 

End Sub

Cette réponse a-t-elle été utile ?

1 personne a trouvé cette réponse utile.
0 commentaires Aucun commentaire

9 réponses supplémentaires

  1. DanielCo 107.7K Points de réputation
    2023-02-04T13:24:18+00:00

    Sur internet, j'ai trouvé ça :

    "In my experience Application.Transpose() is prone to throwing errors when used in code. (You are actually calling an Excel function using VBA.) A better alternative is to create a new array and use a couple of nested loops to copy the contents of the original array to the new array. You could write a helper method to do this and then pass the original array to it. (Use the same logic as in C#.)"

    https://www.mrexcel.com/board/threads/transpose-an-array-type-mismatch-error.1062961/

    Tu peux essayer de faire une autre en utilisant une boucle, plutôt que d'utiliser Transpose.

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire