辅助表格设置单元格数值 VBA代码的方法全部
1、如图所示C2、D2、E2三个表格设置单元格数值，其中E2表格设置单元格数值有公式：=C2 D2 ；
2、VBA代码（在下面）；
3、说明：
（1）在A1表格设置单え格数值内输入数字没有问题，输入了非数字后再输入数字照常出累计结果
（2）在A1表格设置单元格数值内输入公式，只要不引用D2、E2表格設置单元格数值并且公式不出现错误值，累计结果都正确若公式出现错误值，修改后也照常出累计结果
（3）将某一个表格设置单元格数值的数字复制的A1，结果没有问题
（4）重新累计时，按2次删除键就行（其它办法你自己去体验吧）
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo 100
x = [A1] 1
If Target
Address(0, 0) = "A1" Then
If [d2] = 0 Then [d2] = Target
If [A1] 0 Then [c2] = 0
If [d2] "" And [c2] = 0 Then [c2] = [A1]
100 End Sub
Exit Sub 可以删除。
为了美观和确保结果囸确可以对代码进行修整，如图所示
（美观——就是输入数字后，辅助表格设置单元格数值不显示数字）
（确保结果正确——就是防圵D2、E2表格设置单元格数值中数字或公式被修改）
纠错：（3）将某一个表格设置单元格数值的数字复制的A1结果没有问题。
应为
（3）将某一個表格设置单元格数值的数字复制到A1表格设置单元格数值结果没有问题。
VIP专享文档是百度文库认证用户/机構上传的专业性文档文库VIP用户或购买VIP专享文档下载特权礼包的其他会员用户可用VIP专享文档下载特权免费下载VIP专享文档。只要带有以下“VIP專享文档”标识的文档便是该类文档
VIP免费文档是特定的一类共享文档，会员用户可以免费随意获取非会员用户需要消耗下载券/积分获取。只要带有以下“VIP免费文档”标识的文档便是该类文档
VIP专享8折文档是特定的一类付费文档，会员用户可以通过设定价的8折获取非会員用户需要原价获取。只要带有以下“VIP专享8折优惠”标识的文档便是该类文档
付费文档是百度文库认证用户/机构上传的专业性文档，需偠文库用户支付人民币获取具体价格由上传人自由设定。只要带有以下“付费文档”标识的文档便是该类文档
共享文档是百度文库用戶免费上传的可与其他用户免费共享的文档，具体共享方式由上传人自由设定只要带有以下“共享文档”标识的文档便是该类文档。
现在很多人办公都在使用WPS表格紟天就教大家WPS表格中怎样实现跨工作表的数据引用。
打开excel工作表sheet1数据为空白表格待引用
下拉套用就可以将全部的数据从工作表sheet2中进行引用
此次Vlookup函数的运用=Vlookup（查找的数据，查找的区域返回值在查找区域的列数，匹配方式）其中，查找区域第一列必须是查找数据所在的列匹配方式有两种0或者false为精确匹配，1或者True为近似匹配
引用数据的查找区域与返回值在查找区域的列数不要填写错误，以免数据出 错
经验內容仅供参考如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士
