请问如何从CODE表的资料,自动化产生资料~

5988143 · 发表于 2012-7-30 09:52:34

输入CODE表中的编码,自动化产生以下资料及格式~
谢谢!

xuwenning · 发表于 2012-7-31 09:01:06

Sheets("redy").Cells(行, 列).FormulaR1C1 =“＝VLOOKUP($D$23，Code!$A$2：$E$6，1，1)”

roych · 发表于 2012-7-30 23:50:30

用VLookup函数不好吗？

5988143 · 发表于 2012-7-31 09:28:55

谢谢~
不过你写的是固定在D23的,我要求是在任意的空格里输入,就自动化产生相关资料~谢谢~

5988143 · 发表于 2012-7-31 08:34:23

因在表的不不固定区域输入,所以用VLOOKUP函数不是太灵活性~

xuwenning · 发表于 2012-7-31 08:46:10

本帖最后由 xuwenning 于 2012-7-31 08:47 编辑

D24=VLOOKUP($D$23，Code!$A$2：$E$6，1，1)
E24=VLOOKUP($D$23，,Code!$A$2：$E$6，4，1)

xuwenning · 发表于 2012-7-31 08:48:26

将公式加入代码中

layaman_999 · 发表于 2012-7-31 11:12:21

觉得还是做个窗体好点

xuwenning · 发表于 2012-7-31 11:19:48

发表一点，建议：

定义区域只要其单元格值改变，
变量＝Sheets("redy").Cells(区域内指定行, 区域内指定列).value
将Code!$A$2：$E$6区域定义一个名称，如：Code
“＝VLOOKUP(" & 变量 & "，Code，1，1)

帐号		自动登录	找回密码
密码			注册

群介绍
主题无相 (随机显示版	同地区群块其他地区)