ロックを掛けようとすると下記エラーが発生するのですが、回避する方法は御座いますでしょうか。
実行時エラー '1004'
'Open'メソッドは失敗しました:'Workbooks'オブジェクト

バイナリの状態次第でエラーになることがあります。
もし、エラーが起きたのが、未コンパイルでサイズが小さい状態なら
コンパイルしてサイズが大きくなった状態にしてから
ロック実行するとうまくいくかもしれません。
逆にコンパイルでサイズが大きい状態でだめなら、
コンパイルなしの小さい状態で実行すると成功するかもしれません。