vba excel, probleme avec variable dans fonction copy destination

Question

Sub Macro5()
' Macro5 Macro
' Macro enregistrée le 23/11/2011 par renouxe
 
 ThisWorkbook.Worksheets("mvtsvalorises").Activate
    
    Dim Vcellulebas As Range
    
    Range("A1").End(xlDown).Select
    
    ActiveCell.Offset(1, 0).Select
    
    Set Vcellulebas = ActiveCell
    
    Workbooks("mvtsprod.txt").Activate
    
     ThisWorkbook.Worksheets("mvtsvalorises").Activate
    
    Range("A1").Select
        Selection.Copy Destination:=ThisWorkbook.Worksheets("mvtsvalorises").Vcellulebas
    'copie les données texte dans le fichier excel
        
End Sub



Lorsque je lance cette macro, elle "plante" au niveau de la ligne Selection.Copy (toute la ligne est surlignée en jaune). J'ai essayé un autre code : 
Selection.Copy Destination:=ThisWorkbook.Worksheets("mvtsvalorises").Range(Vcellulebas) 
ou 
Selection.Copy Destination:=ThisWorkbook.Worksheets("mvtsvalorises").Range("Vcellulebas") 
mais rien n'y fait.
Je suppose que c'est au niveau de ma variable Vcellulebas mais je n'arrive pas à trouver la solution.
Merci d'avance pour votre aide.

Emlyd

ucfoutu · Answer

Bonjour,
C'est "bourré" de petites (euh ...) choses à corriger/modifier ici et là, mais, pour y parvenir en parfaite connaissance de cause, il nous faut savoir ce que tu VEUX (pas que tu obtiens) exactement sélectionner par :
Range("A1").End(xlDown).Select


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Vba excel, probleme avec variable dans fonction copy destination

1 réponse

Votre réponse

Discussions similaires