请解析一下,excel
SubClearUnprotect()DimshtAsWorksheetApplication.ScreenUpdating=FalseApplication.Enabl...
Sub ClearUnprotect()
Dim sht As Worksheet
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual
With Application.FindFormat
.Clear
.Locked = False
End With
For Each sht In ThisWorkbook.Worksheets
sht.Cells.Replace "", "", SearchFormat:=True, ReplaceFormat:=False
Next
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub 展开
Dim sht As Worksheet
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual
With Application.FindFormat
.Clear
.Locked = False
End With
For Each sht In ThisWorkbook.Worksheets
sht.Cells.Replace "", "", SearchFormat:=True, ReplaceFormat:=False
Next
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub 展开
1个回答
2015-12-08
展开全部
因为一些自动工具会自动的将open_basedir设置到域名所在的跟目录,也就是public目录,但其实open_basedir应该在public上一级目录在站点配置或者php.ini 或者 httpd.conf中改过来重启下对应的服务即可最后还可以在根目录使用php artisan env来查找错误。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询