Petite modification macro

Résolu

kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention -
kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention - 24 mars 2011 à 13:18

Bonjourà tous !

Je vous expose mon problème, il me faut une macro qui selectionne la valeur d'une cellule active d'un tableur feuille 1 pour la retransmettre dans une case spécifique feuill2.

A chaque changement de cellule dans le tableur la macro changerait égalment la valeur de la case feuille 2.

Voici la macro que j'ai :

Sub Macro1()

Range("K18").Select
Selection.Copy
Range("J18").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
Range("J18").Select

End Sub

Cependant au lieu de modifier dans la case, elle en créée une nouvelle.

Help !

Afficher la suite

A voir également:

Petite modification macro
Suivi de modification word - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Logiciel gratuit modification pdf - Guide
Modification dns - Guide
Petite amie virtuelle en français gratuit - Accueil - Intelligence artificielle

5 réponses

Réponse 1 / 5

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 761

Bonjour,
Essayons d'être plus clair...
Tu veux :
1- que la valeur de ta cellule active feuille1 (peu importe la cellule K18, AJ35, B13...) soit copiée/collée dans J18 feuille2?

2- que la valeur de ta cellule active feuille1 (peu importe la cellule K18, AJ35, B13...) soit copiée/collée dans son homonyme feuille2 (dans l'exemple Feuil1!K18 --> Feuil2!K18, Feuil1!AJ35 --> Feuil2!AJ35...) ?

Tu dis, 1 ou 2 ou autre choix...

PS : tu connais elninio?

Franck P

Réponse 2 / 5

kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention 9

dsl pour elninio il boss avec moi je lui avait dis que je m'en occupai mais il a posté un message....

je veux que la valeur de ma celulle active feuille1 (peu importe la cellule d'une collonne précise B2, B3, B6, ...) soit copieé/collée dans une case feuille 2 (par exemple J18)

Réponse 3 / 5

kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention 9

tu as cerné le problème ?

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 761

Bien sur. Je faisais juste autre chose...
Je n'ai pas testé, mais ça doit être quelque chose comme :

With Sheets("Feuil2")
.Range("J18").Value = ActiveCell.Value
End With

Réponse 4 / 5

kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention 9

ton code a pas l'air mauvais mais il ne marche pas, tu peux s'il te plait remettre toute la macro je me suis peut etre trompé quelque part, merci de ton aide

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 761

Salut,
Ben il y a là toute la macro...

Sub Macro1() 
With Sheets("Feuil2")
    .Range("J18").Value = ActiveCell.Value
End With
End Sub

Sinon essaie :

Sub Macro2()
Dim Valeur As String

Valeur = ActiveCell.Value
With Sheets("Feuil2")
    .Range("J18").Value = Valeur
End With
End Sub

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

Posez votre question

Réponse 5 / 5

kgigant Messages postés 202 Date d'inscription Statut Membre Dernière intervention 9

Merci beaucoup c'est exactement ce que je voulais !!!!

Discussions similaires

A quoi correspond cette croix sur snapchat

comment savoir qu'une personne nous a supprimé Snapchat

Transformer un chiffre en lettres dans excel sans macro

Votre réponse

Discussions similaires