作者:乔山办公网日期:
返回目录:excel表格制作
给你个操作建议:
1、先百重装软件,如果再次运行还度提示错误53,那就是系统环境问题了知。
2、在别的电脑上装这道个软件,如果正常打开的话,将回 c:\windows\system32\client.dll 复制到有问题的机器的c:\windows\system32 下,完全覆盖即可。答
在加载项中删除这个未找到的文件就行。 或者:点开始然后运行“msconfig”命令选择BOOT.INI标签百点击“检查所有启动路径”按他提示重启就可度以了。 上面方法不行的话建议用360安全卫士修改一下启动项 这里有 http://www.newhua.com/soft/50671.htm 最好先用他的查杀恶意软回件功能查下有没恶意软件,然后在 状态-启动项状态中禁用内个没找到答的文件。还不行的话最好查一下毒 再做上面的操作。
没有回in.txt,可以再Open "F:\vb\in.txt" For Input As #1前加个答判断
Private Sub C1_Click()
Dim number(1 To 10) As Integer
Dim i As Integer
If Dir("F:\vb\in.txt", 7) <> "" Then
Open "F:\vb\in.txt" For Input As #1
For i = 1 To 10
Input #1, number(i)
Next
Close #1
For i = 1 To 10
a$ = a$ + Str(number(i)) + " "
Next
Text1.Text = a$
Else
Open "F:\vb\in.txt" For Output As #1 '没有的话,创建一个
Print #1, "aaa"
Close #1
End If
End Sub
录制一个宏,在录制过程中找到抄你要的文件,然后百打开它,然后回到EXCEL文件中终止录制,打开你刚才录制的宏,看看里面你要度找的文件的宏语言,复制它,到你要求运行知的宏里面粘贴覆盖原宏道中文件路径错误的语言描述。