Mettre sous forme de tableau

Le 18/08/2016 à 08:43

Bonjour à tous,

J'ai une macro qui créé un TCD.

Cette macro ne fonctionne si et seulement si le tableau de donnée associés est "mis sous forme de tableau" au préalable.

(voir image ci-dessous)

Je dois donc à chaque fois sélectionner l'ensemble du tableau est le mettre sous forme de tableau manuellement.

J'aimerai automatiser avec quelques lignes de commande cette manipulation en prenant en considération que la taille de mon tableau de donnée peut varier.

En pièce jointe, l'organisation de mon tableau de données.

Merci d'avance pour tous ceux qui pourront m'éclairer.

Bien cordialement,

85organisation-tableau-de-donnees.xlsx (12.20 Ko)

Le 18/08/2016 à 08:55

Tu peux regarder dans mon code sur le post "Macro qui agit sur un autre fichier" (juste en dessous), je fais exactement ça

Le 18/08/2016 à 09:12

Bonjour,

Je suis allé voir votre fichier. Si j'ai bien identifié la ligne correspondant à "mon problème" cela ne répond pas malheuresement.

En effet, en ce qui concerne votre macro le tableau est de taille fixée d'une part et d'autre en lançant la macro, il y a message de débogage qui apparaît.

La macro doit nécessairement prendre en compte que la taille du tableau n'est pas fixé.

Autrement dit il faut qu'elle fasse cela :

1. Sélectionner l'ensemble du tableau

2.Mettre sous forme de tableau

Mon problème est de traduire ces deux étapes en vb.

Merci d'avance pour tous ceux qui pourront m'aider

Le 18/08/2016 à 09:36

Effectivement, désolée j'ai lu un peu à la va vite.

Tu dois pouvoir récupérer ton nombre de colonnes avec un

Range("A:A").End(xlToRight).Column

ou

Cells(1, Columns.Count).End(xlToLeft).Column