![]() |
|
Forum
|
|
|
#1 (permalink) |
|
Guest
Messages: n/a
|
Re-bonjour.
Un deuxième petit souci. J'aimerais par exemple laisser les cellule de A1 à D10 apparente et griser toutes les autres lignes pour ne plus que personne n'y ai accès. Comment puis-je réaliser celà ? Merci d'avance. |
|
| ANNONCES | |||
|
|
|
|
#2 (permalink) |
|
XLDnaute Barbatruc
Date d'inscription: février 2005
Messages: 3 142
|
re 'Fophil'
Tu peux sélectionner tes colonnes ou tes lignes pour peu que tu ne les ai pas masquées avec ta question précédente ! Ensuite tu fais un click droit quand tu es sur le 'heading' et tu fais 'Masquer' dans le menu contextuel. Pour éviter de te ballader une heure avec ta souris, tu peux utiliser les raccourci clavier une fois la première colonne sélectionnée : CTRL + SHIFT + FLECHE DROITE (MoveRight) Sélectionnera toutes les colonnes jusqu'à la dernière vers la droite. CTRL + SHIFT + FLECHE BAS (MoveDown) Sélectionnera toutes les lignes jusqu'à la dernière vers le bas. En VBA : Columns('E:IV').Hidden = True Rows('11:65536').Hidden = True Bon Aprèm @+Thierry Message édité par: _Thierry, à: 17/03/2005 15:43 |
|
|
|
|
|
#3 (permalink) |
|
Super Moderator
Date d'inscription: février 2005
Localisation: Rennes
Messages: 10 686
|
Bonjour
tu peux tout simplement selectinner toutes tes colonnes de E à IV puis un clic droit et masquer Puis tes lignes 11 à 65536 (ctrl + Maj et flèche vers le bas) puis clic droit masquer Bon courage
__________________
Pascal(Visitez mon Blog Photo)Vous pouvez devenir "Supporter XLD", plus de renseignements ICI |
|
|
|
|
|
#4 (permalink) |
|
Super Moderator
Date d'inscription: février 2005
Localisation: Rennes
Messages: 10 686
|
ARF Thierry
Chacun son tour Bonne journée :P :P
__________________
Pascal(Visitez mon Blog Photo)Vous pouvez devenir "Supporter XLD", plus de renseignements ICI |
|
|
|
|
|
#6 (permalink) |
|
XLDnaute Impliqué
Date d'inscription: février 2005
Messages: 885
|
Bonjour le forum
Bonjour fophil, bonjour Thierry, bonjour Pascal Ah l'esprit d'émulation..... Bon ma modeste contribution sans toutefois griser les autres cellules A placer dans ThisWorkBookl Code:
Private Sub WorkBook ()
Worksheets('Feuil1').ScrollArea = 'A1:D10'
End Sub
__________________
|
|
|
|
| ANNONCES | |
![]() |
| Liens sociaux |
| Outils de la discussion | |
|
|