[mso] Re: Excel 97 ?

  • From: "Colli, Anthony G" <Anthony.Colli@xxxxxxx>
  • To: "'mso@xxxxxxxxxxxxx'" <mso@xxxxxxxxxxxxx>
  • Date: Wed, 11 Sep 2002 13:12:37 -0400

Linda p-
 
 I have had a chance to do some Excel programming lately. I don't know of a
way to detect changes in an entire workbook that have not been saved, but
this macro will display the last time the workbook was saved, and will
display that value every time the workbook is opened.


Private Sub Workbook_Open()

Application.ActiveWorkbook.ActiveSheet.Cells(1, 1).Value = "Last Save"
Application.ActiveWorkbook.ActiveSheet.Cells(2, 1).NumberFormat = "m/d/yy
h:mm AM/PM"
Cells(2, 1).Value = BuiltinDocumentProperties("Last save time")

End Sub

-Anthony





-----Original Message-----
From: Linda F. Johnson [mailto:linda@xxxxxxxxxxxxxxxxxxxxxxxxxxx]
Sent: Wednesday, September 11, 2002 10:54 AM
To: mso@xxxxxxxxxxxxx
Subject: [mso] Re: Excel 97 ?



Hi P...I am sure this would require a macro.  The formula =TODAY() will
give you the current date, so anytime the spreadsheet it opened and
saved, this would update.  However, if the spreadsheet is opened but no
changes made, the date would still be changed while the spreadsheet is
open, so I'm sure this isn't what you want.

I'm sure there is a macro that could be made that would determine
whether the spreadsheet has been changed and then update the date, so we
will have to wait to hear from someone who knows how to do this with a
macro.  Or, possible Dian or Greg might know how to do this with a field
code?

Linda
Publisher ~ ABC ~ All 'Bout Computers
Owner ~ Linda's Computer Stop
http://personal-computer-tutor.com
FREE MS Office eBook Tutorial
http://personal-computer-tutor.com/library.htm
 


-----Original Message-----
From: mso-bounce@xxxxxxxxxxxxx [mailto:mso-bounce@xxxxxxxxxxxxx] On
Behalf Of Carr
Sent: Tuesday, September 10, 2002 7:58 PM
To: mso@xxxxxxxxxxxxx
Subject: [mso] Excel 97 ?



Hello,

I created a worksheet in excel 97.  I am wondering if there is a way to
have the date automatically update to the current date once data has
been changed in the worksheet.  

TIA,

P.


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will also
allow you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation
with instructions.  Once you are a member of the files group, you can go
here to upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: