activeforce XLDnaute Occasionnel 19 Mai 2010 #1 Bonjour, J'aimerais supprimer les éléments situés en bas de page. Ci-joint le fichier en question. Merci. Pièces jointes CALCUL.xls 36 KB · Affichages: 162 CALCUL.xls 36 KB · Affichages: 180 CALCUL.xls 36 KB · Affichages: 179
Bonjour, J'aimerais supprimer les éléments situés en bas de page. Ci-joint le fichier en question. Merci.
soenda XLDnaute Accro 19 Mai 2010 #2 Re : Suppression Bonjour le fil, activeforce Puisque seule, la page 1 semble concernée : Code: Sub b() With Range([A1].End(xlDown)(2), [T44]) .ClearContents .Borders.LineStyle = xlNone .Borders(xlEdgeTop).LineStyle = xlContinuous End With End Sub A plus Vote positif 0 Vote négatif
Re : Suppression Bonjour le fil, activeforce Puisque seule, la page 1 semble concernée : Code: Sub b() With Range([A1].End(xlDown)(2), [T44]) .ClearContents .Borders.LineStyle = xlNone .Borders(xlEdgeTop).LineStyle = xlContinuous End With End Sub A plus
activeforce XLDnaute Occasionnel 20 Mai 2010 #3 Re : Suppression Je me suis fait mal comprendre. C'est le nom, prénom page et date que j'aimerais supprimer. Vote positif 0 Vote négatif
Re : Suppression Je me suis fait mal comprendre. C'est le nom, prénom page et date que j'aimerais supprimer.
soenda XLDnaute Accro 21 Mai 2010 #4 Re : Suppression Bonjour le fil, activeforce Pour supprimer les Pieds de page (nom, prénom page et date ) de la feuille active: Code: With ActiveSheet.PageSetup .LeftFooter = "" .CenterFooter = "" .RightFooter = "" End With A plus Vote positif 0 Vote négatif
Re : Suppression Bonjour le fil, activeforce Pour supprimer les Pieds de page (nom, prénom page et date ) de la feuille active: Code: With ActiveSheet.PageSetup .LeftFooter = "" .CenterFooter = "" .RightFooter = "" End With A plus
M mercant76 XLDnaute Impliqué 21 Mai 2010 #5 Re : Suppression bonjour, manuellement, tu fais Aperçu/Page/Pied de page et tu sélectionnes (Aucun) puis OK. @+ Vote positif 0 Vote négatif
Re : Suppression bonjour, manuellement, tu fais Aperçu/Page/Pied de page et tu sélectionnes (Aucun) puis OK. @+
soenda XLDnaute Accro 22 Mai 2010 #6 Re : Suppression Bonsoir le fil, activeforce, mercant76 Bien vu, mercant76 A plus Vote positif 0 Vote négatif
activeforce XLDnaute Occasionnel 25 Mai 2010 #7 Re : Suppression Merci à tous Vote positif 0 Vote négatif