Bonjour,
je souhaite faire une sélection dans une feuille de calcul de toutes les lignes dont la première cellule est non vide.
J'ai donc utilisé le code suivant :
Mais Excel bloque sur la dernière ligne Range(Plage).Select. Je ne comprends pas pourquoi. QUelqu'un peut-il m'aider ?Code:[I]Plage = "" Dim i As Integer i = 2 While Cells(i, 1).Value <> "" Plage = Plage & i & ":" & i & "," i = i + 1 Wend If Right(Plage, 1) = "," Then Plage = Left(Plage, Len(Plage) - 1) Range(Plage).Select
Merci d'avance
Ptigone
-----