Plage variable fichier fermé ADO

[Pierre31]

Bonjour à toutes et tous,
Je souhaite pouvoir copier par ADO une plage de dimension variable d'un fichier fermé de façon à obtenir un résultat semblable à l'exemple ci-dessous:

Sub SelectZone ()

'selection dernière cellule
Selection.SpecialCells(xlCellTypeLastCell).Select

'N° ligne cellule active
ligne = ActiveCell.Row
'N° colonne cellule active
colonne = ActiveCell.Column
'ma zone = ligne active -1
lignActv = ligne - 1
'ma zone = colonne active -2
colActiv = colonne - 2
'selection de ma zone
Range(Cells(5, 1), Cells(lignActv, colActiv)).Select


End Sub

D'avance merci pour vos réponses.
Cordialement
Pierre

 

[MichelXld]

rebonsoir Pierre

la selection correspond à l'ensembles des données dans la feuille ?

si oui , ce lien pourra peut etre t'aider

Lien supprimé

si non , peux tu joindre un classeur exemple pour voir exactement ce que tu veux recuperer



bonne soirée
MichelXld