求助有关Excel的问题！！！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助有关Excel的问题！！！

共有3472人关注过本帖树形打印复制链接主题：求助有关Excel的问题！！！

myzzip

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：159 积分：1283 威望：0 精华：0 注册：2013/5/15 14:11:00

求助有关Excel的问题！！！ 发帖心情

Post By：2013/12/4 14:33:00 [只看该作者]

Sheet(1,2).Value = "[$销售明细,Sum(数量),产品名称 ='A气'And 会员卡 <> 0 And 销售日期 = #" & Date.Today & "#]"

Sheet(2,2).Value = "[$销售明细,Sum(数量),产品名称 ='A气'And 会员卡 = 0 And 销售日期 = #" & Date.Today & "#]"

Sheet(7,2).Value = Sheet(2,2).Value + Sheet(1,2).Value 可以这样写吗？

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251048 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2013/12/4 14:38:00 [只看该作者]

不可以。

你为啥不直接用FoxTable计算：

Dim s1 As double =DataTables("销售明细").Compute("Sum(数量)", "产品名称 ='A气' And 会员卡 <> 0 And 销售日期 = #" & Date.Today & "#")

Dim s2 As double = DataTables("销售明细").Compute("Sum(数量)", "产品名称 ='A气' And 会员卡 = 0 And 销售日期 = #" & Date.Today & "#")

Sheet(1,2).Value = s1
Sheet(2,2).Value = s2

Sheet(7,2).Value = s1 + s2

[此贴子已经被作者于2013-12-4 14:39:30编辑过]

主题：求助有关Excel的问题！！！