Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
builtdocumentproperties=value in a cell
I'm new to this programming thing, and am making a simple mistake I'm
sure. I'd like to set a document property to equal a cell's value, that cell is named "total". What is wrong with the following? It sets the comments value to the word total, not the numeric value in the cell named "value". Also,how would I get it to run automaticaly on save? The goal here is to be able to see the totals in estimates before opening them. Sub total() ThisWorkbook.BuiltinDocumentProperties("comments") .VALUE = total End Sub The properties it sets show up in excel under the file/properties dialog box when the file is open, but don't show up in windows until I close the file. Not a big deal, but it seems odd that they don't update when the file is saved. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
builtdocumentproperties=value in a cell
In the ThisWorkbook.Module
Private Sub Workbook_BeforeSave( _ ByVal SaveAsUI As Boolean, Cancel As Boolean) ThisWorkbook.BuiltinDocumentProperties( _ "comments").VALUE = ThisWorkbook.Names("total") _ RefersToRange.Value End Sub You can also just use Range("Total").Value I would think. -- Regards, Tom Ogilvy "mhoffmeier" wrote in message oups.com... I'm new to this programming thing, and am making a simple mistake I'm sure. I'd like to set a document property to equal a cell's value, that cell is named "total". What is wrong with the following? It sets the comments value to the word total, not the numeric value in the cell named "value". Also,how would I get it to run automaticaly on save? The goal here is to be able to see the totals in estimates before opening them. Sub total() ThisWorkbook.BuiltinDocumentProperties("comments") .VALUE = total End Sub The properties it sets show up in excel under the file/properties dialog box when the file is open, but don't show up in windows until I close the file. Not a big deal, but it seems odd that they don't update when the file is saved. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Code to copy the formulae of one cell to all the cell in the rangewith the specific cell and columnnumber changing Options | Excel Discussion (Misc queries) | |||
Code to copy the formulae of one cell to all the cell in the rangewith the specific cell and columnnumber changing | Excel Discussion (Misc queries) | |||
Populate a cell if values in cell 1 and cell 2 match cell 3 and 4 | Excel Worksheet Functions | |||
How to create/run "cell A equals Cell B put Cell C info in Cell D | Excel Discussion (Misc queries) | |||
Question: Cell formula or macro to write result of one cell to another cell | Excel Programming |