Collage automatique de cellule Excel

will974du91 Messages postés 1160 Statut Membre -  
will974du91 Messages postés 1160 Statut Membre -
Bonjour,

Je souhaiterai avoir de l'aide pour pouvoir copier une cellule vers un autre onglet à 2 endroits differents.

exemple:

J'ai la colonne A, je souhaite que chaque ligne, donc cellule A1, A2, A3, .... quand je suis dessus, remplisse automatiquement un onglet a 2 endroits differents de cette onglet ex F1 et F16.

A voir également:

8 réponses

boby5151 Messages postés 106 Statut Membre 16
 
Il suffit que tu ailles sur les onglets destination et que, par une formule, tu ailles chercher tes cellules A1..

https://sites.google.com/site/ziketzak/
0
will974du91 Messages postés 1160 Statut Membre 39
 
oui mais quel formule? Se n'ai pas un calcul que je souhaite, juste un report des info dans un autre onglet.
0
Raymond PENTIER Messages postés 71864 Date d'inscription   Statut Contributeur Dernière intervention   17 397
 
Dans les 2 cellules qui doivent recevoir la valeur de A1, tu mets la formule =Feuil1!A1
0
will974du91 Messages postés 1160 Statut Membre 39
 
ok merci c'est presque sa.

Au lieu d'intiqué une case je souhaite Sur la feuille ou jai les info de base, je veus pouvoir cliqué sur cette ligne et quand je fais sur l'autre feuille, qu il me recupère les infos directement.
0
Raymond PENTIER Messages postés 71864 Date d'inscription   Statut Contributeur Dernière intervention   17 397
 
Désolé ; ça dépasse très largement mes compétences !
c'est plus de la magie que de l'informatique ...
0
boby5151 Messages postés 106 Statut Membre 16
 
J'ai l'impression que will... voudrait un "lien hypertext". Pas clair.
0
will974du91 Messages postés 1160 Statut Membre 39
 
merci mais c'est faisable?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
bonjour

avec une petite macro F1 et F16 sont ici en feuil2 la colonne A sur un autre onglet(ici feuil1 ou 3 ou... )

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Columns("A")) Is Nothing Then
     With Sheets(2)
          .Range("F1") = Target
          .Range("F16") = Target
     End With
End If
End Sub


pour installer
faire un copier de ce code
clic droit sur le nom de l'onglet
visualiser le code
coller
0
will974du91 Messages postés 1160 Statut Membre 39
 
sur quel onglet dois je le faire? L'onglet qui dois reporté les infos, ou celui ou il y a les info?
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

celui ou il y a les info

et tes cellules "cibles" F1 F16 sont sur la feuil2 :sheets(2)
si tu as nommé tes onglets tu peux écrire pour la feuille "cible" par ex
sheets("machin")
0
will974du91 Messages postés 1160 Statut Membre 39
 
sa ne fait rien de special.
0