Excel Référance
Résolu
Razaii
Messages postés
90
Statut
Membre
-
madeliocustom Messages postés 42 Statut Membre -
madeliocustom Messages postés 42 Statut Membre -
Bonjour,
Je cherche à faire une chose spécial avec EXCEL^^.
Je m'explique,
J'ai une colonne qui s'apelle référance.
Ex :
030 20 832 M
030 20 965 M
030 20 696 M
030 90 123 M
Ce que je veut obtenir, c'est quand j'écris dans la colonne Automatiquement les 3 dernier CHIFFRES se mettent en GRAS.
Ex :
030 20 832 M
030 20 965 M
030 20 696 M
030 90 123 M
merci de votre aide la plus rapide possible :)
Je vous souhaite une bonne journée
Je cherche à faire une chose spécial avec EXCEL^^.
Je m'explique,
J'ai une colonne qui s'apelle référance.
Ex :
030 20 832 M
030 20 965 M
030 20 696 M
030 90 123 M
Ce que je veut obtenir, c'est quand j'écris dans la colonne Automatiquement les 3 dernier CHIFFRES se mettent en GRAS.
Ex :
030 20 832 M
030 20 965 M
030 20 696 M
030 90 123 M
merci de votre aide la plus rapide possible :)
Je vous souhaite une bonne journée
A voir également:
- Excel Référance
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
- Excel trier par ordre croissant chiffre - Guide
3 réponses
Bonjour,
ci-dessous une macro exemple qui met 4 lignes dans une cellules et la 2eme et la 4eme en gras.
A+
Madelio
ci-dessous une macro exemple qui met 4 lignes dans une cellules et la 2eme et la 4eme en gras.
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 04/02/2011 par SILCA
'
'
ActiveCell.FormulaR1C1 = "'ggggg" & Chr(10) & "fffff" & Chr(10) & "jjjjj"
With ActiveCell.Characters(Start:=1, Length:=17).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Range("C18").Select
ActiveCell.FormulaR1C1 = "'ggggg" & Chr(10) & "fffff" & Chr(10) & "jjjjj" & Chr(10) & "jkjkjkjkj"
With ActiveCell.Characters(Start:=1, Length:=6).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=7, Length:=5).Font
.Name = "Arial"
.FontStyle = "Gras"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=12, Length:=7).Font
.Name = "Arial"
.FontStyle = "Normal"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=19, Length:=9).Font
.Name = "Arial"
.FontStyle = "Gras"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Range("G22:G23").Select
Range("G23").Activate
End Sub
A+
Madelio
Je crois que la mise en forme conditionnelle travaille sur base de cellule.
La MFC s'applique à tout l'objet.
Donc, pas de solution sauf à stocker dans 3 champs différents ce qui est lourdingue.
Et sans vouloir te froisser : REFERENCE et pas REFERANCE...
La MFC s'applique à tout l'objet.
Donc, pas de solution sauf à stocker dans 3 champs différents ce qui est lourdingue.
Et sans vouloir te froisser : REFERENCE et pas REFERANCE...
