copier /coller une colonne dans un fichier excel
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:
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:
Citation:
type incompatible : Columns.
Je ne comprend pas bien cette erreur.
Merci de m'aider s'il vous plait
Merci
