OVH Cloud OVH Cloud

adaptation auto d'un tableau

1 réponse
Avatar
dd
bonjour,
sur une feuille j'ai une liste d'indicateurs en colonne A, en colonne B les
valeurs de chacun d'eux que je rentre tous les jours.
En feuille2, j'ai des tableaux qui reprennent partiellement ou totalement
ces indicateurs. Ce que je voudrais obtenir, c'est que le format du tableau
s'adapte automatiquement au nombre d'indicateurs non vides de la feuille 1.
ex : aujourd'hui j'ai 5 indicateurs sur 10 de renseignés, sur ma feuille 2
mon tableau aura donc seulement 5 lignes (en reprenant le nom de l'indicateur
et la valeur dans 2 colonnes). Demain je renseigne 7 indicateurs, mon tableau
a 7 lignes et les 2 colonnes correspndantes aux indicateur et valeurs...etc...

Est-ce possible de faire ça? C'est pour éviter, sur de grands tableaux,
d'avoir des lignes vides qui ne servent à rien et de faire apparaître les
lignes utiles...

merci

dd

1 réponse

Avatar
Daniel
Bonsoir.
Essaie le code suivant (sur Feuil1, tous les indicateurs, sur Feuil2, le
résultat) :

Sub Test()
Dim Ligne As Integer, c As Range
Ligne = 1
Sheets("Feuil1").Select
For Each c In Range("A1:A1000")
If c.Offset(0, 1).Value <> "" Then
Sheets("feuil2").Range("A" & Ligne) = c.Value
Sheets("feuil2").Range("B" & Ligne) = c.Offset(0, 1).Value
Ligne = Ligne + 1
End If
Next c
End Sub

Cordialement.
Daniel
"dd" a écrit dans le message de news:

bonjour,
sur une feuille j'ai une liste d'indicateurs en colonne A, en colonne B
les
valeurs de chacun d'eux que je rentre tous les jours.
En feuille2, j'ai des tableaux qui reprennent partiellement ou totalement
ces indicateurs. Ce que je voudrais obtenir, c'est que le format du
tableau
s'adapte automatiquement au nombre d'indicateurs non vides de la feuille
1.
ex : aujourd'hui j'ai 5 indicateurs sur 10 de renseignés, sur ma feuille 2
mon tableau aura donc seulement 5 lignes (en reprenant le nom de
l'indicateur
et la valeur dans 2 colonnes). Demain je renseigne 7 indicateurs, mon
tableau
a 7 lignes et les 2 colonnes correspndantes aux indicateur et
valeurs...etc...

Est-ce possible de faire ça? C'est pour éviter, sur de grands tableaux,
d'avoir des lignes vides qui ne servent à rien et de faire apparaître les
lignes utiles...

merci

dd