Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
12
返回列表 发新帖
楼主: kenneth3396

[已解决]如何把這表裡的資料設計成一個vba

[复制链接]
发表于 2012-12-18 18:49 | 显示全部楼层    本楼为最佳答案   
回复

使用道具 举报

发表于 2012-12-18 18:52 | 显示全部楼层
回复

使用道具 举报

 楼主| 发表于 2012-12-25 09:15 | 显示全部楼层
zjdh 发表于 2012-12-18 18:49

太好了,老師真強,我需要就是像這樣
回复

使用道具 举报

 楼主| 发表于 2012-12-25 09:44 | 显示全部楼层
zjdh 发表于 2012-12-18 18:49

http://www.excelpx.com/forum.php?mod=attachment&aid=MjYwMjA3fDA4OGRmNWZjYmU3ZTJhZTUxZTNjZDg1ZWIwMWRkN2Q2fDE3MTUyMDYzMTU%3D&request=yes&_f=.jpgattach://260208.jpg 擷取1.JPG
擷取2.JPG

老師,不好意思他還是無法使用,我想我真的是一個vba白癡
回复

使用道具 举报

 楼主| 发表于 2012-12-25 09:48 | 显示全部楼层
zjdh 发表于 2012-12-18 18:49

擷取3.JPG


回复

使用道具 举报

发表于 2012-12-25 13:35 | 显示全部楼层
明白啦,是繁体字的原因!
你把以下语句
Arr1(j, 1) = "生產序號"
Arr1(j, 2) = "出產日期"
Arr1(j, 3) = "保固年"
Arry = Sheets("東庚資料表").Range("F2:H" & Sheets("東庚資料表").Range("F65536").End(xlUp).Row)
中的文字(乱码了),分别用你的系统改成本回帖的内容,注意工作表(xx资料表)表名必须一致!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-9 06:11 , Processed in 0.238467 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表