OVH Cloud OVH Cloud

copier

6 réponses
Avatar
tdm850
Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui contient des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 ) retourner
sur ma 1 ere feuille et que le nom de "toto" se mette automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en A1 de la
feuille 1

avez vous une solutions svp ???????
merci

6 réponses

Avatar
Daniel
Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui contient des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 ) retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en A1 de
la
feuille 1

avez vous une solutions svp ???????
merci


Avatar
tdm850
Bonjour Daniel,
faut il créer un bouton pour lui affecter cette macro, ou sinon, ou copier
cette formule ????


Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui contient des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 ) retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en A1 de
la
feuille 1

avez vous une solutions svp ???????
merci







Avatar
Daniel
Si tu copies ce code dans la feuille, le fait de cliquer sur la cellule
déclenche la macro, à condition que la cellule active soit ailleurs qu'en
C1; sinon, clique en n'importe où ailleurs, puis en C1.
Cordialement.
Daniel
"tdm850" a écrit dans le message de news:

Bonjour Daniel,
faut il créer un bouton pour lui affecter cette macro, ou sinon, ou copier
cette formule ????


Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui contient
des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 )
retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en A1
de
la
feuille 1

avez vous une solutions svp ???????
merci









Avatar
tdm850
Bonsoir Daniel je pense que je doit louper quelque chose mais j'ai beau creer
une nouvelle macro avec ton programme, rien ne se passe
es tu sur de ta formule ???????


Si tu copies ce code dans la feuille, le fait de cliquer sur la cellule
déclenche la macro, à condition que la cellule active soit ailleurs qu'en
C1; sinon, clique en n'importe où ailleurs, puis en C1.
Cordialement.
Daniel
"tdm850" a écrit dans le message de news:

Bonjour Daniel,
faut il créer un bouton pour lui affecter cette macro, ou sinon, ou copier
cette formule ????


Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui contient
des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 )
retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en A1
de
la
feuille 1

avez vous une solutions svp ???????
merci














Avatar
Daniel
Bonsoir.
Regarde le classeur à l'adresse :
http://cjoint.com/?kkvJFxnQ3w
Daniel
"tdm850" a écrit dans le message de news:

Bonsoir Daniel je pense que je doit louper quelque chose mais j'ai beau
creer
une nouvelle macro avec ton programme, rien ne se passe
es tu sur de ta formule ???????


Si tu copies ce code dans la feuille, le fait de cliquer sur la cellule
déclenche la macro, à condition que la cellule active soit ailleurs qu'en
C1; sinon, clique en n'importe où ailleurs, puis en C1.
Cordialement.
Daniel
"tdm850" a écrit dans le message de
news:

Bonjour Daniel,
faut il créer un bouton pour lui affecter cette macro, ou sinon, ou
copier
cette formule ????


Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien
hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui
contient
des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 )
retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en
A1
de
la
feuille 1

avez vous une solutions svp ???????
merci
















Avatar
tdm850
bravo et merci à toi Daniel


Bonsoir.
Regarde le classeur à l'adresse :
http://cjoint.com/?kkvJFxnQ3w
Daniel
"tdm850" a écrit dans le message de news:

Bonsoir Daniel je pense que je doit louper quelque chose mais j'ai beau
creer
une nouvelle macro avec ton programme, rien ne se passe
es tu sur de ta formule ???????


Si tu copies ce code dans la feuille, le fait de cliquer sur la cellule
déclenche la macro, à condition que la cellule active soit ailleurs qu'en
C1; sinon, clique en n'importe où ailleurs, puis en C1.
Cordialement.
Daniel
"tdm850" a écrit dans le message de
news:

Bonjour Daniel,
faut il créer un bouton pour lui affecter cette macro, ou sinon, ou
copier
cette formule ????


Bonjour.
Mets ce code dans la feuille 2. Note qu'il supprime le lien
hypertexte.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> Range("C1").Address Then Exit Sub
[C1].Copy Sheets("Feuil1").Range("A1")
End Sub

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

Bonsoir,
en cliquant sur la cellule A1, j'ouvre un lien hypertexte qui
contient
des
noms.
Je voudrais en cliquant sur le nom "toto" (c1 de la feuilles 2 )
retourner
sur ma 1 ere feuille et que le nom de "toto" se mette
automatiquement
en A1

soit copier la cellule C1 (en cliquant dessus) de la feuille 2 , en
A1
de
la
feuille 1

avez vous une solutions svp ???????
merci