以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]可以在EXCEL模板的打印条件中使用标记吗？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=39454)
--  作者：eway168
--  发布时间：2013/8/24 18:15:00
--  [求助]可以在EXCEL模板的打印条件中使用标记吗？
如题，在代码中：

Dim Book As New XLS.Book("c:\\book5.xls")
Book.Marks.Add("用户名",User.Name) \'添加标记
Book.Build()
Book.Save("c:\\reports\\test.xls")
Dim Proc As New Process
Proc.File = "c:\\reports\\test.xls"
Proc.Start()

这是可行的，但：

dim dytj as string="<[列名]=\'" & 条件表达式 &"\'>"

Book.Marks.Add("打印条件",dytj)

这样好象行不能通。

可解么？

另外，用：Sheet(3,9).Value = "<日期 = # " & Date.Today & "#>" 。因为写代码时，无法确定(3,9)的值，因为execel模板在使用时会修改，所以用不了这个方式。

[此贴子已经被作者于2013-8-24 18:19:10编辑过]
--  作者：有点甜
--  发布时间：2013/8/24 19:16:00
--  
 不可以使用标记，标记只适用于内容区。

 excel模板在导入数据时，会去除excel表格的第一列，所以你的纵坐标就要减一了。

 heet(3,8).Value 
--  作者：eway168
--  发布时间：2013/8/24 19:54:00
--  
多谢关注。相同的代码会针对若干个excel模板，这些模板的列是不定的，所以（3，x)列坐标无法定的。如何是好？
--  作者：有点甜
--  发布时间：2013/8/24 20:22:00
--  
 刚刚测试，excel模板的定义区域是可以使用 公式的。比如 你设置 (3, x)的公式是 = B1

 然后，你在狐表里往B1里设置值就行了。
--  作者：eway168
--  发布时间：2013/8/24 21:31:00
--  
是打印条件，不是打印表达式的值。4楼的描述看不懂，不好意思。
可能只能是这样了：
--  作者：有点甜
--  发布时间：2013/8/24 21:38:00
--  
 能解决就好。4楼的意思是：

 你在excel模板里的(3,x)单元格写入 =B1 意思是(3,x)的值等于单元格B1的值。

 以后，你操作excel模板的时候，往B1，也就是是(1,1)设置值就相当于往(3,X)设置值了。B1的位置是可以固定的。