Copier juste le contenu d'une cellule VBA

mapomme

XLDnaute Barbatruc

Supporter XLD

• 20 Mars 2019

• #2

Bonjour @Sa Mariam,
Cette instruction devrait suffire:

VB:

Sheets("Feuille2").Range("B" & a) = Sheets("Feuille1").Range("B" & k)

 

Vote positif 0 Vote négatif

S

Sa Mariam

Guest

• 20 Mars 2019

• #3

Malheureusement ça donne aucun résultat

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 20 Mars 2019

• #4

Re @Sa Mariam,
voir le fichier joint qui chez moi fonctionne.

 

Pièces jointes

• Sa Mariam- copie valeur- v1.xlsm

  18 KB · Affichages: 14

Vote positif 0 Vote négatif

S

Sa Mariam

Guest

• 22 Mars 2019

• #5

Salut, Merci pour ta réponse, je sais pas pourquoi les cellules restent vide dans mon cas

 

Vote positif 0 Vote négatif

S

Sa Mariam

Guest

• 22 Mars 2019

• #6

Sheets("Feuille1").Select
Range ("B" & k).Select
Selection.Copy
Sheets("Feuille2").Select
Range("B" & a ).Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _
SkipBlanks:= False, Transpose:=False
Sheets("Feuille 1").Select
Application.CutCopyMode=False


Et ça a marché finalement
Merci pour votre aide

 

Vote positif 0 Vote négatif