Discussion :

[Carambar]

Bonjour,

(Merci tout d'abord pour l'aide sur ma précédente question, je n'ai pas voulu remonter la discussion juste pour ça, j'espère que la personne qui m'a aidée me lira ici !)

Donc me voilà avec une autre question ... je cherche depuis ce matin, j'ai avancé, mais pas encore trouvé la solution.

J'ai créé par Vba un TCD, la source étant une feuille de données de taille variable, jusque là, tout va bien.

J'aimerais simuler le "double-clic" dans une cellule du TCD pour créer une page de données.

Mon utilisateur n'aura pas accès au tableau, mais entrera dans un Userform les variables permettant de savoir quel détail il veut : tout le détail d'une colonne, tout le détail d'une ligne ou encore le détail d'un croisement (d'une cellule donc)

Sur mon formulaire je demanderais les critères :
- champ ligne : saisir valeur (combobox) ou * pour tous
- champ colonne : saisir valeur (combobox) ou * pour tous

Et ensuite, je ferais un "ShowDetail" de la bonne cellule ...

Mais comment retrouver la cellule dans mon TCD ?

Merci encore d'avance !

[jfontaine]

Bonjour,

A adapter a ton cas

Attention, il n'y a pas de gestion d'erreur dans le code ci dessous
Il faut que les valeurs recherchées existent

Code :

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

1
2
3
4
5
6
7
8
Dim l As Integer
Dim c As Integer
 
l = Application.WorksheetFunction.Match("titi", Range("A1:A8"), 0)
c = Application.WorksheetFunction.Match("marcel", Range("A4:E4"), 0)
 
Cells(l, c).Select
Selection.ShowDetail = True