Recopier la valeur d'une cellule1 dans une cellule variable2

Question

Bonjour,

Sur Excel, j'aimerais créer une macro qui recopie la valeur d'une cellule du classeur 1 dans une cellule vide d'un tableau contenu dans un classeur 2. Pour cela j'ai créé une boucle If permettant de détecter si une cellule est vide, si elle est remplie elle se décale d'une colonne (du moins c'est ce que j'ai essayé de faire). Puis dans l'idéal il faudrait que les valeurs copiées soient collées dans le tableau du deuxième classeur.

n = 1

If IsEmpty(Cells(n, 2)) = True Then

Sheets("feuille 1").Range("C20").Copy
Sheets("feuille 2").Cells(2, n).Value = Paste

Else
    n = n + 1
    End If

Le problème c'est que je n'arrive pas à coller les valeurs copiées dans les cellules vides.

Pourriez-vous m'aider ?

Merci d'avance

dysorthographie · Answer

Bonsoir,

With Sheets("feuille 2")
    .Cells(2, .Columns.Count).End(xlToLeft).Offset(, 1).Value = Sheets("feuille 1").Range("C20").Value
End With

Recopier la valeur d'une cellule1 dans une cellule variable2

1 réponse

Votre réponse