Copier vers une autre feuille sans selectionner la feuille

bbobb · 19 Juillet 2013

Bonjour à tous,
Sans doute un sujet maintes fois évoqué, mais je n'ai pas trouvé.... 🙁
Je cherche à copier une plage de cellule selectionnée sur une feuille vers une autre feuille sans selectionner l'autre feuille.
Ci dessous le code avec selection...

Code:

    Range("B4").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("Feuil3").Select
    Cells(4, col_date).Select
        Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

Merci d'avance pour votre aide
Bonne journée
Bbobb

chris · 19 Juillet 2013

Re : Copier vers une autre feuille sans selectionner la feuille

Bonjour

Code:

Range("B4").CurrentRegion.Copy
    Sheets("Feuil3").Cells(4, col_date).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

GIBI · 19 Juillet 2013

Re : Copier vers une autre feuille sans selectionner la feuille

Bonjour,

Sheets("Feuil3").Cells(4, col_date).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

GIBI

bbobb · 19 Juillet 2013

Re : Copier vers une autre feuille sans selectionner la feuille

Merci beaucoup tout les deux.

bonne journée
Bbobb

Copier vers une autre feuille sans selectionner la feuille

bbobb

XLDnaute Occasionnel

chris

XLDnaute Barbatruc

GIBI

XLDnaute Impliqué

bbobb

XLDnaute Occasionnel

Discussions similaires

Copier vers une autre feuille sans selectionner la feuille

bbobb

XLDnaute Occasionnel

chris

XLDnaute Barbatruc

GIBI

XLDnaute Impliqué

bbobb

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency