Excel宏（保存到Sharepoint库）不再接受句号？_Sharepoint_Excel_Vba

Excel宏（保存到Sharepoint库）不再接受句号？

sharepoint excel vba

Excel宏（保存到Sharepoint库）不再接受句号？,sharepoint,excel,vba,Sharepoint,Excel,Vba,下面的代码工作正常，现在似乎不喜欢“.xlsm”部分。问题出现在所有电脑上。我尝试使用文件名=和一些变体，并将其锁定为“（句点），它在”.xlsm“中不接受，删除句点即可，但随后作为未知文件（没有文件扩展名）登录SharePoint。任何建议，谢谢子提交（）作为字符串的Dim FName FName=范围（“E3”）。文本 FDate=范围（“I3”）。文本如果范围（“E3”）=“那么 MsgBox“请输入您的姓名” 范围（“E3”）。选择 ElseIf范围（“I3”）=”然后 MsgBo

下面的代码工作正常，现在似乎不喜欢“.xlsm”部分。问题出现在所有电脑上。我尝试使用

文件名=

和一些变体，并将其锁定为

“

（句点），它在

”.xlsm“

中不接受，删除句点即可，但随后作为未知文件（没有文件扩展名）登录SharePoint。任何建议，谢谢

子提交（）
作为字符串的Dim FName
FName=范围（“E3”）。文本
FDate=范围（“I3”）。文本
如果范围（“E3”）=“那么
MsgBox“请输入您的姓名”
范围（“E3”）。选择
ElseIf范围（“I3”）=”然后
MsgBox“请输入两周结束日期”
范围（“I3”）。选择
ElseIf范围（“I3”）“那么
如果MsgBox（“您确定吗？（您是否在顶部面板中输入了您的主管和两周结束日期？”，vbYesNo）=vbNo，则退出Sub
ActiveWorkbook.SaveAs（“https://*****.sharepoint.com/corp/payroll/Timesheets”&FName&&FDate&&Timesheet&xls”）
MsgBox“已提交时间表”
如果结束
端接头

您应该提供不带扩展名的文件路径，并使用
ActiveWorkbook.SaveAs（）函数的FileFormat 参数在您的情况下，应该将行更改为 ActiveWorkbook.SaveAs（“https://******.sharepoint.com/corp/payroll/Timesheets”&FName&&FDate&&Timesheet”），52 最后添加的52 I是所述的xlOpenXMLWorkbookMacroEnabled 的值下面的代码在Win7 Excel2013上运行良好子堆栈溢出（） ActiveWorkbook.SaveAs“C:\Temp\myfile”，52 端接头您是否尝试过使用活动工作簿的.SaveAs（）函数的文件格式属性？