vba如何复制文件

21-92的呢？

1234****Dim xk = 0For x = 1 To 5If x Mod 2 <> 0 Thenk = k + 1End IfNext xMsgBox k

结果3，K的值就是奇数的值。

一次性选中多个文件复制粘贴就行，按ctrl键可以一次性选中多个不连续的文件，按Shift键可以一次性选中多个连续的文件，先选中第一个，然后按Shift键选中最后一个。

需要把复制的文件选定后，再用复制粘贴的方法。
在资源管理器窗口中选定文件后，用鼠标右键单击，在弹出的快捷菜单中选择【复制】命令。这时表面上看来没有任何反应，实际上已经在剪贴板中记录了全部要复制的信息。
用鼠标右键单击要放置的目标盘或文件夹，单击弹出的快捷菜单中的【粘贴】命令。复制之后粘贴之前，不能把被复制的文件或文件夹删除，因为剪贴板中只是记录了要复制的文件信息，即文件所在磁盘位置等，而不是文件的全部内容。一次复制的内容可以粘贴几次，直到下次的复制内容进入剪贴板中。

怎么复制粘贴文件
按一键复制文件，发送到指定文件夹的方法： 第一步：首先新建一个文件夹，这个文件夹用于保存复制的文件，将其任意重命名； 第二步：在刚才新建的文件夹上点击鼠标右键——>选择“发送到(N)”，发送到“桌面快捷方式”； 第三步：点击“我的电脑”——>点击上方的“工具”菜单——>选择“文件夹选项”——>切换到“查看”选项卡中——>下拉滑动条，选中“显示所有文件和文件夹”——>点击“确定”； 第四步：打开“我的电脑”——>进入C盘——>进入“Documents and Settings”文件夹——>进入以您的计算机用户名命名的文件夹——>打开“SendTo”文件夹——>回到“桌面”——>右键复制刚才发送到桌面的文件夹快捷方式——>粘贴到“SendTo”文件夹中即可； 第五步：在需要复制的文件上点击鼠标右键——>选择“发送到(N)”——在发送菜单中就能看到您指定的文件夹了； 完成上述五个步骤之后，就可以在任意文件夹中点击鼠标右键将需要复制的文件直接发送到指定文件夹中了。

有说明书了哇。

ctrl单机第一个文件用shift键拉到最后一个文件，复制，粘贴就好了

鼠标和键盘组合键

一般情况是没有完成会话就遇到错误造成的，你可以重新复制，粘贴到其他盘里，等移动文件的会话结束后再动U盘，应该就没问题了。