Tous les billets

Salut.

En 2020, on travaille évidemment les données au sein d'un tableau structuré (voir mon tuto à ce sujet). La manipulation des tableaux structurés par VBA permet d'écrire un code qui n'est pas lié à la position des données dans le classeur. Que ce soit par les références structurées ou par le tableau structuré lui-même (le Listobject), le code VBA qui doit être écrit peut être rendu générique en sortant du code les données "métier" (nom du tableau, noms des colonnes, ...

Fichiers attachés

• Ajout-Ligne-Tableaux-Structurés.xlsm (18,2 Ko, 561 affichages)

Salut.

Avant, pour dénombrer les valeurs uniques d'une plage, on devait passer par une formule que certains utilisaient sans la comprendre:




Pour l'expliquer, on pourrait ajouter une colonne dans laquelle on divise 1 par le nombre de fois que l'on trouve la valeur sur la ligne. Ainsi, sur les lignes d'une valeur qui se trouve deux fois dans le tableau, nous aurons 1/2 => 0.5 sur 2 lignes. 2 * 0.5 = 1, la valeur ...

Salut.

Dans un discussion du forum, il est question d'essayer de fusionner trois tables selon une "clé" constituée de deux colonnes. J'ai réalisé une vidéo pour expliquer comment on peut, en quelques clics, fusionner trois tables grâce à Power Query.

Que pensez-vous de Power Query?
Travaillez vous avec Power Query?
Aimeriez-vous des tutos vidéos sur nos forums? ...

Salut.

Je vois souvent des codes événementiels qui font "plein de choses"... Pas sûr que ce soit une bonne pratique!

Dans ce billet, j'explique déjà pourquoi il ne faut jamais appeler du code événementiel, chose que je vois trop fréquemment sur le forum et qui est pour moi une mauvaise pratique. Un code événementiel ne peut être "appelé" que par l'événement considéré, sinon ce n'est plus du code événementiel. Certains ont déjà du mal à ce stade, ...

Salut.

Dans cette discussion, la demande consistait à pouvoir vider rapidement un tableau structuré en VBA.

La réponse générique que je donne est la suivante et fonctionne pour le classeur actif:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Table_Clear(Tablename As String)
  If Not Range(Tablename).ListObject.DataBodyRange Is Nothing Then Range(Tablename).ListObject.DataBodyRange.Delete
End Sub

Je préfère passer par la plage plutôt que par la feuille et le listobject ( ...