affichage réduit de texte

X

xavier

Guest
bonjour à tous et toutes

voila mon problème qui je le suppose est très simple à résoudre

je voudrais écrire un nom ou un mot dans une cellule mais lorsque je valide, je veut que seul les trois première lettre du mot reste afficher dans ma cellule.

merci d'avance

@++

xavier
 
G

GIBI

Guest
Bonjour,



une solution simple mais un peu lourde si tu as beaucoup de chose a taper = mettre en blanc la fin du texte

voici une petite macro qui fera le boulot sur une plage de cellule que tu auras selectionnée

Sub RaB()
'
For Each c In Selection
With c.Characters(Start:=4, Length:=7).Font
.Name = 'Arial'
.FontStyle = 'Normal'
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = 2
End With
Next

End Sub
 

Hervé

XLDnaute Barbatruc
Supporter XLD
bonjour xavier, GIBI

Ce type de macro ne laisse que les 3 premiers caractères d'une saisie dans une cellule :

Private Sub Worksheet_Change(ByVal Target As Range)
Target = Mid(Target, 1, 3)
End Sub

Ce code est à placer dans le module de la feuille (clic droit sur l'onglet, puis visualiser le code).

Par contre, je m'interroge, pour quoi ne tapes tu pas directement que les 3 premiers caractères, au lieu de passer par une macro ?

salut
 

PascalXLD

XLDnaute Barbatruc
Modérateur
Bonjour

Dans la même idée que Hervé

Target=left(target,3)

Mais même interrogation que Hervé. Cela me rappelle un post sur le fait de tout mettre en majuscule où il s'est avéré que la manière la plus simple est d'appuyer qur la touche CapsLock

Bonne journée
 

Discussions similaires

Statistiques des forums

Discussions
300 761
Messages
1 987 020
Membres
209 681
dernier inscrit
Excelcrable