我也不能理解楼主的意思。
按道理,你可以判断当前行是否锁定,再决定是否执行相关代码就可以啊:
if Tables("xxx").Current.Locked = false then
‘代码
End if