Insertion de ligne et copier coller en valeurs

Chessnocoma · 28 Avril 2011

Bonjour,

Je travail sur la création d'un fichier interne en ce moment, et je cherche à réaliser une macro, son but serait simple, Insérer un ligne 2 dans ma feuille "Archives" puis faire un copier coller en valeur de la cellule C3 de ma feuille "Situation" vers la Cellule K2 de ma feuille "Archives."

je vous remercie par avance pour l'aide que vous m'apporterez

Pierrot93 · 28 Avril 2011

Re : Insertion de ligne et copier coller en valeurs

Bonjour,

regarde peut être ceci :

Code:

With Sheets("Archive")
    .Rows(2).Insert
    .Range("K2").Value = Sheets("Situation").Range("C3").Value
End With

bonne journée
@+

Chessnocoma · 28 Avril 2011

Re : Insertion de ligne et copier coller en valeurs

C'est exactement ce qu'il me fallait !
Un grand merci Pierrot !

Chessnocoma · 28 Avril 2011

Re : Insertion de ligne et copier coller en valeurs

Par contre comment est ce que je peux faire si je veux que le collage se fasse sur la dernière cellule vide de la colonne K ??

Pierrot93 · 28 Avril 2011

Re : Insertion de ligne et copier coller en valeurs

Re,

modifie comme suit :

Code:

With Sheets("Archive")
    .Rows(2).Insert
    .Range("K65536").End(xlUp)(2).Value = Sheets("Situation").Range("C3").Value
End With

Chessnocoma · 28 Avril 2011

Re : Insertion de ligne et copier coller en valeurs

Merci beaucoup !
Ca marche impécable !

Insertion de ligne et copier coller en valeurs

Chessnocoma

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

Chessnocoma

XLDnaute Junior

Chessnocoma

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

Chessnocoma

XLDnaute Junior

Discussions similaires