Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 indice colonne Tableau structuré

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion eric72
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
E

eric72

XLDnaute Accro
Bonsoir à tous,
Je me demandais si plutôt que mettre
Cells(derligne, 1) = textbox.Value
avec un tableau structuré bien sur, il n'était pas possible de coder comme ça???
Cells(derligne, Range("tableau[colonne1]")) = textbox.Value (j'ai bien vu que ca ne marchait pas mais il y a peut être une autre solution!!!)
Merci à tous.
Eric
 
Solution
Re,

Range("Tableau1[Colonne1]") ou comme l'a dit @Dranreb ListObjects("Tableau").ListColumns("Colonne1").Range

Vous faites référence à votre colonne de tableau (toutes ses cellules).
Après ça se manipule comme n'importe quel objet Range.

Cordialement
Trier par date Trier par votes
Bonjour,

Avec : Range("tableau1[colonne1]")(2)="toto"

où colonne1 est le nom de la colonne de tableau1
la cellule sur la ligne 2 des données de la colonne du tableau aura pour valeur "toto"

Range("tableau1[colonne1]")
Renvoie un objet range normal comme Range("B2:B100")
Vous pouvez donc indicer comme vous voulez.

cordialement
 
Vote positif 0 Vote négatif
Re,

Voyez l'aide sur l'objet cells et l'objet Range.
Vous verrez que le deuxième paramètre de cells attend un numéro de colonne pas un objet range !

Cells(derLigne, Range("Tableau1[Colonne1]").Column)
Vous donnera la cellule de la ligne 'derLigne' de la colonne 'Colonne1' de la feuille

Si derligne = 100 et que Range("Tableau1[Colonne1]").Column =2 vous aurez B100

Cells sans autre objet range parent représente le tableau de toutes les cellules de la feuille, pas celles du tableau.

Range("Tableau1[Colonne1]") vous donne la plage de cellules des données (sans l'entête) de la colonne 'colonne1' du tableau

"Tableau1[Colonne1]" n'est ici qu'un nom de plage comme un autre.

Dernière cellule de 'Tableau1[Colonne1]' :

Range("Tableau1[Colonne1]").Cells(Range("Tableau1[Colonne1]").Cells.Count)🙄
Ce qui est un peu tarabiscoté, non ?

Le paraît moins avec With
With Range("Tableau1[Colonne1]")
.Cells(.Rows.Count) = Valeur
End With

Ce qui revient à par rapport au tableau
NbLignes = Range("Tableau1[Colonne1]").Cells.Count
Range("Tableau1[Colonne1]").Cells(NbLignes)

Ou par rapport à la feuille :
ligne = Range("Tableau1[Colonne1]").Row + Range("Tableau1[Colonne1]").Rows.Count - 1
colonne = Range("Tableau1[Colonne1]").Column
Cells(ligne, colonne) = Valeur

Bon j'espère que vous vous êtes noyé dans tout ceci 🙂 Non ?

Et pour faire Bref : n'essayez pas de manger votre omelette avec un marteau, ça passe mal 🙂

cordialement
 
Vote positif 0 Vote négatif
Bonjour.
Ce qui correspond à l'énoncé de la discussion c'est ListObjects("Tableau").ListColumns("Colonne1").Index
Mais je l'utilise assez peu, et pas lors de l'écriture dans une cellule individuelle du tableau, ce que je ne fais jamais. Je prépare plutot toutes les données dans un tableau dynamique d'une ligne que je balance à la fin vers une ListRow(N).Range.Value ou une ListRows.Add.Range.Value.
 
Vote positif 0 Vote négatif
Bonjour,
Merci à vous deux, et bien oui en effet je suis complètement noyé!!!
moi je voulais juste écrire autrement cela
Cells(derligne, Range("tableau[colonne1]")) = textbox.Value
afin que quand j'insere une colonne dans ma feuille ou j'ai tous mes tableaux de Données cela ne remette pas tout en cause. En fait faire référence à la colonne du tableau plutôt que la colonne de la feuille.
Merci encore
 
Vote positif 0 Vote négatif
Re,

Range("Tableau1[Colonne1]") ou comme l'a dit @Dranreb ListObjects("Tableau").ListColumns("Colonne1").Range

Vous faites référence à votre colonne de tableau (toutes ses cellules).
Après ça se manipule comme n'importe quel objet Range.

Cordialement
 
Vote positif 0 Vote négatif
Solution
bonjour
perso je ne concoit pas un tableau structuré ou la dernière ligne est vide
c'est impensable et surtout inutile à moins qu'elle vienne d’être ajoutée juste avant

il est vrai qu'un débutant en perdrait les pédales
en effet le membre "Range" peut être enfant du tableau(listobject)
mais le membre "listobject" peut être une des propriété du range (du même nom)

c'est assez rigolo cette histoire🤣

cela dit pour un ajout de ligne (car c'est tel que se conçoit un tableau structuré il ne contient pas de derniere ligne vide c'est absurde )
on ajoute un listrow(une ligne) par la la fonction "add" sur le membre " listrows" enfant du listobject

pour atteindre cette ligne en revanche on peut l'atteindre par son membre range ou listrows (le.count ou l'index)
bref vous l'avez compris
dans une même fonction ou sub on pourrait avoir besoins des deux modes

je fait une petite demo
VB: 
Sub test1()
'si on ajoute une ligne
    With Range("Tableau1").ListObject
        Set ligne = .ListRows.Add.Range
        MsgBox ligne.Address    'on obtient bien l'adress du range de cette ligne

        'exemple on rempli la nouvelle ligne complete
        MsgBox "on met l'array dans la ligne "
        ligne.Value = Array("toto", "titi", "riri", "fifi")

        'exemple 2 on rempli la cellule de la colonne "colonne1"sur cette nouvelle ligne
        MsgBox "on met ""azerty"" dans la cellule en colonne ""Colonne1"" du tableau"
        With Range(.Name & "[colonne1]")    'on y ré accede par l'object range pour chopper la colonne1 et sa derniere cellule
            .Cells(.Cells.Count) = "azerty"
        End With
    End With
End Sub

'si on veut remplir la derniere ligne existante
Sub test2()
'si on ajoute une ligne
    With Range("Tableau1").ListObject
        Set ligne = .ListRows(.ListRows.Count).Range
        MsgBox ligne.Address    'on obtient bien l'adress du range de cette ligne

        'exemple on rempli la ligne complete
        MsgBox "on met l'array dans la ligne "
        ligne.Value = Array("toto", "titi", "riri", "fifi")

        'exemple 2 on rempli la cellule de la colonne "colonne1"
        MsgBox "on met ""taratata"" dans la cellule en colonne ""Colonne1"" du tableau"
        With Range(.Name & "[colonne1]")    'on y ré accede par l'object range pour chopper la colonne1 et sa derniere cellule
            .Cells(.Cells.Count) = "tartata"
        End With
    End With
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

M
  • Résolu(e)
Microsoft 365 Trouver une valeur dans une colonne
Réponses
7
Affichages
253
mikeduff
M
  • Question Question
Microsoft 365 Ne lire que les lignes filtrées visibles d'un tableau structuré en vba
2
Réponses
24
Affichages
1 K
treza88
  • Question Question
XL 2021 [Résolu] MFC et tableau structuré
Réponses
14
Affichages
1 K
jeff1494
  • Question Question
XL 2016 annulation ou désactivation de macro
2
Réponses
27
Affichages
1 K
job75
  • Question Question
XL 2021 Barre de progression dans une listview - Tableau structuré avec barre de donnée dans la listview
Réponses
2
Affichages
599
AHK
D
  • Question Question
Microsoft 365 Procédé pour appliquer un filtre qui permet de ressortir les informations a la sélection d'une information dans une colonne.
Réponses
6
Affichages
204
djidji59430
S
  • Résolu(e)
XL 2016 Comment faire ressortir la ligne sélectionnée dans un tableau
Réponses
2
Affichages
603
Stéphane_1
S
  • Question Question
XL 2021 Création d'un Tableau croisé dynamique en évitant de charger certaines lignes.
Réponses
4
Affichages
582
jeff1494
E
  • Résolu(e)
Microsoft 365 Ajout et Suppression Date automatique
Réponses
9
Affichages
551
eric72
E
A
  • Résolu(e)
Microsoft 365 PowerPivot-comparer 2 périodes
Réponses
12
Affichages
866
Antho1234
A
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
359
AtTheOne
P
  • Résolu(e)
XL 2021 Requête API - VBA Excel - Parse JSON
Réponses
2
Affichages
495
picc
P
L
  • Résolu(e)
XL 2019 Déplacer ligne d'un tableau structuré à un autre, au choix [VBA]
Réponses
13
Affichages
1 K
Leguyl
L
O
  • Question Question
XL 2019 erreur de valeur sur formule
2
Réponses
18
Affichages
1 K
olivier1984
O
C
  • Question Question
XL 2010 Recherche de colonne et calcul sur 2 années consécutives
Réponses
0
Affichages
344
CS49
C
G
  • Résolu(e)
XL 2021 VBA dates au mauvais format
Réponses
5
Affichages
580
vgendron
  • Question Question
XL 2016 3 questions d'ordre generale
Réponses
14
Affichages
638
Neo Hyuga
B
  • Question Question
XL 2021 Transfert tableau structuré EXCEL à un endroit précis de WORD
Réponses
8
Affichages
1 K
job75
G
  • Résolu(e)
Microsoft 365 Faire une collection de collection en VBA
2
Réponses
25
Affichages
2 K
dysorthographie
J
  • Question Question
XL 2016 Tableau de bord - report de données
2
Réponses
16
Affichages
2 K
chris
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…