recopier dans autre feuille uniquement valeurs

Robert

XLDnaute Barbatruc

Repose en paix

• 23 Février 2012

• #2

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

Bonsoir Pascal, bonsoir le forum,

Essaie comme ça :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(ActiveCell.Row, 1).Copy Sheets("Feuil2").Range("B4")
Cells(5, ActiveCell.Column).Copy Sheets("Feuil2").Range("E1")
End Sub

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 23 Février 2012

• #3

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

bonsoir et merci robert
je regarde ça demain là je vais aller me coucher je suis nase

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 23 Février 2012

• #4

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

Bonsoir Pascal, bonsoir le forum,

Ha si t'es nase arrête... Comme il disent en Galilée.

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 24 Février 2012

• #5

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

bonjour
pffffffff!!! comment j'ai fais pour passer à coté de celle la
en même temps
je suis nase j'arrête ne veux pas dire grand chose
quoi que je suis aussi fan de l à peu près
bravo je ma replacerai
bon alors voyons voir ce code

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 24 Février 2012

• #6

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

Code:

 Cells(ActiveCell.Row, 1).Copy Sheets("Feuille de chantier").Range("B4")Cells(5, ActiveCell.Column).Copy Sheets("Feuille de chantier").Range("E1")

Code:

 Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

comment faire pour intégrer le 2eme code dans le premier pour n'avoir en copie que la valeur et non le format comme je ne l'avais pas précisé
merci

 

Dernière édition: 24 Février 2012

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 24 Février 2012

• #7

Re : copier dans une feuille la cellule de la ligne 6 à la croisée de la cellule acti

j'ai changé le titre celui ci est plus parlant et correspond au post #6
c'est pour ne pas recréer de fil

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 24 Février 2012

• #8

Re : recopier dans autre feuille uniquement valeurs

Bonjour Pascal, bonjour le forum,

Essaie comme ça :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Feuil2").Range("B4") =Cells(ActiveCell.Row, 1).Value
Sheets("Feuil2").Range("E1") = Cells(5, ActiveCell.Column).Value
End Sub

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 24 Février 2012

• #9

Re : recopier dans autre feuille uniquement valeurs

merci Robert

 

Vote positif 0 Vote négatif