打开excel问题

st788796

没怎么用过这个, 在 Excel 2013 中查了一下 Open 后面有很多参数

Function Open(Filename As String, [UpdateLinks], [ReadOnly], [Format], [Password], [WriteResPassword], [IgnoreReadOnlyRecommended], [Origin], [Delimiter], [Editable], [Notify], [Converter], [AddToMru], [Local], [CorruptLoad]) As Workbook

st788796

kcad2010 发表于 2013-11-24 10:52
能帮忙修改一下吗，加上密码。谢谢

;0·打开xls

压缩个带密码的 xls 文件传上来, 说明密码

st788796

kcad2010 发表于 2013-11-24 14:01
密码：123456
有二种excel2003  2007

在Windows 7 x64 + Excel 2010 上这个方法有问题，creat-object 后没有worksheets属性，显示并打开一个文件才可以用worksheets的open方法，密码选项测试中，2010提示有15个参数

st788796

kcad2010 发表于 2013-11-24 14:01
密码：123456
有二种excel2003  2007

经测试这样成

1. (vlax-invoke-method
   
2.   (vlax-get-property Rtn 'WorkBooks)
   
3.   'Open
   
4.   fl
   
5.   0;_ UpdateLinks
   
6.   :vlax-true;_ReadOnly
   
7.   5;_ Format
   
8.   "123456"
   
9. )

(vlax-invoke-method<br />   (vlax-get-property Rtn 'WorkBooks)<br />   'Open<br />   fl<br />   0;_ UpdateLinks <br />   :vlax-true;_ReadOnly<br />   5;_ Format <br />   "123456"<br /> )

st788796

kcad2010 发表于 2013-11-24 19:15
谢谢，成功了

;;;Examples:

注意 ReadOnly 选项，现在是只读打开！

Password 为 Nil 时只需要一个 Filename ，不需要后面的参数

st788796

kcad2010 发表于 2013-11-25 11:54
你好，还有一个问题，请看下面
;;(vlxls-app-open "E:\\Users\\en007\\Desktop\\tmp\\book21.xlsx"  t n ...

这个在MSDN文档中可以查到，Updatalink是否更新链接，3 是 否，后面的 5 我理解是分隔符，如打开有分隔符的txt，5 是空格，还有其它几个值可用，那个网页没有保存，你Google搜索 excel vba open 试试

st788796

楼上解释错了,下面是原文

http://msdn.microsoft.com/en-us/library/office/ff194819.aspx


By default, macros are enabled when opening files programmatically. Use the AutomationSecurity property to set the macro security mode used when opening files programmatically.
You can specify one of the following values in the UpdateLinks parameter to determine whether external references (links) are updated when the workbook is opened.

Value	Meaning
0	External references (links) will not be updated when the workbook is opened.
3	External references (links) will be updated when the workbook is opened.

You can specify one of the following values in the Format parameter to determine the delimiter character for the file.

Value	Delimiter
1	Tabs
2	Commas
3	Spaces
4	Semicolons
5	Nothing
6	Custom character (see the Delimiter argument

st788796

Open 完整参数

---

             expression  .Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad)
expression   A variable that represents a Workbooks object.
Parameters

Name	Required/Optional	Data Type	Description
FileName	Optional	Variant	String.  The file name of the workbook to be opened.
UpdateLinks	Optional	Variant	Specifies the way external references (links) in the file, such as the reference to a range in the  Budget.xls workbook in the following formula =SUM([Budget.xls]Annual!C10:C25), are updated. If this argument is omitted, the user is prompted to specify how links will be updated. For more information about the values used by this parameter, see the Remarks section. If Microsoft Excel is opening a file in the WKS, WK1, or WK3 format and the UpdateLinks argument is 0, no charts are created; otherwise Microsoft Excel generates charts from the graphs attached to the file.
ReadOnly	Optional	Variant	True to open the workbook in read-only mode.
Format	Optional	Variant	If Microsoft Excel opens a text file, this argument specifies the delimiter character. If this argument is omitted, the current delimiter is used. For more information about the values used by this parameter, see the Remarks section.
Password	Optional	Variant	A string that contains the password required to open a protected workbook. If this argument is omitted and the workbook requires a password, the user is prompted for the password.
WriteResPassword	Optional	Variant	A string that contains the password required to write to a write-reserved workbook. If this argument is omitted and the workbook requires a password, the user will be prompted for the password.
IgnoreReadOnlyRecommended	Optional	Variant	True to have Microsoft Excel not display the read-only recommended message (if the workbook was saved with the Read-Only Recommended option).
Origin	Optional	Variant	If the file is a text file, this argument indicates where it originated, so that code pages and Carriage Return/Line Feed (CR/LF) can be mapped correctly. Can be one of the following XlPlatform constants: xlMacintosh, xlWindows, or xlMSDOS. If this argument is omitted, the current operating system is used.
Delimiter	Optional	Variant	If the file is a text file and the Format argument is 6, this argument is a string that specifies the character to be used as the delimiter. For example, use Chr(9) for tabs, use "," for commas, use ";" for semicolons, or use a custom character. Only the first character of the string is used.
Editable	Optional	Variant	If the file is a Microsoft Excel 4.0 add-in, this argument is True to open the add-in so that it is a visible window. If this argument is False or omitted, the add-in is opened as hidden, and it cannot be unhidden. This option does not apply to add-ins created in Microsoft Excel 5.0 or later. If the file is an Excel template, True to open the specified template for editing. False to open a new workbook based on the specified template. The default value is False.
Notify	Optional	Variant	If the file cannot be opened in read/write mode, this argument is True to add the file to the file notification list. Microsoft Excel will open the file as read-only, poll the file notification list, and then notify the user when the file becomes available. If this argument is False or omitted, no notification is requested, and any attempts to open an unavailable file will fail.
Converter	Optional	Variant	The index of the first file converter to try when opening the file. The specified file converter is tried first; if this converter does not recognize the file, all other converters are tried. The converter index consists of the row numbers of the converters returned by the FileConverters property.
AddToMru	Optional	Variant	True to add this workbook to the list of recently used files. The default value is False.
Local	Optional	Variant	True saves files against the language of Microsoft Excel (including control panel settings). False (default) saves files against the language of Visual Basic for Applications (VBA) (which is typically United States English unless the VBA project where Workbooks.Open is run from is an old internationalized XL5/95 VBA project).
CorruptLoad	Optional	XlCorruptLoad	Can be one of the following constants: xlNormalLoad, xlRepairFile and xlExtractData. The default behavior if no value is specified is xlNormalLoad and does not attempt recovery when initiated through the OM.

st788796

kcad2010 发表于 2013-11-25 17:28
謝謝,

Google第一个是E文，本人E文水平也就捡vlisp用到的部分，灰常差滴