Bonjour à tous, je début en VBA depuis peu et j'ai un problème surement tout simple mais que je n'arrive pas à résoudre en VBS, alors que cela fonctionne bien en VBA.
Je n'arrive pas à travers mon script vbs à sélectionner des colonnes non contiguës d'un tableur excel.
J'ai beau chercher sur le forum et sur google, aucune solution ne marche
Voici le script :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim objXL,rng1,rng2
SET objXL = CreateObject("Excel.Application")
Const xlDown = -4121
Const xlToRight = -4161
Const xlUp = -4162 
WITH objXL
    .Workbooks.Open ("C:/Users/ABC/Desktop/TEST.xls")
Set rng1 = objXL.Range("D2", objXL.Selection.End(xlDown))
Set rng2 = objXL.Range("G2", objXL.Selection.End(xlDown))
   .Application.Union(rng1, rng2).Select
    .Application.ActiveWorkbook.Save
    .Application.Quit
    .Application.DisplayAlerts = False
    .Application.DisplayAlerts = True
END WITH
SET objXL = Nothing
Il persiste à sélectionner toutes les colonnes entre la C et la G !

En VBA j'ai essayé ceci qui fonctionne :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Application.Union(Range("C2:C" & Range("C" & Rows.Count).End(xlUp).Row), Range("G2:G" & Range("G" & Rows.Count).End(xlUp).Row)).Select
mais dans le script j'ai une erreur de type Objet requis : 'Rows'
Qu'est ce que cela signifie ?

Merci pour votre aide !