Tableau de Carnot / Generer combinaisons avec N variables

Bonjour,

Novice en VBA, je voudrais creer un tableau de carnot avec un nombre N de variables sur une page Excel et le tableau de carnot sur une deuxieme page Excel.

J'ai donc tester ce code :

https://forum.excel-pratique.com/viewtopic.php?f=2&t=74222 pour generer les combinaisons pour trois variables.

Le probleme est que toutes les combinaisons ne sont ecrites. C'est juste une repetition de la premiere partie du tableau ( en jaune sur le doc Excel).

Aussi j ai voulu l automatiser a un nombre de variable N

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

For x = 1 To Dercol

nbLignes = Cells(Rows.Count, 0 + x).End(xlUp).Row

ligneEcrire = 3

Mais je n arrive pas a integrer la deuxieme partie du code, il faut compter toutes les lignes des colonnes ayant une donnée, je n ai pas trouver comment faire

Pouvez vous m'aider a comprendre pourquoi le code ne fonctionne pas correctement, s il n est pas correct m'expliquer comment faire.

Aussi je n'ai pas reussi a ecrire le tableau sur la deuxieme page Excel

Veuillez excuser mes fautes d accents je dispose d un clavier qwerty

Je vous remercie par avance

Laliloa