Discussion :

[fofika]

Bonjour à tous

Bon utilisateur d'Excel mais grand novice en VBA....
Au risque de vous faire répéter (car ça fait 3 heures que je cherche sans succès)....... je suis à la recherche d'une astuce (code ou autre) pour forcer Excel à agrandir les marges prédéfinies des en têtes et pied de page.

Vu le niveau des conversations, je suppose qu'un pro du pot me donnera ça en 2 minutes.

Thanks

[Michel_M]

bonjour,

xl2000

à la main: fichier-mise en page- marges...

avé un code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub mettre_enpage()
Dim entet As Single, pied As Single
     entet = InputBox("hauteur entête en cm?") / 2.54
     pied = InputBox("hauteur du pied en cm?") / 2.54
 
 
    With ActiveSheet.PageSetup
        .HeaderMargin = Application.InchesToPoints(entet)
        .FooterMargin = Application.InchesToPoints(pied)
    End With
End Sub

les dimensions étant en pouce (2,54)

[fofika]

Merci Michel pour ce code que je viens de tester.

Cependant, mon problème ne se situe pas sur la hauteur des en têtes et pieds de page mais sur leur valeur à droite et à gauche de la feuille (non modifiable sans passer par une macro selon moi).

As tu un autre AS dans ta manche?

Merci d'avance

[ouisansdoute]

Bonjour,

l'ensemble des marges est modifiables.
.LeftMargin
.RightMargin
.TopMargin
.BottomMargin
.HeaderMargin
.FooterMargin

A la suite de la réponse de Michel, il me semble qu'on pouvait le déduire ou le tester.

[fofika]

Je suis bien d'accord avec tout ça mais pour le coup je débute avec les macros et je me contente pour l'instant de copier coller les formules trouvées ici (merci aux passages à tous les pros qui partagent leurs astuces...ce qui m'a permis par exemple de protéger un document sans enlever la possibilité d'utiliser le mode plan).

Bref, j'entends bien les arguments mais je ne me sens pas de les manipuler.... merci d'éclairer la lanterne du jeune apprenti que je suis

Humblement

Votre dévoué reconnaissant....

[marc56]

Pour modifier les marges, faire :
- Fichier\Mise en page\Marges, et mettre les 6 valeurs à zéro. Les seules marges qui resteront à l'impression, seront les marges techniques de l'imprimante.

[fofika]

Déja essayé mais cela me laisse toujours une marge à droite et à gauche des entêtes et pied de page (celles que je souhaiterais modifier)........ alors que l'imprimante est capable d'imprimer plus loin (preuve en est car les tableaux eux mêmes commencent bien avant ces 0,90)....

Une autre idée chers internautes?

[marc56]

As-tu essayé d'imprimer ton fichier sur une imprimante d'une autre marque, car je pense que tes marges sont en réalité celles pour la prise du papier. J'ai déja eu ce genre de problème avec une Epson qui avait des marges de 1cm à gauche à droite et en haut et 2,5cm en bas de page.
Si tu as une imprimante virtuelle en PDF, genre : "Cute PDF Writer", tu pourras visualiser tes marges avant impression et voir si elles sont positives ou nulles.

[fofika]

peu importe l'imprimante, c'est une marge Excel....

[marc56]

C'est quelle version d'Excel dont tu disposes?
Peux-tu envoyer un petit bout de fichier comme exemple?

[fofika]

Un grand merci aux internautes qui ont contribué à me faire avancer. Malheureusement, j'utilise Excel 2003 et la fonction n'existe pas....... elle n'existe que sur Excel 2007.