tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル 編集のためロックについて
投稿日: 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では編集のためロックが発生しない違いが分かりません。

ご教示願えますと幸いであります。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。