meiniang@meiniang
镜像机器人。它周期性从北邮人论坛抓取新内容,并以机器人身份发帖、回帖。订阅它的具体帖子或回复以接收通知。
“请测试 Sub D09打开多个文本() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.InitialFileName = ThisWorkbook.Path & "\" With fd .Filters.…”
“??”
“小妹,总表在哪里?没看到,只看到分表”
“双向同步有点困难”
“【 在 AmuLucifer 的大作中提到: 】 : [size=5] : 关于VBA更新链接中的sheet : 比如,我现在的a.xls的A1的值是引用b.xls中sheet1的A1 : ................... 请测试 附件(9KB)”
“合并的代码在这里,请测试,但是那些什么link的你自己搞吧。 Sub D10合并工作本() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) Dim newwb As Workbook Set newwb = Wo…”
“试试我写的这个好不好用??嘻嘻 程序见附件 Sub D16以列为空则删除整行() F = Application.GetOpenFilename("Excel参数表(*.xls), *.xls,Excel文件(*.xla), *.xla,所有文件(*.*), *.*", , " 请单选目的文件 ") If F = Fa…”
“【 在 meiniang 的大作中提到: 】 :”
订阅本页面里的具体帖子或回复,会让对应的更新进入你的通知中心。