Home/ Questions/Q 184575
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-11T15:18:59+00:00

The first part is now working [ I have the following which just seems

  • 0

The first part is now working [ I have the following which just seems to hang; the part that adds/deletes the module works when running in VBA I note that I’m prompted with a dialog saying ‘this workbook contains links to other data sources’ which I ok to, then it hangs So I tried setting the second argument to 0 and also tried 2 but still it hangs (2nd arg is UpdateLinks as can be found here ) ]

dim objExcel dim objWorkbook Set objExcel = CreateObject('Excel.Application') Set objWorkbook = objExcel.Workbooks.Open(  'H:\M\X\C.xls', 0 , , ,'PASSWORD!' )  Const modpath  = 'H:\M\V\' Const modtest  = 'TEST.cls' Const modname  = 'TEST'  On Error Resume Next  Dim vbcomp Set vbcomp = ActiveWorkbook.VBProject.VBComponents(modname) objWorkbook.VBProject.VBComponents.Remove vbcomp objWorkbook.VBProject.VBComponents.Import modpath & modtest  objWorkbook.Save objWorkbool.Close set vbcomp = nothing set objworkbook = nothing set objExcel = nothing

edited again 14/04/2009 I have now also allowed the ‘tools – macro – security – vbproject access’

The script now finishes, however, when trying to open the xls to see if the changes have been made, I get a message informing me that the sheet is locked by ‘account used to run script’; open ‘read only’/notify

Why isn’t it releasing control correctly**?**

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. The edited script works.

    The problem was caused by the fact that I was supplying the password at the workbook level and not at the VBA project level.

    A quick search on the web reveals that it is not possible to do this anyway (sendkeys etc) so after manually removing the password on the project, the problem is solved

    • 0