> Tous les forums > Forum Bureautique
 Format de cellule personnalisée - Excel 2007Sujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Gabrilou
  Posté le 07/02/2013 @ 05:52 
Aller en bas de la page 
Astucienne

,

J'essaie de créer un format de cellule personnalisée. Il s'agit d'une séquence de chiffres + une lettre. Les chiffres ne sont jamais les mêmes, la lettre non plus, et tout se passe dans la colonne A. Le № se présente toujours de la façon suivante : 2 chiffres suivis d'une espace, 6 chiffres suivis d'une espace, 3 chiffres suivis d'une espace et d'une lettre en majuscule : (ex. : 46 120417 356 F). Il semble impossible de formater des chiffres et des lettres, en tout cas je n'ai pas réussi.

J'ai essayé de travailler avec 2 colonnes mais je n'ai pas réussi non plus ce formatage. J'ai tapé 46120417356 dans la colonne A et la lettre F dans la colonne B.

Dans la colonne C, j'ai mis la formule suivante : =TEXTE(A1;"000# 000#")&" "&B1. Ça ne marche pas comme je le voudrai.

Merci pour votre aide.

Publicité
DjiDji59430
 Posté le 07/02/2013 à 11:02 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

A partir du moment ou on melange des nombres et des lettres, c'est du texte, et il n'y a pas de format texte.

Avec 2 colonnes

=GAUCHE(A1;2)&" "&STXT(A1;3;6)&" "&STXT(A1;9;3)&" "&DROITE(A1;1)

46120417356A, dans A1, la formule dans B1


Il ya surement une façon plus élégante ! (genre zone de saisie qui formate le texte et va le placer a la derniere cellule vide de la colonne ! ), mais je ne sais pas faire.



Modifié par DjiDji59430 le 07/02/2013 11:12
Gabrilou
 Posté le 07/02/2013 à 14:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

Je n'ai pas compris la formule, mais le résultat est là, comme je le voulais.

Merci d'avoir pris le temps de m'aider.

Bonne journée

papouclo
 Posté le 07/02/2013 à 19:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,
Peut-être une possibilité de "formater" la saisie avec une procédure évènementielle :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim machaine As String

If Target.Count > 1 Then Exit Sub
'permet de sortir de la procédure si plus d'une cellule est sélectionnée
'(sinon la suite de la macro renvoie un message d'erreur)

If Target.Column > 1 Then Exit Sub
'permet de sortir de la procédure si la cellule modifiée
' n'est pas dans la colonne A

machaine = Target.Value

If Len(machaine) = 15 Then Exit Sub
'permet de sortir de la procédure lorsque la cellule est réécrite au format désiré

Target.Value = Format(Left(machaine, 5), "00 000") & Format(Mid(machaine, 6, 6), "000 000") & " " & Right(machaine, 1)

End Sub

Cordialement

Gabrilou
 Posté le 07/02/2013 à 19:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

DjiDji59430, papouclo

Me voilà avec deux formules qui marchent

Merci à vous deux

ferrand
 Posté le 08/02/2013 à 16:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonsoir,

Une version de ta formule utilisant TEXTE qui me paraît fonctionner...

=TEXTE(A1;"00\ 000000\ 000\ ")&B1

La définition des formats de cellule personnalisés n'est pas toujours identique à la définition du format dans la fonction, il faut souvent tâtonner...

Cela peut toujours être utile.

papouclo
 Posté le 08/02/2013 à 17:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour à tous,

Merci ferrand pour ce format.
cela peut servir pour d'autres formats inhabituels.
Cordialement

Gabrilou
 Posté le 08/02/2013 à 17:48 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

Merci à toi Ferrand

Quelle chance on a de vous avoir , je l'apprécie tellement

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
29,99 €Routeur Xiaomi Mi AloT WiFi AC2350 à 29,99 €
42 € -29%

Amazon fait une promotion sur le routeur Xiaomi Mi AloT AC2350 qui passe à 29,99 € au lieu de 42 € ailleurs. Ce routeur dispose de 7 antennes externes afin de vous offrir une vitesse de transfert incroyable. Profitez d'une vitesse dual-band sans fil de 2183 Mbps pour une expérience en ligne plus rapide et plus fluide. En effet, avec 450 Mbps sur la bande 2.4 GHz et 1733 Mbps sur la bande 5 GHz, il vous offre une vitesse incroyable et une meilleure couverture. Vous allez pouvoir regarder des vidéos HD et jouer en ligne sans le moindre problème.


Voir l'offre
599,99 €PC Portable 15.6 pouces Asus TUF Gaming (Core i5 10300H, 8 Go, 512 Go SSD, GTX 1650) à 599,99 €
729,99 € -18%

Cdiscount fait une promotion sur l'ordinateur portable Asus TUF Gaming FX505 qui passe à 599,99 € alors qu'on le trouve ailleurs à partir de 729,99 €. Cet ordinateur portable est équipé d'un écran 15,6 pouces Full HD (1920x1080 pixels) 144 Hz anti-reflet, d'un SSD de 512 Go, d'un processeur Intel Core i5-10300H, de 8 Go de RAM (extensible) et d'une carte graphique dédiée NVIDIA GeForce GTX 1650 avec 4 Go de RAM. Le clavier est rétro éclairé. L'ordinateur est livré sans OS mais vous pouvez facilement installer Windows 10.

Grâce à sa carte graphique dédiée, vous pourrez faire tourner tous les jeux.


Voir l'offre
39,99 €Facebook Portal Mini à 39,99 €
149 € -73%

Amazon fait une belle promotion sur l'écran connecté Facebook Portal Mini qui passe à 39,99 € au lieu de 149 € ! Cet écran de 8 pouces vous permettra de faire des visio avec vos proches via Facebook Messenger ou WhatsApp (vos interlocuteurs peuvent être sur smartphone, tablette ou ordinateur). 

La fonctionnalité Smart Camera de Portal Mini vous suit et zoome automatiquement afin de toujours cadrer l'action, et Smart Sound améliore les voix tout en réduisant les bruits de fond. Vous aurez donc l'impression d'être dans la même pièce avec vos proches, même si des kilomètres vous séparent. Portal Mini affiche également des photos depuis Facebook, Instagram et votre téléphone. Et grâce à Alexa intégré, vous pourrez gérer votre maison connectée, consulter la météo, régler une minuterie et bien plus encore, en mode mains libres. 

Pratique pour rester en contact avec une personne âgée car il est très simple d'utilisation.

 

 


Voir l'offre
-7 €-7 € dès 20 € pour une première livraison en point de retrait Amazon (selon éligibilité)

Amazon propose actuellement 7 euros de remise dès 20 euros d'achats avec le code RETRAIT7 pour une première livraison en point de retrait Amazon. Vous pouvez vérifier votre éligibilité à cette offre en vous rendant sur cette page. Vous trouverez la liste des points de retrait sur cette page.


Voir l'offre

Sujets relatifs
Format de cellule personnalisée excel
Imposer format dans cellule excel 2007
Excel 2007 macro rajouter tri + cellule en surbrillance à chaque changement
Comment verrouiller une cellule Excel 2007
format cellule Excel
Excel 2007 résultat formule dans une autre cellule
Excel 2007 formule et saisie dans la même cellule
Excel 2007 couleur dans une cellule non imprimable
Excel 2007 - Suppression selon format
cellule excel 2007
Plus de sujets relatifs à Format de cellule personnalisée - Excel 2007
 > Tous les forums > Forum Bureautique