以下是引用yangming在2009-4-11 9:28:00的发言:
1.FindText
2.CELL函数
我的目的有三个
一是在工资表中有一个计税工资列,中间的税率我要引用另一张税率表中的相关内容;
二是工资表中的计税工资的计算要减去一个缴费基数,原来是1600,现改成2000了,因为是动态的,所以我又做了一张表只有一行一列,就是缴费基数表,如何在计税工资中引用这个单元格的数字呢?
三中,我做了一张表是个人全年各月的工资总数,取值于工资库中的实发工资数,在易表中我可以用FindText设为列刷新公式就完成了,以狐表中我没有找到解决的办法,请教高手用什么代码?
一、请参考帮助中“自动输入的实现”。
自动输入的实现
实现自动输入的基本原理是:
1、有一个基础数据表,输入所有的基础信息,例如订单管理系统中,产品表会输入所有的产品信息。
2、在另一个表输入某关键列的内容,然后自动从基础数据表提取其它列的内容输入到相关列中,例如在订单表输入产品编号,可以从产品表提取该产品的名称、型号、规格,自动输入到订单表的相关列中。
示例一
例如希望在订单表输入产品编号,能够从产品表提取该产品的名称、型号、规格,自动输入到订单表的相关列中。
为实现此目的,可在订单表的DataColChanged事件中输入如下代码:
If
e.DataCol.Name = "产品编号" Then '发生变化的是产品名称吗?
'在产品表找出该产品
Dim dr As DataRow = DataTables("产品").Find("编号 = " & "'" & e.DataRow("产品编号") & "'" )
If dr IsNot Nothing '如果找到, 则设置各列内容
e.DataRow("品名")= dr("品名")
e.DataRow("型号")= dr("型号")
e.DataRow("规格")= dr("规格")
End If
End If
二、引用指定单元格的值,可以用Value(Row,Col,IncludeGroup),也可以用可以用Text。最后还可以用 DataTables("表名").Datarows(0)("列名")
Value
获得或设置指定坐标位置的单元格的值。
语法:
Value()
Value(Row,Col,IncludeGroup)
Value(Row,ColName,IncludeGroup)
Text
返回指定坐标位置的单元格的显示内容。
Text(Row,Col)
Row:行坐标,计算的时候包括分组行。
Col: 列坐标
[此贴子已经被作者于2009-4-11 9:43:36编辑过]