• Initiateur de la discussion Initiateur de la discussion merlin
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

merlin

Guest
Bonjour le forum,

qqn aurait-il la réponse à un ch'tite question que je me pose :

comment puis faire clignoter une cellule selon une condition spécifique, par exemple : si la valeur que l'on met dans une cellule dépasse 150, elle clignotera.

merci d'avance
A+
m.E.r.L.iN
 
merci ... je perds la tête !

par contre comme faire pour que ce code ci-après soit adaptable non plus pour une cellule mais pour une zone entière ...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim n As Byte
Dim Start As Variant
Dim i As Integer
If [A1] >= 100 Then
Const Texte As String = ""
For i = 1 To 4
Cells(1, 1).Font.ColorIndex = 6
Cells(1, 1).Interior.ColorIndex = 3
For n = 1 To 10
Start = Timer
Do While Timer < Start + 1 / 100
Loop
If n Mod 5 = 0 Then
Cells(1, 1).Interior.ColorIndex = xlNone
Cells(1, 1).Font.ColorIndex = 1
End If
Next n
Next i
End If
Exit Sub
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Résolu(e)
Microsoft 365 DATEDIF
Réponses
11
Affichages
238
Réponses
5
Affichages
484
Retour