Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1030 connectés 

  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Tailles des Cellule en centimetre dans Excel XP. Possible?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Tailles des Cellule en centimetre dans Excel XP. Possible?

n°2302043
blum95
PSN ID: blum95
Posté le 23-01-2006 à 18:50:45  profilanswer
 

Bonjour je souhaite modifier la taille des cellule en centimetre mais je ne trouves pas l'option
Comment faire?


---------------
|
mood
Publicité
Posté le 23-01-2006 à 18:50:45  profilanswer
 

n°2302091
sweethom
tout en douceur, bien sûr :)
Posté le 23-01-2006 à 19:43:41  profilanswer
 

je ne trouve pas avec excel, mais avec Open Office, oui ;)

n°2302093
blum95
PSN ID: blum95
Posté le 23-01-2006 à 19:45:58  profilanswer
 

oui mais je n'ai pas open office
:(


---------------
|
n°2302098
sweethom
tout en douceur, bien sûr :)
Posté le 23-01-2006 à 19:49:40  profilanswer
 
n°2581453
TAM136
Posté le 26-11-2006 à 09:21:00  profilanswer
 

Salut,
 
Si tu es toujours intéressé, utilises cette macro (je n'en suis pas l'auteur)
 
Sub RangéesEnCm()
Dim cm As Single
cm = Application.InputBox("Hauteur de la rangée en cm.", Type:=1)
If cm Then
Selection.RowHeight = Application.CentimetersToPoints(cm)
End If
End Sub
Sub ColonnesEnCm()
Dim cm As Single, points As Single
Dim count As Single
Application.ScreenUpdating = False
cm = Application.InputBox("Largeur de la colonne en cm.", Type:=1)
If cm = False Then Exit Sub
points = Application.CentimetersToPoints(cm)
savewidth = ActiveCell.ColumnWidth
ActiveCell.ColumnWidth = 255
If points > ActiveCell.Width Then
MsgBox "La largeur de" & cm & "est trop large" & Chr(10) & _
"la valeur maxi est de " & _
Format(ActiveCell.Width / 28.3464566929134, _
"0.00" ), vbOKOnly + vbExclamation, "Largeur non valable"
ActiveCell.ColumnWidth = savewidth
Exit Sub
End If
lowerwidth = 0
upwidth = 255
ActiveCell.ColumnWidth = 127.5
curwidth = ActiveCell.ColumnWidth
count = 0
While (ActiveCell.Width <> points) And (count < 20)
If ActiveCell.Width < points Then
lowerwidth = curwidth
Selection.ColumnWidth = (curwidth + upwidth) / 2
Else
upwidth = curwidth
Selection.ColumnWidth = (curwidth + lowerwidth) / 2
End If
curwidth = ActiveCell.ColumnWidth
count = count + 1
Wend
End Sub


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Tailles des Cellule en centimetre dans Excel XP. Possible?

 

Sujets relatifs
est il possible d'utiliser free sans abonement mais avec un modem adslClustering sous windows XP possible ?
Word --> ExcelFusion de nombres à virgule d'excel vers publisher
Rechercher dans plusieurs fichiers Excel avec la fonction Rechercherwimax altitude telecom multiposte c possible ?
Excel problème guillement formuleLiveBox: Connecter 2 PC avec les 2 Ethernet ! Possible ?
proteger l'ouverture d'un programme par mot de passe : possible ?install 2cartes reseau ds 1 pc sous xp possible?
Plus de sujets relatifs à : Tailles des Cellule en centimetre dans Excel XP. Possible?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR