使用道具 举报
爱疯 发表于 2017-1-5 11:52 ActiveWorkbook.Name = Left(10,activeworkbook.name) & ".xls"
爱疯 发表于 2017-1-5 12:16 黄色这句改成 FName = Left(10,activeworkbook.name) & ".xls"
grf1973 发表于 2017-1-5 14:31 FName = Left(activeworkbook.name,10) & ".xls" 哈哈,爱风被你误导了。
Excel学徒123 发表于 2017-1-5 14:42 对于字符数长度不一样的,有几种方法 1、用vba.StrReverse 反转文本,找到第一个\出现的位置,用left提取 ...
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )
GMT+8, 2024-3-29 20:46 , Processed in 5.855560 second(s), 8 queries , Gzip On, Yac On.
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.