Les partenaires publicitaires:

Comment rendre le texte flash dans Excel

Excel ne dispose pas de clignoter ou le texte comme une option de police clignotant. Utilisation intégré dans Visual Basic pour Applications, cependant, vous pouvez utiliser le code d'Excel pour faire le changement de couleur du texte chaque section, créant un effet de clignotement.

Instructions

  1. Ouvrez le fichier Microsoft Excel 2010 dans laquelle vous voulez faire le flash de texte. Appuyez sur "Alt" et "F11" pour ouvrir la console VBA.

  2. droit; cliquez sur l'entrée "ThisWorkbook" sur le côté gauche de la console VBA. Déplacez votre souris sur "Insérer" et choisissez "Module".

  3. Double-cliquez sur l'option "ThisWorkbook". Copiez le code ci-dessous et de le coller dans l'espace blanc sur le côté droit de l'écran:

    Private Sub Workbook_Open ()

    Cligner des yeux

    End Sub

    Private Sub Workbook_BeforeClose (Cancel As Boolean)

    NoBlink

    End Sub

    Ce code va commencer et le texte clignote lorsque vous ouvrez ce classeur, et arrêter le texte clignotant lorsque vous fermez le classeur, une fois que vous insérez le code pour dire ce que Blink Excel et NoBlink signifie réellement.

  4. Double-cliquez sur "Module 1" de la liste sur le côté gauche de l'écran. Placez votre curseur sur le côté droit de l'écran et entrez la ligne suivante:




    Public Timecount As Double

    Cela crée une variable appelée "Timecount" que vous pouvez utiliser dans chaque sous-programme.

  5. Appuyez sur Entrée pour déplacer le curseur à la ligne suivante et entrez le code suivant:

    Sous clin ()

    Avec ThisWorkbook.Worksheets ("Sheet1") Range. ("A1: A10"). Font

    Si .ColorIndex = 3 Ensuite,

    .ColorIndex = 2

    Autre

    .ColorIndex = 3

    Fin si

    End With

    Timecount = maintenant + TimeSerial (0, 0, 1)



    Application.OnTime Timecount, «Blink»,, True

    End Sub

    Cela crée un sous-programme appelé «Blink» qui fera tout le texte dans la gamme définie à clignoter. Vous pouvez modifier la plage de "A1: A10" à tout ce que vous désirez gamme, y compris une cellule individuelle.

  6. Appuyez sur "Entrée" pour accéder à la ligne suivante et entrez le code suivant:

    Sous noblink ()

    ThisWorkbook.Worksheets ("Sheet1") Range. ("A1: A10"). Font.ColorIndex = _

    xlColorIndexAutomatic

    Application.OnTime Timecount, "Blink", False

    End Sub

    Cela va créer un sous-programme qui sera exécuté lorsque vous fermez le classeur. Il tourne tout le texte Back To Black, de sorte que quelqu'un qui ouvre le classeur sans macros activées ne seront pas accidentellement voir rien dans les zones de texte.

  7. Fermez la console VBA en cliquant sur le «X» dans le coin supérieur droit. Cliquez sur l'onglet "Fichier" en haut de l'écran et choisissez "Enregistrer sous." Sélectionnez «classeur Excel Macro-Enabled" dans le champ déroulant et tapez un nom pour le classeur. Cliquez sur "Enregistrer".

  8. Fermez le fichier Excel et puis rouvrez-le. Votre texte, dans la gamme définie dans la macro, se met à clignoter. En fonction de vos paramètres de sécurité, vous pouvez avoir besoin de cliquer sur le bouton «Activer les macros» en haut de l'écran pour voir le texte clignotant.

» » » » Comment rendre le texte flash dans Excel