J'ai des problème sur xls
jawad_jaafer
Messages postés
1
Date d'inscription
lundi 28 mars 2005
Statut
Membre
Dernière intervention
29 mars 2005
-
29 mars 2005 à 19:49
Diegoch Messages postés 56 Date d'inscription vendredi 30 mars 2001 Statut Membre Dernière intervention 7 septembre 2011 - 30 mars 2005 à 08:37
Diegoch Messages postés 56 Date d'inscription vendredi 30 mars 2001 Statut Membre Dernière intervention 7 septembre 2011 - 30 mars 2005 à 08:37
A voir également:
- J'ai des problème sur xls
- Convertir xml en xls - Forum VB.NET
- Kmz to xls - Forum VB.NET
- Convert xls to xml ✓ - Forum C# / .NET
- Php xls - Forum PHP
- Macro xls ✓ - Forum Visual Basic 6
1 réponse
Diegoch
Messages postés
56
Date d'inscription
vendredi 30 mars 2001
Statut
Membre
Dernière intervention
7 septembre 2011
6
30 mars 2005 à 08:37
30 mars 2005 à 08:37
En admettant que ton objet application soit nommé XL :
Modifier le format d une cellule en jour/mois/année
XL.worksheets(Nomfeuille).range(Cellule).NumberFormat = "dd/mm/yyyy"
(Pour connaitre tous les formats utilisés, tu peux utiliser le menu format de cellule de Excel et tu n'as plus qu'a les reproduire.)
Largeur automatique des colonnes A à M :
XL.worksheets(Nomfichier).Columns("A:M").AutoFit
Pour gerer a la main la taille des colonnes
XL.worksheets(Nomfeuille).range(Cellule).ColumnWidth = 20
taille des feuilles avant impression :
definir la zone d impression sur "B7:F37"
Range("B7:F37").Select
ActiveSheet.PageSetup.PrintArea = "$B$7:$F$37"
Imprimer une feuille sur 1 seule page (en réduisant pour tenir sur 1 seule page) :
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintErrors = xlPrintErrorsDisplayed
End With
Bonne utilisation.
Modifier le format d une cellule en jour/mois/année
XL.worksheets(Nomfeuille).range(Cellule).NumberFormat = "dd/mm/yyyy"
(Pour connaitre tous les formats utilisés, tu peux utiliser le menu format de cellule de Excel et tu n'as plus qu'a les reproduire.)
Largeur automatique des colonnes A à M :
XL.worksheets(Nomfichier).Columns("A:M").AutoFit
Pour gerer a la main la taille des colonnes
XL.worksheets(Nomfeuille).range(Cellule).ColumnWidth = 20
taille des feuilles avant impression :
definir la zone d impression sur "B7:F37"
Range("B7:F37").Select
ActiveSheet.PageSetup.PrintArea = "$B$7:$F$37"
Imprimer une feuille sur 1 seule page (en réduisant pour tenir sur 1 seule page) :
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintErrors = xlPrintErrorsDisplayed
End With
Bonne utilisation.
