+ Reply to Thread
Results 1 to 2 of 2

create a macro to save excel sheet

Hybrid View

  1. #1
    Moussa Hawas
    Guest

    create a macro to save excel sheet

    I am asking for your help, as I am in a great trouble.
    I want to do the following in a simple way.
    I am working on an excel file that contains only one sheet.
    That excel sheet is linked to Reuters to get the prices of stocks every
    second live.
    I want that file to save its latest figures been donwloaded from Reuters
    automatically at certain hour of day while I am away from my office. Did you
    get it?

    Let me say it again, I want a code to write in Visual Basic or macros, to
    make that excel sheet to be saved automatically when the clock of the
    computer turns to be 11:00 pm every day while I am away from my desk.

    Thanks.
    Moussa Hawas
    Analyst, Egypt Stock Market.
    moussahawas@beltonefinancial.com


  2. #2
    Richard Buttrey
    Guest

    Re: create a macro to save excel sheet

    On Sun, 16 Oct 2005 12:51:01 -0700, Moussa Hawas <Moussa
    Hawas@discussions.microsoft.com> wrote:

    >I am asking for your help, as I am in a great trouble.
    >I want to do the following in a simple way.
    >I am working on an excel file that contains only one sheet.
    >That excel sheet is linked to Reuters to get the prices of stocks every
    >second live.
    >I want that file to save its latest figures been donwloaded from Reuters
    >automatically at certain hour of day while I am away from my office. Did you
    >get it?
    >
    >Let me say it again, I want a code to write in Visual Basic or macros, to
    >make that excel sheet to be saved automatically when the clock of the
    >computer turns to be 11:00 pm every day while I am away from my desk.
    >
    >Thanks.
    >Moussa Hawas
    >Analyst, Egypt Stock Market.
    >moussahawas@beltonefinancial.com



    Before leaving your desk set the following macro running.

    Public Sub SaveReutersData()
    Dim Mytime As Variant
    Dim Timenow As Date
    Mytime = TimeSerial(23, 0, 0)
    Do Until Timenow >Mytime
    Timenow = Time
    Loop
    ActiveWorkbook.Save
    End Sub


    __
    Richard Buttrey
    Grappenhall, Cheshire, UK
    __________________________

+ 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