Première lettre en Rouge
Résolu/Fermé
A voir également:
- Première lettre en Rouge
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Application pour écrire les chiffre en lettre - Télécharger - Outils professionnels
- Caractere speciaux lettre - Guide
- Changer lettre disque dur - Guide
- Clavier iphone chiffre et lettre - Guide
3 réponses
yg_be
Messages postés
23476
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
20 février 2025
Ambassadeur
1 568
Modifié le 14 mars 2020 à 12:37
Modifié le 14 mars 2020 à 12:37
bonjour,
peux-tu préciser "basic" quand tu partages du code vba?
"tu ne parviens pas pour la couleur": que se passe-t'il, as-tu un message d'erreur?
peux-tu préciser "basic" quand tu partages du code vba?
"tu ne parviens pas pour la couleur": que se passe-t'il, as-tu un message d'erreur?
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
Modifié le 14 mars 2020 à 15:44
Modifié le 14 mars 2020 à 15:44
Bonjour,
Comme ça :
Comme ça :
Option Explicit Sub test() Dim cel As Range For Each cel In ActiveSheet.Range("A1:H1") With cel .Value = UCase(Left(.Text, 1)) & Mid(.Text, 2) .Font.ColorIndex = xlAutomatic .Characters(Start:=1, Length:=1).Font.Color = vbRed End With Next cel End Sub
Modifié le 14 mars 2020 à 15:30
Merci de ta réponse,
Désoler il me semblai l'avoir bien fait, excuse moi.
Bon, j'ai l'erreur d'éxécution '424' Objet Requis
quand je fait ce code
ou alors toute l'écriture passe en rouge dans toutes les colonnes.
merci pour ton aide
Cdlt Vieuxray