J'ai Excel 2003.
Malheureusement, je n'ais absolument rien trouvé à ce propos dans la
fonction "Aide" du programme Excel.
Alors, voici ma question:
Quelles sont les étapes à suivre pour pouvoir formater les cellules d'une
colonne en format "code postal" canadien (exemple: H1A 4G5).
Dans le menu FORMAT
j'ai sélectionné CELLULE,
ensuite j'ai sélectionné l'onglet NOMBRE,
ensuite dans la liste CATÉGORIE, j'ai sélectionné PERSONNALISÉ
et, c'est là que je ne sais pas comment entrer la formule ???
Dans le code postal canadien, il est important de respecter les caractères
en majuscules et l'espace après les 3 premiers caractères.
--
Merci de votre aide !
Résidant à Montréal (Canada)
Un beau bonjour de chez-nous à chez-vous !
il te faut passer par une macro VBA
ce qu'a proposé Denis Michon sur ce forum le 26 fevrier 2004
Tu copies ce code dans la feuille module où se déroule l'action
L'exemple s'applique à toutes les cellules de la colonne 3.
Si tu veux limiter cette action à une plage plus restreinte, remplace
Columns(3) de cette ligne de code :
Set Rg = Intersect(Target, Columns(3))
Par l'étendue de la plage de cellules de ton choix comme :
Set Rg = Intersect(Target, Range("D2:D5000"))
'----------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rg As Range
Set Rg = Intersect(Target, Columns(3))
Application.EnableEvents = False
If Not Rg Is Nothing Then
For Each c In Rg
c.Value = UCase(Application.Trim(c))
If c.Value Like "[A-Z][0-9][A-Z] [0-9][A-Z][0-9]" Or _
c.Value Like "[A-Z][0-9][A-Z][0-9][A-Z][0-9]" Then
c.Value = Left(c, 3) & " " & Right(c, 3)
c.Interior.ColorIndex = xlNone
c.Font.ColorIndex = xlAutomatic
Else
MsgBox "la saisie du code postal est inexacte"
c.Interior.ColorIndex = 3
c.Font.ColorIndex = 2
End If
Next
End If
Application.EnableEvents = True
End Sub
'----------------------------------
@+
Je ne suis pas certaine de connaître les bonnes étapes à effectuer.
J'ai quand même pris la chance d'essayer de la façon qui suit et
malheureusement, ça ne fonctionne pas:
- Je suis allée dans FICHIER/MACRO/VISUAL BASIC EDITOR
- J'ai inséré un nouveau module à l'écran
- J'ai copié le code dans la feuille module
- J'ai changé la "colonne-3" pour la "colonne-12"
- Jai enregistré le module
- J'ai quitté Visual Basic Editor
Je suis certaine de ne pas effectuer les bonnes actions.
J'ai quand même continuer à chercher dans la fonction Aide d'Excel sans
succès.
Êtes-vous en mesure de pouvoir m'aider davantage ?
---
Merci de votre aide !
Résidant à Montréal (Canada)
Un beau bonjour de chez-nous à chez-vous !
"Modeste" a écrit :
il faut copier la macro sur la page code de la feuille qui doit recevoir des code postal,
pour atteindre cette page code fait un click droit sur l'onglet de cette feuille et sélectionne "Visualiser le code"
ou bien dans visuel basic fait un double click sur le nom de cette feuille
sous l'arborescence du VBAProject(Nom de ton classeur)
isabelle
casiopé a écrit :
ll me semble que ça serait si simple de formater les cellules de la colonne
en question avec le menu FORMAT/CELLULE/ comme on le fait pour les dates, les
numéros de téléphone etc.... Est-ce que c'est possible de créer un format
personnalisé ?
Bonne fin de journée !
--
Merci de votre aide !
Résidant à Montréal (Canada)
Un beau bonjour de chez-nous à chez-vous !
"isabelle" a écrit :
RedZorsh@
"casiopé" <cas...@discussions.microsoft.com> a écrit dans le message news:
46D4CEAD-0B9A-4EF6...@microsoft.com...
Un GROS MERCI à Modeste - isabelle et Zorsh pour votre précieuse aide !
--
Merci de votre aide !
Résidant à Montréal (Canada)
Un beau bonjour de chez-nous à chez-vous !
"Zorsh@" a écrit :
As-tu une petite idée là-dessus !
--
Merci de votre aide !
Résidant à Montréal (Canada)
Un beau bonjour de chez-nous à chez-vous !
"Zorsh@" a écrit :
"Zorsh@" a écrit :
"Robi" <Ro...@discussions.microsoft.com> a écrit dans le message de news:
0B5AE20E-A8BA-461B...@microsoft.com...
lSteph
jps a écrit :
isabelle
LSteph a écrit :
"isabelle" <i@v> a écrit dans le message de news:
u5aTewpZ...@TK2MSFTNGP05.phx.gbl...
> aimes tu l'hélicoptère ?