Problème tableau structurés

Bonjour à tous,

Objectif : Je cherche le code pour selectionner une des cellules d'en-tête d'un des tableaux structurés de ma feuille.

Cette selection se fera par le biais d'une variable qui se nomme c : Problème la valeur dans ma variable est "YDR148" mais le nom du tableau recherché est "__YDR148"

Suite objectif : Comment faire donc pourqu'il choisisse le bon nom de tableau et ne prenne pas en considération les ___.

Sub testo()

Merci d'avance

Bonjour,

pour commencer ... dans Sub ScénarioAucunDéfaut()

Range(LigCourante, 3).Value

à remplacer par

cells(LigCourante, 3).Value

Après, je n'ai pas vraiment compris ce que tu voulais faire

Problème la valeur dans ma variable est "YDR148" mais le nom du tableau recherché est "__YDR148"

Non ta variable est YDR 148

Sub testo()
Dim plage As Range
Dim c As Variant

Feuil2.Select

c = Range("C4").Value

Feuil7.Select

Range("_" & Replace(c, " ", "")).Select

End Sub

??

Effectivement

Oui j'avais oublié de le modifier dans ce fichier

Peux-tu m'expliquer ta dernière ligne dans ton code ?

Tout simplement ma variable C prend la valeur "YDR 148" puis j'affecte une nouvelle valeur à la variable c en effacant simplement l'espace.

capture8

je sélectionne Range("_" & Replace(c, " ", "")).Select c'est à dire l'ensemble des cellules constituant _YDR148 (j'enlève l'espace et ajoute un blanc souligné devant) ce qui me semble être le bon nom du tableau comme tu le dmandais !

Merci beaucoup j'ai compris.

Sauf ce que j'avais fait exprès d'omettre le fait que la quantité de "___" peut varier.

Donc ce code ne marche uniquement dans le cas où les noms de tableaux ne comportent qu'un seul _ devant le YDR148

Il est possible de boucler pour prendre la quantité de _ dont tu as besoin en testant l'existence de la zone.

Je regarderai demain.

Merci beaucoup pas de soucis,

Belle soirée à toi

By the way ... tu utilises c pour 2 choses différentes ! cela risque de coincer

c = Replace(c, " ", "")

Set plage = Range("B1:G2")
For Each c In plage

Avec une recherche du nombre de _ limité à 5

Sub testo()
Dim plage As Range
Dim c As String

Feuil2.Select

c = Range("C4").Value

Feuil7.Select

c = Replace(c, " ", "")
n = 0
Do
    c = "_" & c: n = n + 1
Loop Until ZoneExiste(c) Or n = 5
If ZoneExiste(c) Then Range(c).Select

End Sub
Function ZoneExiste(z As String) As Boolean
    ZoneExiste = False
    On Error GoTo fin
    Range(z).Select: ZoneExiste = True
fin:
End Function

Merci beaucoup mais on s'est pas parfaitement compris je dois mal m'exprimer

Voici des photos où j'explique tout là je pense que c'est bon

capture9 capture10

Merci encore

Je te fais un fichier simplifié ...

Voici, dis moi ce qui ne te vas pas (mis à part la sélection de l'en-tête ...)

Nota : tu peux affecter le même nom dans différentes feuilles du même fichier en limitant la portée du nom. https://forum.excel-pratique.com/viewtopic.php?t=31996

3trouve.xlsm (20.64 Ko)

J'ai attrribué le même nom ici à 2 onglets en indiquant comme nom test1!ici pour en limiter l'étendue à l'onglet test1, idem pour test2

capture d ecran 631

Merci beaucoup encore je régarde déja le code dans ton fichier.

Mais est ce que c'est possible également de jouer sur l'étendue dans le gestionnaire de vue si ce sont des tableaux structurés

Mais est ce que c'est possible également de jouer sur l'étendue dans le gestionnaire de vue si ce sont des tableaux structurés

je n'ai pas essayé ... je me demande s'il ne faut pas indiquer en plus un autre nom ... je vais tester

La réponse est oui ... ajoute des lignes et tablo les prendra aussi en compte

6test-noms.xlsx (10.17 Ko)

Chapeau bas, un grand merci à toi

Rechercher des sujets similaires à "probleme tableau structures"