Comment copier une cellule située au-dessus

Fermé
fele57 Messages postés 1 Date d'inscription dimanche 28 septembre 2014 Statut Membre Dernière intervention 28 septembre 2014 - 28 sept. 2014 à 18:46
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 1 oct. 2014 à 11:03
Bonjour,
Dans une liste , lorsque la cellule ne contient rien je voudrais copier la valeur de la cellule située juste au-dessus.
Merci pour votre aide


A voir également:

1 réponse

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
1 oct. 2014 à 11:03
Bonjour,

Range("A1").End(xlDown).Offset(1, 0).Select 'ligne vide colonne A
ActiveCell.Offset(-1, 0).Select 'selection cellule au dessus
Selection.Copy 'copie selection
Range("C8").Select
ActiveSheet.Paste

0