Value

Bonsoir,

je débute dans les macros et je souhaiterais savoir s'il était possible de donner avec "Value" le contenu d'une cellule à une autre cellule situé sur la ligne inférieure??

Merci d'avance pour vos solutions.

Romain

Bonsoir,

Grace au forum j'ai pu apprendre pas mal de chose, j'ai une formule mais elle n'utilise pas la fonction Value.

Par contre elle fonctionne parfaitement.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$A$2" Then
 Range("B2") = Target
 End If
 End Sub

Voilà

Merci Jérémy!

Je teste ça tout de suite et je valide si c'est ok!

@+

Romain

Bonjour,

Un Objet dans la programmation Objet(VBA en fait partie) possède des propriétés qu'on peut faire l'appel et des méthodes par les quelles on peut agir sur cet objet. La propriété par défaut d'un Objet cellule (Cells) est sa valeur (Value). C'est pour cette raison quand on fait appel à cet objet, souvent (pardon aux puristes de la programmation objet) on ne mentionne pas cette propriété.

Par exemple, les lignes suivantes affectent la valeur 10 à la cellule B1

Cells(1, 2) = 10
Cells(1, 2).Value = 10

Les lignes suivantes affichent la valeur de la cellule B

MsgBox Cells(1, 2)
MsgBox Cells(1, 2).Value

Malheureusement cela ne fonctionne pas pour ce que je souhaite:

cela serait plutôt quelquechose du style:

Range("B" & Ligne - 1 & ":I" & Ligne - 1).Value = [color=#BF0000]????? (ligne d'en dessous de "B" à "I")[/color]

ou une autre solution si elle fonctionne...

Merci d'avance pour votre aide.

Romain

Merci pour ta réponse Raja!

Je regarde ce que je peux "bricoler" avec ce que tu me conseilles.

Romain

Re,

Pour le moment ce n'est pas évident sans le fichier. Merci de nous joindre le fichier et quelques explications pour obtenir le résultat attendu

Re salut Raja,

Voici, en pièce-jointe, le fichier concerné.

Je souhaiterais que le choix 3 de la macro ne soit pas "ClearContents", mais plutôt de donner les valeurs des cellules de la ligne inférieure (le doublon "original") afin que je puisse traiter ces données avec un TCD.

Merci encore, dans l'attente d'une réponse de ta part.

Romain

Re ,

C'est bon, j'ai trouvé!

C'était juste remplacer "ClearContents" par "FillUp".

Merci encore pour votre implication.

Cordialement,

Romain