> Tous les forums > Forum Bureautique
 excel 2007 macro mise en page, quadrillage, filtreSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Cecilia2
  Posté le 15/10/2014 @ 11:09 
Aller en bas de la page 
Petite astucienne

Bonjour,

Je souhaite rajouter à la macro existante dans mise en page

hauteur 0,40 et Bas 0,90

Que le quadrillage ainsi que le filtre s'adapte au fichier

http://cjoint.com/?3JplhPqUMnF

Merci par avance

Cécilia

Publicité
Boogie Palace
 Posté le 15/10/2014 à 12:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

bonjour, essaye ça (désolé pour l'indentation) :


With ActiveSheet.PageSetup
.TopMargin = 28.35 * 0.4
.BottomMargin = 28.35 * 0.9
End With

Cells.Borders.LineStyle = xlNone 'pour effacer le quadrillage existant
With [A1].CurrentRegion.Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With

If ActiveSheet.AutoFilterMode Then Cells.AutoFilter
[A1].CurrentRegion.AutoFilter



attention avec la commande CurrentRegion, s'il y a une ligne/colonne entière qui est vide dans ta plage de données, ça ne prendra pas en compte toute la plage.
ActiveSheet suppose que la feuille concernée est active avant l'exécution du code ; à adapter si besoin.



Modifié par Boogie Palace le 15/10/2014 12:53
Cecilia2
 Posté le 15/10/2014 à 14:14 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

Bonjour,

hauteur 0,40 et Bas 0,90 c'est parfait

par contre ensuite ça bloque à xlNone

Cécilia

Boogie Palace
 Posté le 15/10/2014 à 15:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

mince alors, sur mon poste ça fonctionne aussi bien sur XL 2010 que 2000.

qqn d'autre aura peut-être une idée.

Cecilia2
 Posté le 15/10/2014 à 21:46 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

Bonsoir,

Je l'ai saisie de nouveau et ça fonctionne très bien.

Merci pour cette aide.

Bonne soirée.

Cécilia

Cecilia2
 Posté le 20/10/2014 à 11:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

Bonjour,

Est-il possible de réduire davantage la largeur des colonnes, voire le lien du 15/10/14, colonne ville, etc...

Merci par avance.

Cécilia

Boogie Palace
 Posté le 20/10/2014 à 14:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

bonjour,

avant la dernière ligne [A1].CurrentRegion.AutoFilter, ajouter la ligne suivante :

[A1].CurrentRegion.EntireColumn.AutoFit

cette instruction a pour effet d'ajuster la largeur des colonnes à celle du texte.
attention, certains de tes titres (comme "Ville" notamment) contiennent des espaces qui empêchent d'ajuster la largeur à ce qu'elle pourrait être.

Cecilia2
 Posté le 20/10/2014 à 15:04 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

Merci,

C'est parfait.

Bonne après-midi.

Cécilia

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
besoin d'une macro excel 2007
[Excel 2007] Macro : Sélection d'un tableau selon sa longueur variable
Excel 2007 macro rajouter tri + cellule en surbrillance à chaque changement
Excel 2007 extraction feuille 1 dans feuille 2 avec mise en forme
tableau et quadrillage (excel 2007)
Excel 2007 mise en forme conditionnelle
mise en page sur excel
macro sous excel 2007
(Macro) Copier onglet sur autre fichier Excel (2007)
Probleme excel - tri dans macro Excel 2007
Plus de sujets relatifs à excel 2007 macro mise en page, quadrillage, filtre
 > Tous les forums > Forum Bureautique