Afficher texte et chiffres dans cellule
denice43
Messages postés
5
Statut
Membre
-
denice43 Messages postés 5 Statut Membre -
denice43 Messages postés 5 Statut Membre -
Bonjour,
Je vais essayer d'être clair dans ma demande.
je souhaite afficher automatiquement des chiffres alors que je tape du texte.
Petit exemple :
Je souhaite taper ABC dans ma celulle
et je souhaiterai que 12ABC-3456 s'affiche, toujours dans la même cellule.
Je ne sais pas si cela est réalisable ?
Merci de vos réponse
Je vais essayer d'être clair dans ma demande.
je souhaite afficher automatiquement des chiffres alors que je tape du texte.
Petit exemple :
Je souhaite taper ABC dans ma celulle
et je souhaiterai que 12ABC-3456 s'affiche, toujours dans la même cellule.
Je ne sais pas si cela est réalisable ?
Merci de vos réponse
6 réponses
-
Bonjour
Et comment sait on les nombres qu'il faut inclure
comment sait on combien de chiffres comporte chaque nombre
merci d'^tre précis dans votre demande
-
Bonjour,
Merci de votre réponse si rapide.
c'est toujours les même nombres que je doit inclure soit 12###-3456
Cela sera juste les trois lettres qui changerons
Denice43 -
comme tu modifies une cellule dans la quelle se rajoutera automatiquement tes nombres, il faut passer par une macro dite "événementielle"
si pour toi, les macros,c'est du chinois fais signe
-
Pour les macros c'est bon, mais je pensais pouvoir y échaper
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Re,
Option Explicit
Const Plage As String = "A2:H19"
Const Prefixe As String * 2 = "12"
Const Suffixe As String = "-3456"
'--------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Texto As String
If Not Intersect(Target, Range(Plage)) Is Nothing Then
If Target = "" Then Exit Sub
Texto = Target
Application.EnableEvents = False
Target = Prefixe & Texto & Suffixe
Application.EnableEvents = True
End If
End Sub
Sub SOS_events()
'INDISPENSABLE pour reactiver les macros Excel si sortie accidentelle _
en phase enableevelnts=false
Application.EnableEvents = True
End Sub
-
Re,
Par contre là c'est du chinois pour moi.
Est-il possible d'avoir une explication ?
Merci