HG
坛中谁知道用VBA仅打开指定路径的文件夹怎么写？求助下
会不都啥
还有，苹果手机，所有硬件都是强适配本机版本软件。你们会发现，更新一次系统，就卡一点。
术术老会员委牛吹
明显百度一下就有的東西
你都要問我們
会不都啥
workbooks.open(路径文件名)
HG
我是要做个按钮
打开文件夹，不是工作簿......
情温叶一摘
他说文件夹~情温叶一摘
你不可以用函数吗
HG
VBA
会不都啥
dim filename
filename = dir(路径)
do while filename <> ""
filename = dir()
loop
仔马层基会员委牛吹
Shell "explorer " 路径
DNA
shell explorer..........
术术老会员委牛吹
Call Shell("explorer.exe" & " " & "C:\test", vbNormalFocus)
HG
ok
会不都啥
如果打开文件没有关闭机制，会死人的~
上次我搞过一个，打开到50个的时候，死机了~
会不都啥
你可以试试，不停发送打开。然后~
= -
就白屏了
会不都啥
嗯
临时写了一个合并工作簿的代码，忘记写关闭代码了
刺激的不得了
情温叶一摘
0-0有时候无限循环真的很抓狂~关不掉~又卡死了
会不都啥
只不过200多个表，而已
到50个就不动了
= -
情温叶一摘
那等等呗会不都啥
白屏了
内存也吃力
我索性关了，重写加了个关闭。一会会就好了
我才不等呢
空天
听起来好麻烦的样子abv写代候时的闲
?吹牛委员会老术术 你啥时候复活的
色音の成完未
=now()
情温叶一摘
我也有好多~我都潜水了HG
来个人解答一下，为什么序号2可以打开文件夹，序号1就不行
...mmE
？我在access 里面删数据 为啥删除完还要出现已删除 而不是直接删干净HG
Shell("explorer.exe "后面的文件夹名称有长度限制？
HG
这个限制有办法解开吗？或者打开这个长名字的文件夹有什么其他方法？
者荒拾忆回
Sub wan()
Dim i As Integer, ha As Integer
For i = 2 To Cells(Rows.Count, "A").End(xlUp).Row
For ha = i + 1 To Cells(Rows.Count, "A").End(xlUp).Row
If Range("A" & i).Value = Range("A" & ha).Value Then Rows(ha).Delete
Next ha
Next i
End Sub
烦请ALL.:) 帮我看看 我想删除a列 重复数据 这个代码删除不彻底是哪里出了问题
他说文件夹~
那等等呗
听起来好麻烦的样子
？我在access 里面删数据 为啥删除完还要出现已删除 而不是直接删干净
