comment sélectionné sans range 1000 cellules

vbacrumble à dit:

Bonjour

Donc la cellule active est au moins sur la ligne 1001 ?

Cliquez pour agrandir...

James007 à dit:

Bonjour,

As-tu essayé : Activecell.Offset(-1000,0) ....

Cliquez pour agrandir...

vbacrumble à dit:

Bonjour

Donc la cellule active est au moins sur la ligne 1001 ?

Essaie ces macros

Code:

Sub macro1000()
Range(ActiveCell, ActiveCell.Offset(-1000, 0)).Select
End Sub

Code:

Sub macroSelection()
Dim Ligne As Long
Ligne = ActiveCell.Row - 1
Range(ActiveCell, ActiveCell.Offset(-Ligne, 0)).Select
End Sub

Cliquez pour agrandir...