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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [EXCEL] Format de cellule de type n° hiérarchique

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[EXCEL] Format de cellule de type n° hiérarchique

n°1214544
oaglas
Posté le 04-10-2005 à 15:17:59  profilanswer
 

Bonjour, Bonsoir au forum,  
 
Question délicate (gain approximatif pour la 1ère bonne réponse : mille ... fois merci  :lol: ) Je cherche le moyen d'attribuer un format de cellule qui soit de type hiérarchique comme suit :  
 
1  
1.1  
1.1.1  
1.1.2  
1.1.3  
1.2  
1.2.1  
1.2.2  
1.2.3  
1.2.4  
2  
2.1  
2.1.1  
2.1.1.1  
2.1.1.2  
Etc.  
 
Et ce, de telle sorte qu'il soit ensuite possible d'effectuer une copie relative en utilisant la poignée de recopie (et donc de haut en bas incrémentée). Alors rêve ou réalité ? Merci


Message édité par oaglas le 04-10-2005 à 15:25:02
mood
Publicité
Posté le 04-10-2005 à 15:17:59  profilanswer
 

n°1216416
watashi
La démotivation : JAMAIS !
Posté le 06-10-2005 à 11:58:46  profilanswer
 

Salut Oaglas
 
Le format de type hierarchique, ça existes pas dans excel il ne gére pas les hierarchie comme word peut le faire pour des textes (enfin à ma connaissance). Par contre tu peux sur une plage spécifée mettre en place un format qui varie en fonction de la valeur. Tu ne pourras pas incrementer ce format avec la poignée de recopie mais si tu peux figer la plage alors c'est faisable comme ça :
 

Code :
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2. 'préciser la plage ici range ("A1:A50" )
  3. If Target.Column <> 1 Or Target.Row > 50 Then Exit Sub
  4. 'preicser que si c une plage on sort
  5. 'numberformat peut être appliqué à plussieurs mais pas si le format change
  6. If Target.Columns.Count <> 1 Or Target.Rows.Count <> 1 Then Exit Sub
  7. 'mettre en forme en fonction du cas
  8. MsgBox (Target.Value)
  9. Select Case Target.Value
  10.      Case Is = ""
  11.           Target.Select: Selection.NumberFormat = "General"
  12.      Case 0 To 9
  13.           Target.Select: Selection.NumberFormat = "0"
  14.      Case 10 To 99
  15.           Target.Select: Selection.NumberFormat = "0\.0"
  16.      Case 100 To 999
  17.           Target.Select: Selection.NumberFormat = "0\.0\.0"
  18.      Case 1000 To 9999
  19.           Target.Select: Selection.NumberFormat = "0\.0\.0\.0"
  20. End Select
  21. End Sub


Ca te donnera peut-être des pistes pour la suite.
bon courage


---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [EXCEL] Format de cellule de type n° hiérarchique

 

Sujets relatifs
JE peux plus coier-coller dans excelpasser un fichier excel en fichier ascii
[Excel] Conditionner une source de données dans un graphique[Excel VBA] Ne pas afficher les lignes masquées d'un plan
J'aimerais crée un mot de passe (mode console.) en C de type:*********Excel VBA - Importer depuis un fichier texte
php reader excelExcel > duppliquer et renommer onglet à partir d'une liste [résolu]
[Excel VBA] Identification des cellules impactées par un recalculconvertion de format de date
Plus de sujets relatifs à : [EXCEL] Format de cellule de type n° hiérarchique


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