[算表] vba档案名称

楼主: chunchanhung (毛毛狂)   2019-01-02 18:39:53
目前借由Vba来完成
将A档案资料 复制到B档案
但如果A档案名称每次都不同
Vba 需要一直跟改名称
想问有没有办法自动侦测现在开启档案名称
并自动带入取得(A档案)
语法如下
Sub
Windows(A档案).Activate
Range(B4).select
Selection.copy
Windows(B档案).Activate
Activecell.select
Active sheet.Paste
End sub
作者: soyoso (我是耀宗)   2019-01-02 18:45:00
开启档案名称正作用中的话activeworkbook.name如果宏写在a档案内的话thisworkbook.name如要要取得开启活页簿的话,可循环于workbooks集合
楼主: chunchanhung (毛毛狂)   2019-01-02 18:51:00
S大你好我如果我想用c档案来执行这个宏我宏写在个人宏活页簿那要怎么改呢
作者: soyoso (我是耀宗)   2019-01-02 18:56:00
如果a、b档已经开启且档案不确定的话,就循环于workbooks集合,判断排除c档档名不要取,再判断那个要归类为a档(可能是活页簿内有某个名称的工作表之类的),哪个为b档
楼主: chunchanhung (毛毛狂)   2019-01-02 23:20:00
S大循环想了很久但还是没有概念怎么写能提示一下吗 谢谢我目前是 开启两个档案 :‘’随机档案‘’&b档案透过A档案的宏(a档案未开启将 ‘’随机档案‘’内容复制到b档案那随机档案的名称是只能透过workbook循环来判断吗?
作者: soyoso (我是耀宗)   2019-01-02 23:56:00
循环看是用for each...next或用for...next配合workbooks(索引值)的方式,判断为if workbook.name不为a或b档名的话就为随机档案档名随机档案的名称是只能透过循环来判断吗?资料不足无法肯定是否就只能用循环方式。因为有可能原po所开启的随机档案是有符合某个字串在其中的话,也可以dir配合万用字符*取得

Links booklink

Contact Us: admin [ a t ] ucptt.com