应用程序定义或格式化函数对象定义的错误

问题描述：

我的手机被锁定，我灌上下拉的Worksheet_Change事件与数据的单元格：Format(Date, "mm-dd-yyyy").应用程序定义或格式化函数对象定义的错误

我收到以下错误:: 运行时间错误'1004'：应用程序定义或对象定义的错误

我不想解锁该字段，因为它是不可编辑的。

我也明白，它只是因为单元格被锁定并需要执行操作而给出错误：Format(Date, "mm-dd-yyyy").。

我有什么选择使它在没有解锁单元的情况下工作？

答

解锁表单，然后根据需要进行更改，然后再次锁定。

Me.Unprotect "pwd" 
Me.Range("A1").Value = Format(Date,"mm-dd-yyyy") 
Me.Protect "pwd"

我不使用密码来保护....我只是用了以下内容：ActiveSheet.Unprotect ActiveSheet.Range（ActiveSheet.Cells（S，1），ActiveSheet.Cells（S + 9， lColumn））。Locked = True ActiveSheet.Protect ..请让我知道如何使用这种方法.. – sid

@sid - 只需取出密码并通过'“”''。否则，我很困惑。您可以在保护和取消保护之间设置格式（或单元格值）。因为在工作表处于不受保护状态时锁定单元格毫无意义。 –

这不工作...我设置ActiveSheet.Range（）。locked = False，然后设置值，然后设置ActiveSheet.Range（）。Locked = True ...这是代码看起来像ActiveSheet的方式。（ActiveSheet.Cells（rps + 3，cps））。Locked = False rps + 3，cps））。Locked = True – sid

应用程序定义或格式化函数对象定义的错误

相关推荐