Problème de Range erreur1004 VBA

Question

Bonjour, 
j'ai besoin d'aide en visual basic. J'ai beau essayer toutes les formes possibles et inimaginables, je n'arrive pas a finir ma macro, qui copie les des valeurs et les recolle en sens inverse sur une autre feuille de calcul... Une erreur du range apparait à chaque fois. Avez vous une idée ?? Merci !

Voila ma boucle qui ne passe pas à l'exécution : 

Do While s > t 
        ThisWorkbook.Sheets("Feuille1").Cells(s, 12).Select
        Selection.Copy
        ThisWorkbook.Sheets("Feuille2").Cells(i, 11).Select
        Selection.PasteSpecial Paste:=xlPasteValues
        i = i + 1
        s = s - 1
    Loop



Configuration: Windows XP / Firefox 12.0

f894009 · Answer

Bonjour,

A adapter car votre demande manque de precision.

Sub test()
  s = 10
  i = 1
  Do While s > 1
    Worksheets("Feuil2").Cells(i, 1) = Worksheets("Feuil1").Cells(s, 1)
    i = i + 1
    s = s - 1
  Loop
End Sub

Problème de Range erreur1004 VBA

1 réponse

Votre réponse

Discussions similaires

Newsletters