タイトル : 編集のためロックについて 投稿日 : 2022/05/31(Tue) 09:05 投稿者 : しん
お世話になります。 Windows10 Excel2019 VB6でVBAを起動します。 VB6 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Dim Exap As Object Dim Wbook As Object Set Exap = CreateObject("Excel.application") Exap.Workbooks.Open "C:\Users\User\AppData\Roaming\Microsoft\Excel\XLSTART\PERSONAL.XLSB" Call Exap.Run("PERSONAL.XLSB!テスト") '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' VBA ''''''''''''''''' Sub テスト() MsgBox"テスト" End Sub ''''''''''''''''' MsgBox"テスト"の確認後、デスクトップ上の他のExcel ファイルを開くとPERSONAL.XLSBは編集のためロックされていますとなります。 パソコン起動後、MsgBox"テスト"を行いました。 Excelの「コマンドボタン」からでは編集のためロックは無く動作します。 Private Sub CommandButton1_Click() Application.Run "PERSONAL.XLSB!テスト" End Sub VB6では編集のためロックが発生し、Excelでは編集のためロックが発生しない違いが分かりません。 ご教示願えますと幸いであります。 |