字典后输出优化

一壶鱼

chxw68 发表于 2023-4-21 07:30
这个代码不是我写的，表格中也没有数据，你自己试着修改吧，非常简单的问题。

好的，那我试试

一壶鱼

chxw68 发表于 2023-4-20 21:06
修改好了。

老师，有几个小细节:
1、后面室内装潢等抬头部分（一层，二层，厨房间，卫生间1、卫生间2的名称等）能修改为根据工作表（一层、二层、三层等）中对应的单元格中内容变化吗？
2、工作表名称（一层、二层、三层等）我准备改手稿1、2、3等名称，与工作表（室内装潢1）中第15列那的名称修改一致。这样读取多个类似的怎么与For Each aa In Array("一层", "二层", "三层”）关联起来。
两个小问题能优化一下吗

一壶鱼

一壶鱼 发表于 2023-4-21 08:56
老师，有几个小细节:
1、后面室内装潢等抬头部分（一层，二层，厨房间，卫生间1、卫生间2的名称等）能修 ...

For Each aa In Array("一层", "二层", "三层”）就是修改这个代码使得多个工作表名称（手稿1、2、3、4等）自动，不要手动再改了。

chxw68

修改好了。附件中的代码都是针对当前文件格式来写的，不要轻易修改文件格式。

一壶鱼

chxw68 发表于 2023-4-21 09:08
修改好了。附件中的代码都是针对当前文件格式来写的，不要轻易修改文件格式。

这个我知道

一壶鱼

一壶鱼 发表于 2023-4-21 09:10
这个我知道

我白天在外面忙的，回头我测试一下

一壶鱼

chxw68 发表于 2023-4-21 09:08
修改好了。附件中的代码都是针对当前文件格式来写的，不要轻易修改文件格式。

老师，我点击按钮是没什么数据输出？没反应

chxw68

修改好了。

一壶鱼

OK了，我想请教一下，室内装潢的G列我想不要在宏里得结果，要在单元格里直接用函数的话要修改哪里的代码啊？
因为有的单价数据库里没有我要直接填单价的话，后面G列的乘积我还要重新手工填一下。

chxw68

修改好了。