Réduire le nombre de lignes et de colonnes

  • Initiateur de la discussion Initiateur de la discussion Sylvain
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

Sylvain

Guest
Bonjour à tous,
Je me demandais s'il était possible dans une feuille Excel de supprimer définitivement les lignes dont on ne se sert pas.
Imaginons que ma feuille comporte 50 lignes, les 65000 et des poussières restantes ne me sont pas utilies.
Est-il alors possible de les supprimer ?

Merci pour votre aide
 
Bonjour Sylvain

Il y a aussi comme option de bloqué le scroll(Trouver sur ce site il y a une sem)

Bloque l'accès à cells autre que A1:S50

À mettre dans la feuil
Private Sub Worksheet_Activate()
ActiveSheet.ScrollArea = "a1:s50"
End Sub

Pour tous le classeur

Private Sub Workbook_Open()
Dim Feuille As Worksheet
For Each Feuille In ThisWorkbook.Sheets
Feuille .ScrollArea = "$A$1:$s$50"
Next Feuille
End Sub
 
Bonjour,

Le scrollarea fonctionne correctement, il sert à empecher la possibilité d'aller voir les autres cellules.

En revanche, existe-t'il un moyen de modifier la plage de cellule prise en compte par les barres de défilement?

Mon problème est le suivant: ma barre de défilement verticale part de la ligne n°1 et va jusqu'à la ligne n°65535. Ainsi, lorsque je fais défiler le curseur de cette barre (qui est minuscule), je descend d'environ 100 lignes. Mon souhait est de pouvoir indiquer à cette barre que sa plage de cellules/lignes est maintenant de 1 à 200 (car je n'ai que les 100 premières lignes d'utilisées), ce qui me permettra une meilleure précision de défilement (curseur plus grand).

Merci pour toute indication en VBA sur ce point...

Maxence
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Résolu(e)
Microsoft 365 DateDif()
Réponses
5
Affichages
287
Réponses
0
Affichages
626
Retour