Comment copier une cellule située au-dessus

fele57 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
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 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
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