Bonjour à tous.
J'ai un code vb qui dois me permettre de copier une colonne et de la coller dans une autre tout en sachant que la colonne de départ contient des chiffres. Puis il faut supprimer la colonne d'origine. Voici le code que j'ai fais:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim xlApp 
 
Set xlApp = CreateObject("Excel.Application")
    xlApp.Visible = True
    xlApp.workbooks.Open("C:/PaymentFiles/us_origine.xls")  
    Columns("AF:AF").Select
    Selection.Copy
    ActiveWindow.SmallScroll ToRight:=2
    Columns("AK:AK").Select
    ActiveSheet.Paste  
    Columns("AF:AF").Select
    Selection.Delete Shift:=xlToLeft
Cependant, lorsque je lance l'exécution j'ai un message d'erreur qui dit:
type incompatible : Columns.
Je ne comprend pas bien cette erreur.

Merci de m'aider s'il vous plait
Merci