+ Reply to Thread
Results 1 to 5 of 5

Copy and Paste Cell automatically every 20 mins

Hybrid View

  1. #1
    Forum Contributor
    Join Date
    06-28-2011
    Location
    London, England
    MS-Off Ver
    Excel 2003
    Posts
    115

    Copy and Paste Cell automatically every 20 mins

    Hi
    I have data in cell A1, it is updated automatically, I want to copy and paste automatically from Cell A1 to B1 every 20 mins
    please help me
    Thanks

  2. #2
    Forum Guru xladept's Avatar
    Join Date
    04-14-2012
    Location
    Pasadena, California
    MS-Off Ver
    Excel 2003,2010
    Posts
    12,378

    Re: Copy and Paste Cell automatically every 20 mins

    Hi zit1343,

    This may work, but it's at every 20 minutes starting at the hour

    =IF(NOT(MOD(MINUTE(NOW()),20)),$A$1,"Do Nothing")

    I don't use formulas much so I don't know the code for "Do Nothing"
    XLAdept
    Last edited by xladept; 04-26-2012 at 07:42 PM. Reason: correction

  3. #3
    Forum Contributor
    Join Date
    06-28-2011
    Location
    London, England
    MS-Off Ver
    Excel 2003
    Posts
    115

    Re: Copy and Paste Cell automatically every 20 mins

    Hi Thanks everymuch, is there a way to make it every 20 mins ?
    Thanks

  4. #4
    Administrator FDibbins's Avatar
    Join Date
    12-29-2011
    Location
    Duncansville, PA USA
    MS-Off Ver
    Excel 7/10/13/16/365 (PC ver 2310)
    Posts
    52,946

    Re: Copy and Paste Cell automatically every 20 mins

    looks to me like it is?
    1. Use code tags for VBA. [code] Your Code [/code] (or use the # button)
    2. If your question is resolved, mark it SOLVED using the thread tools
    3. Click on the star if you think someone helped you

    Regards
    Ford

  5. #5
    Forum Guru xladept's Avatar
    Join Date
    04-14-2012
    Location
    Pasadena, California
    MS-Off Ver
    Excel 2003,2010
    Posts
    12,378

    Re: Copy and Paste Cell automatically every 20 mins

    Hi Zit1343,

    I couldn't find "do nothing" code so I've written:

    Function On20(a As Range) As Variant
    Static b
    If b = 0 Then b = a
    On20 = b
    If Minute(Now()) Mod 20 = 0 Then
    On20 = a: b = a: End If: End Function
    It relies on frequent updating of A1 but it seems to work.
    So, if you use macros, put this code in a module and put:

    =On20(A1)
    in B1
    Last edited by xladept; 04-28-2012 at 10:03 PM.
    If I've helped you, please consider adding to my reputation - just click on the liitle star at the left.

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~(Pride has no aftertaste.)

    You can't do one thing. XLAdept

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~aka Orrin

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

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

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1