excel.Workbooks(1).SaveAs(Excelname)
用上面的语句,运行时会跳出一个框问你是否替换已存在的文件 如果选NO 或CANCEL
会报错
怎么处理?
.net saveas
答案:2 悬赏:20 手机版
解决时间 2021-03-20 17:19
- 提问者网友:黑米和小志
- 2021-03-20 03:55
最佳答案
- 五星知识达人网友:醉吻情书
- 2021-03-20 05:20
可能是已经存在的文件属性为“只读”了。
If Not IO.File.Exists(Excelname) Then
'保存Excel文件
excel.Workbooks(1).SaveAs(Excelname)
Else
If 提示是否保存的Messagebox = DialogResult.Cancel Then
Return False
Else
'保存Excel文件
Try
If (IO.File.GetAttributes(objExcelFileName) And IO.FileAttributes.ReadOnly) = IO.FileAttributes.ReadOnly Then
Throw Exception
End If
objExcelBook.SaveAs(objExcelFileName)
Catch
Throw Exception
End Try
End If
If Not IO.File.Exists(Excelname) Then
'保存Excel文件
excel.Workbooks(1).SaveAs(Excelname)
Else
If 提示是否保存的Messagebox = DialogResult.Cancel Then
Return False
Else
'保存Excel文件
Try
If (IO.File.GetAttributes(objExcelFileName) And IO.FileAttributes.ReadOnly) = IO.FileAttributes.ReadOnly Then
Throw Exception
End If
objExcelBook.SaveAs(objExcelFileName)
Catch
Throw Exception
End Try
End If
全部回答
- 1楼网友:廢物販賣機
- 2021-03-20 05:39
是不是路径拼写的不对?你看它报错的时候的那个路径和你想要的是不是一样
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯