Afficher titre colonnes

Bonjour,
En J2 tu mets
=INDIRECT(ADRESSE(8;CELLULE("colonne")))
mais comme l'adresse de la cellule active ne se met à jour
que lorsque il y a recalcul
c'est à dire :
soit une cellule est modifiée
soit touche F9
soit tu colles ceci dans le code de la feuille ad'hoc
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 9 And Target.Column < 45 Then
ActiveSheet.Calculate
End Sub

Ou en encore
tout VBA
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 9 And Target.Column < 45 Then
[J2] = Cells(8, Target.Column)
Else
[J2] = ""
End If
End Sub

Salutations
RaMa

"Octave" <octave@free.fr> a écrit dans le message de
news:ccp15s$t78$1@news-reader5.wanadoo.fr...

Bonjour,

Afin de me repérer plus facilement dans un tableau, je souhaiterais que le
titre d'une colonne (situé (J8:AR8)) s'affiche dans la cellule J2 lorsque
une cellule de la même colonne est sélectionnée.

Ex :
Si la cellule J12 est sélectionnée alors le titre situé en J8 s'affiche en
J2
Si la cellule N36 est sélectionnée alors le titre situé en N8 s'affiche en
J2
Si la cellule AR52 est sélectionnée alors le titre situé en AR8 s'affiche
en

J2
...

Merci à la bonne âme qui saura me répondre.

Octave

Salut Octave,

Tu pourrais nommer ton tableau, par exemple, «ici» et
si tu désires que le titre apparaisse en J2 quand tu sélectionnes
une cellule de ton tableau, tu fais un clic droit sur l'onglet de
ta feuille, un clic gauche sur «Visualiser le code» et tu
colles cette macro sur la feuille vierge qui devrait apparaître.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("ici")) Is Nothing Then _
[j2] = Cells(8, Target.Column)
End Sub

Est-ce que ça te convient ? ( Il y a d'autres manières de faire )

Serge



"Octave" <octave@free.fr> a écrit dans le message de news:
ccp15s$t78$1@news-reader5.wanadoo.fr...

Bonjour,

Afin de me repérer plus facilement dans un tableau, je souhaiterais que le
titre d'une colonne (situé (J8:AR8)) s'affiche dans la cellule J2 lorsque
une cellule de la même colonne est sélectionnée.

Ex :
Si la cellule J12 est sélectionnée alors le titre situé en J8 s'affiche en
J2
Si la cellule N36 est sélectionnée alors le titre situé en N8 s'affiche en
J2
Si la cellule AR52 est sélectionnée alors le titre situé en AR8 s'affiche
en

J2
...

Merci à la bonne âme qui saura me répondre.

Octave

Bonjour,

"garnote" <rien@absent.net> a écrit dans le message de
news:GxUHc.27651$eO.24859@edtnps89...

Salut Octave,
...

Est-ce que ça te convient ? ( Il y a d'autres manières de faire )

Rien à redire, à part un grand merci pour la pertinence et l'efficacité

Octave

Bonjour,

"RaMA" <rmarceauPas2Spam@free.fr> a écrit dans le message de
news:ufUURapZEHA.2388@TK2MSFTNGP11.phx.gbl...

Bonjour,
Salutations
RaMa

Merci beaucoup RaMa.
J'ai utilisé la version de Garnote car elle me semblait plus rapide à mettre
en place.
Mais la votre va me permettre de comprendre le principe et surement de
pouvoir le réexploiter à d'autres occasions.

Merci encore

Octave