eliminer la barre défilante

[TheProdigy]

Bonjour à tous,
Comment avoir selement les cellules colorés qui sont visibles (non actives c'est encore un plus) tout en éliminant la barre défilante?
Merci infinment

 

[JYLL]

Re : eliminer la barre défilante

Bonsoir Adilprodigy et le Forum,

Il te suffit d'aller dans "Outils" "options" et de décocher "Barre de défilement horizontale" et "Barre de défilement verticale".

Puis tu sélectionnes tes colonnes et tu les agrandis et tu sélectionnes tes lignes et tu fais idem.

Si PB, je suis le fil.

 

[wilfried_42]

Re : eliminer la barre défilante

bonjour jean yves, adilprodigy

je suis le fil, tres interresé!

jean yves ta soluce, fait disparaitre les ascensseurs pour tout le classeur,

comment fait on pour une seule feuille ?

Merci de ta reponse

 

[TheProdigy]

Re : eliminer la barre défilante

Merci pour ta réponse mais ça répond pas à mon objectif car on a tjrs le droit de descendre en bas de la page avec le clavier.

 

[Dull]

Re : eliminer la barre défilante

Salut Adiprodigy, wilfried, JYLL, le Forum

Essai avec Scrollarea

Pour rendre les autres lignes et colonnes invisibles "pinces" les
cad selectionne A25 --> Ctrl+Shift+fleche droite puis fleche bas
Format-->Lignes-->hauteur 0

idem pour les Colonnes

Bonne Journée

 

[TheProdigy]

Re : eliminer la barre défilante

Oui Dull merci,

Mais comment t'as fait? c'est quoi cette option? Je suis débutant.

 

[TheProdigy]

Re : eliminer la barre défilante

c bon j'ai compris le code VB
ça marche merci.
Et comment éliminer la barre pour la premeière feuille?

 

[Dull]

Re : eliminer la barre défilante

Re le fil,

la barre? quelle barre? défilemment vertical et horizontale... suit les explications de JYLL

Il te suffit d'aller dans "Outils" "options" et de décocher "Barre de défilement horizontale" et "Barre de défilement verticale".

mais effectivement comme le dit Wilfried tu n'aura plus de barres sur ton classeur

Bonne Journée

 

[Dull]

Re : eliminer la barre défilante

Re re le fil,

Pour Wilfried et Adilprodigy fait avec l'enregistreur de macro

A ajouter dans un module

Sub Macro1()
    With ActiveWindow
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
    End With
End Sub
Sub Macro2()
    With ActiveWindow
        .DisplayHorizontalScrollBar = True
        .DisplayVerticalScrollBar = True
    End With
End Sub

puis dans le module de la feuille

Private Sub Worksheet_Activate()
[B] Macro1[/B]' pour enlever les Barres ou [B]Macro2[/B] pour rétablir les Barres
End Sub

Voilà