Results 1 to 13 of 13
  1. #1
    Star Lounger
    Join Date
    Jan 2002
    Location
    London, Gtr London, England
    Posts
    63
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Flashing Cell (Excel 97)

    I need to be able to set a certain cell value flash, as you can in word using the Format Font menu item.
    I have tried to do this on Workbook Open but the user can not enter anything into the spreadsheet whilst the VBA code is executing.

    Can anyone help?

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Flashing Cell (Excel 97)

    Excel (97 at least) simply wasn't designed to do such things. You can make a macro execute periodically, but I wouldn't really recommend it. It probably has negative side-effects.

    If you want to experiment, here is a macro that makes the borders of cell C3 change every 5 seconds. It can be adapted to make the text flash, or the fill color. You can also change the frequency.

    Sub FlashCell()
    Dim aCell As Range
    Set aCell = Cells(3, 3)
    If aCell.Borders.LineStyle = xlContinuous Then
    aCell.Borders.LineStyle = xlNone
    Else
    aCell.Borders.Weight = xlMedium
    aCell.Borders.LineStyle = xlContinuous
    End If
    Application.OnTime Now + TimeValue("0:00:05"), "FlashCell"
    End Sub

  3. #3
    5 Star Lounger
    Join Date
    May 2001
    Location
    Philadelphia, Pennsylvania
    Posts
    676
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Flashing Cell (Excel 97)

    Suppose I had a list, say of checks. I wanted to send this list to someone and have that "flashing" for more than one line of payee and amount cells. How might that be done? Seems to be a good highlighting mechanism for significant items.

  4. #4
    Uranium Lounger
    Join Date
    Jan 2001
    Location
    South Carolina, USA
    Posts
    7,295
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Flashing Cell (Excel 97)

    If the list is in an Excel document, then you could use Hans' technique with a Workbook Open event routine to start the flashing. Hans' routine flashes the border around the cell, but it could just as easily flash the text in the cell by changing the font color.
    Legare Coleman

  5. #5
    Star Lounger
    Join Date
    Nov 2002
    Location
    Port Talbot, Wales
    Posts
    71
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Flashing Cell (Excel 97)

    If all you want to do is highlight a cell y not use the Conditional format sellings? i ain't tried this yet but off the top of my head i think it's possible!

    Jambo

  6. #6
    Super Moderator
    Join Date
    May 2002
    Location
    Canberra, Australian Capital Territory, Australia
    Posts
    5,054
    Thanks
    2
    Thanked 417 Times in 346 Posts

    Re: Flashing Cell (Excel 97)

    Hi Cindy,

    As an alternative to Hans' solution, try this-
    To make C1 to flash every second if it's value is 1, use conditional formatting in the target cell, with the formula:
    =AND(MOD(VALUE(TEXT(NOW(),"ss")),2)=1,C1=1)
    and set the conditional format to whatever font/background/border arrangement you want. Then add the following macro to the workbook:

    Sub FlashCell()
    Range("A1").Calculate
    Application.OnTime Now + TimeValue("0:00:01"), "FlashCell"
    End Sub
    Note: change "A1" if needed, to any cell that does not contain a formula - unless you actually want the nominated cell to recalculate every second.

    Run the macro and C1 will flash if your criterion is met.

    Once the above has been done, all you need to do to make other cells flash is to copy the conditional format to those cells, changing nothing more than the "C1=1" argument to whatever 'flash' criterion you want. For example, if you want more than one cell to flash if "C1=1" , change "C1=1" to "$C$1=1" and apply/copy the format to those cells also.

    You could even get fancy, having up to three sequential flashes of the cell, by adding conditional format arguments and making the conditional format formulae:
    =AND(MOD(VALUE(TEXT(NOW(),"ss")),4)=1,C1=1);
    =AND(MOD(VALUE(TEXT(NOW(),"ss")),4)=2,C1=1); and
    =AND(MOD(VALUE(TEXT(NOW(),"ss")),4)=3,C1=1),
    respectively.

    To fully automate the flashing, call the macro from your workbook open routine.

    Cheers
    Cheers,

    Paul Edstein
    [MS MVP - Word]

  7. #7
    3 Star Lounger
    Join Date
    Mar 2001
    Location
    Canton, Ohio, USA
    Posts
    270
    Thanks
    3
    Thanked 0 Times in 0 Posts

    Re: Flashing Cell (Excel 97)

    I can't seem to locate post 224747. When I click on your link I receive a "bad request" error screen in return. Is this post still available? THANKS. <img src=/S/basket.gif border=0 alt=basket width=58 height=52>

  8. #8
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Flashing Cell (Excel 97)

    Sometimes there is a short hiccup somewhere in the chain between you and the Lounge server. I just tried the link and it worked OK, so I suggest that you try again.

  9. #9
    3 Star Lounger
    Join Date
    Mar 2001
    Location
    Canton, Ohio, USA
    Posts
    270
    Thanks
    3
    Thanked 0 Times in 0 Posts

    Re: Flashing Cell (Excel 97)

    The link now works but connects to a thread about a file not found error and not a thread on flashing multiple cells...could it be that the message number referenced in message 227475 is in error?

  10. #10
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Flashing Cell (Excel 97)

    You're correct - I suppose it was a typo; Pat probably meant <post#=227472>post 227472</post#> which is in this thread, immediately above the reply with the link.

  11. #11
    WS Lounge VIP rory's Avatar
    Join Date
    Dec 2000
    Location
    Burwash, East Sussex, United Kingdom
    Posts
    6,280
    Thanks
    3
    Thanked 191 Times in 177 Posts

    Re: Flashing Cell (Excel 97)

    I presume it was meant to be a link to <!post=post 227472, 227472>post 227472<!/post> earlier in this very thread.
    Regards,
    Rory

    Microsoft MVP - Excel

  12. #12
    Super Moderator
    Join Date
    May 2002
    Location
    Canberra, Australian Capital Territory, Australia
    Posts
    5,054
    Thanks
    2
    Thanked 417 Times in 346 Posts

    Re: Flashing Cell (Excel 97)

    <P ID="edit" class=small>(Edited by macropod on 25-Feb-03 08:04. Link reference corrected)</P>Hi Torquemada,

    Check out my reply to Cindy in <post#= 227472>post 227472</post#>. It covers the issue of how to 'flash' multiple cells.

    Cheers
    Cheers,

    Paul Edstein
    [MS MVP - Word]

  13. #13
    Super Moderator
    Join Date
    May 2002
    Location
    Canberra, Australian Capital Territory, Australia
    Posts
    5,054
    Thanks
    2
    Thanked 417 Times in 346 Posts

    Re: Flashing Cell (Excel 97)

    Sorry folks - tangled fingers. I've now corrected the link - it was to the post immediately above the one being queried .....
    Cheers
    Cheers,

    Paul Edstein
    [MS MVP - Word]

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •