嘿，我完全懂你这个困扰——给仓库司机做的进出日志表，想把自动填充日期时间的单元格锁起来不让人改，但一锁宏就没法往里面写内容了对吧？这是因为默认的工作表保护会阻止所有编辑操作，不管是手动还是宏驱动的。下面两个方法都能解决这个问题，你可以按需选择：

方法一：用VBA设置「仅保护用户界面」 #

这个方法最省心，设置一次后宏就能自由编辑锁定单元格，用户还是改不了：

• 按下 Alt + F11 打开VBA编辑器
• 在左侧的「项目资源管理器」里找到你的工作表（比如Sheet1），双击打开它的代码窗口
• 粘贴下面的代码：

Private Sub Workbook_Open()
    ' 替换Sheet1为你的工作表名称，密码可选，不需要就去掉Password:="你的密码"
    ThisWorkbook.Worksheets("Sheet1").Protect Password:="123456", UserInterfaceOnly:=True
End Sub

• 保存文件为「启用宏的工作簿」格式（.xlsm）

原理：UserInterfaceOnly:=True 这个参数会让工作表只阻止用户手动编辑锁定单元格，但允许宏对锁定单元格进行任何操作，完美匹配你的需求！

方法二：宏执行时临时解锁工作表，完成后重新保护 #

如果不想用自动保护的代码，也可以在宏里加一段临时解锁的逻辑：
比如你的宏是用来填充日期时间的，修改成这样：

Sub FillDateTime()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    
    ' 临时解锁工作表，密码和保护时一致
    ws.Unprotect Password:="123456"
    
    ' 这里是你原来的填充日期时间的代码，比如：
    ws.Range("A1").Value = Now() ' 替换成你的目标单元格
    
    ' 重新保护工作表，如果有额外权限（比如允许筛选）可以加上对应参数
    ws.Protect Password:="123456"
End Sub

最后别忘了确认：那个日期时间单元格的「锁定」属性是勾选状态（右键→设置单元格格式→保护→锁定），这样用户手动才改不了，宏通过上面的方法就能正常写入啦。

内容的提问来源于stack exchange，提问作者Alonzo Preciado