+ Reply to Thread
Results 1 to 6 of 6

Event Trigger

Hybrid View

Guest Event Trigger 12-16-2005, 11:25 AM
Guest Re: Event Trigger 12-16-2005, 11:40 AM
Guest Re: Event Trigger 12-16-2005, 11:50 AM
Guest Re: Event Trigger 12-16-2005, 12:10 PM
Guest Re: Event Trigger 12-16-2005, 02:25 PM
Guest Re: Event Trigger 12-16-2005, 04:35 PM
  1. #1
    Martin Bentler
    Guest

    Re: Event Trigger



    Ok, I only one a particular workbook to stop working completely, never
    to work again, on January 9, 2006 at 9:00, so I don't need the class
    module.
    OR it could stop working as soon as it is opened on Jan 9, 06. Either is
    good for me.

    *** Sent via Developersdex http://www.developersdex.com ***

  2. #2
    Tom Ogilvy
    Guest

    Re: Event Trigger

    In the workbook_open event of the workbook you could have code like

    In the ThisWorkbook Code Module:

    Private Sub Workbook_Open()
    if date > DateValue("Jan 9, 2006") then
    thisworkbook.close
    end if
    End sub

    However, just disabling macros upon opening or changing the system clock
    will defeat this protection mechanism - besides the fact that the user can
    break into your code and remove it.

    --
    Regards,
    Tom Ogilvy


    "Martin Bentler" <mbentler@sympatico.ca> wrote in message
    news:O0QvT1mAGHA.2156@TK2MSFTNGP11.phx.gbl...
    >
    >
    > Ok, I only one a particular workbook to stop working completely, never
    > to work again, on January 9, 2006 at 9:00, so I don't need the class
    > module.
    > OR it could stop working as soon as it is opened on Jan 9, 06. Either is
    > good for me.
    >
    > *** Sent via Developersdex http://www.developersdex.com ***




+ 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