A voir également:
- Alerte valeur
- Fausse alerte mcafee - Accueil - Piratage
- Fausse alerte connexion facebook - Guide
- Logiciel gratuit calcul valeur nutritionnelle - Télécharger - Santé & Bien-être
- Attribuer une valeur à une cellule texte excel ✓ - Forum Excel
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
4 réponses
Bonjour
Si quelqu'un a la réponse je prends aussi ! J'ai cherché partout, ça existe dans Word mais pas dans Excel ?
Il doit y avoir moyen de faire ça avec une macro en la faisant se répéter en permanence
et afficher alternativement 2 couleurs de motifs et de police pour une même cellule sous condition
mais je ne sais pas comment on fait
- pour introduire une tempo dans une macro (entre les 2 formats de cellule)
- pour faire répéter une action à l'infini dans une macro
HELP
merci !
Si quelqu'un a la réponse je prends aussi ! J'ai cherché partout, ça existe dans Word mais pas dans Excel ?
Il doit y avoir moyen de faire ça avec une macro en la faisant se répéter en permanence
et afficher alternativement 2 couleurs de motifs et de police pour une même cellule sous condition
mais je ne sais pas comment on fait
- pour introduire une tempo dans une macro (entre les 2 formats de cellule)
- pour faire répéter une action à l'infini dans une macro
HELP
merci !
Bonjour. Finalement je n'avais pas cherché partout ... J'ai trouvé (je crois) dans le forum Logiciel / Pilotes : message
faire clignoter une cellule sous Excel
par michel91
mercredi 25 avril 2007 à 15:52:26
(je recopie - je testerai plus tard)
Par Jeff, le jeudi 26 avril 2007 à 13:15:35
Trouvé ici : http://exceltips.vitalnews.com/Pages/T0214_Flashing_Cells.html
Cela ne peut être fait qu'avec une macro :
1. Selection la cellule à faire clignoter
2. Choisir Style dans le menu Format.
3. Dans la boîte de dialogue de Style, entrer un nouveau nom de style, comme 'Flashing'.
4. En utilisant les contrôles de la boîte de dialogue, modifier les attributs de style souhaités.
5. Cliquer sur OK.
Ce style peut être appliqué à toutes les cellules désirées.
Ensuite créez les macros (il y en a deux) :
Dim NextTime As Date
Sub StartFlash()
NextTime = Now + TimeValue("00:00:01")
With ActiveWorkbook.Styles("Flashing").Font
If .ColorIndex = xlAutomatic Then .ColorIndex = 3
.ColorIndex = 5 - .ColorIndex
End With
Application.OnTime NextTime, "StartFlash"
End Sub
Sub StopFlash()
Application.OnTime NextTime, "StartFlash", schedule:=False
ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic
End Sub
Pour démarrer le clignotement, il suffit de lancer StartFlash, pour l'arrêter: StopFlash.
faire clignoter une cellule sous Excel
par michel91
mercredi 25 avril 2007 à 15:52:26
(je recopie - je testerai plus tard)
Par Jeff, le jeudi 26 avril 2007 à 13:15:35
Trouvé ici : http://exceltips.vitalnews.com/Pages/T0214_Flashing_Cells.html
Cela ne peut être fait qu'avec une macro :
1. Selection la cellule à faire clignoter
2. Choisir Style dans le menu Format.
3. Dans la boîte de dialogue de Style, entrer un nouveau nom de style, comme 'Flashing'.
4. En utilisant les contrôles de la boîte de dialogue, modifier les attributs de style souhaités.
5. Cliquer sur OK.
Ce style peut être appliqué à toutes les cellules désirées.
Ensuite créez les macros (il y en a deux) :
Dim NextTime As Date
Sub StartFlash()
NextTime = Now + TimeValue("00:00:01")
With ActiveWorkbook.Styles("Flashing").Font
If .ColorIndex = xlAutomatic Then .ColorIndex = 3
.ColorIndex = 5 - .ColorIndex
End With
Application.OnTime NextTime, "StartFlash"
End Sub
Sub StopFlash()
Application.OnTime NextTime, "StartFlash", schedule:=False
ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic
End Sub
Pour démarrer le clignotement, il suffit de lancer StartFlash, pour l'arrêter: StopFlash.
Trouvé chez les collègues :
https://excel.developpez.com/faq/?page=Cellule#FaireClignoterCellule
à plus
https://excel.developpez.com/faq/?page=Cellule#FaireClignoterCellule
à plus
Une dernière pour la route
http://www.excelabo.net/excel/formatsdiv.php
au fond de la page on trouve ça: encore une variante
Faire clignoter en fonction de la valeur
Comment faire clignoter une cellule si sa valeur dépasse 100 ?
Dans cet exemple, la mise en forme conditionnelle
met un nombre supérieur à 100 en rouge.
et la macro de feuille :
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Target.Select
If IsNumeric(Target) Then
If ActiveCell.Value > 100 Then Call Clignotement
End If
End Sub
fait passer la couleur de remplissage du blanc
au rouge 300 fois.
Sub Clignotement()
Set plage = ActiveCell
Fond = ActiveCell.Interior.ColorIndex
For i = 1 To 300
plage.Interior.ColorIndex = 2
plage.Interior.ColorIndex = 3
Next i
plage.Interior.ColorIndex = Fond
End Sub
Serge Garneau, (N°784)
Bon c'est pas tout ça, va falloir les tester ces macros ...
http://www.excelabo.net/excel/formatsdiv.php
au fond de la page on trouve ça: encore une variante
Faire clignoter en fonction de la valeur
Comment faire clignoter une cellule si sa valeur dépasse 100 ?
Dans cet exemple, la mise en forme conditionnelle
met un nombre supérieur à 100 en rouge.
et la macro de feuille :
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Target.Select
If IsNumeric(Target) Then
If ActiveCell.Value > 100 Then Call Clignotement
End If
End Sub
fait passer la couleur de remplissage du blanc
au rouge 300 fois.
Sub Clignotement()
Set plage = ActiveCell
Fond = ActiveCell.Interior.ColorIndex
For i = 1 To 300
plage.Interior.ColorIndex = 2
plage.Interior.ColorIndex = 3
Next i
plage.Interior.ColorIndex = Fond
End Sub
Serge Garneau, (N°784)
Bon c'est pas tout ça, va falloir les tester ces macros ...
