Closed fileloupe on accident update#
Closed fileloupe on accident code#

Set wb = Workbooks.Open(Filename:=vTmpPath)Īpplication.Run ''' & vFullPath & ''!' & pProcToRunOnWb Range(c).Offset(j, 0).Value = vFileList(i)Īpplication.DisplayAlerts = False ' set alerts off so that macro can run in other wb If pCheckCondition And InStr(1, vFileList(i), pFileNameContains, vbTextCompare) > 0 _ filename cotains text or condition is not required. VFullPath = įor i = LBound(vFileList) To UBound(vFileList) ' variables for optional param pProcToRunOnWb

Closed fileloupe on accident code#

if the chart macro is in your personal workbook then the code below should also be placed in your personal macro workbook): Option Explicitĭim vFileList() As String ' array for file namesĭim i As Integer ' iterator for file name array The macro that you use in the call must exist in the workbook that you are calling all of the other workbooks from (e.g. I have reviewed the code referred to above and made a few improvements including an additional parameter for you to specify the name of a macro that you want to run against each of the workbooks opened (that meet the condition specified). With some code to open that workbook and call your code to generate the chart. This is a good start to test the results, but once this is okay you would need to replace the line: Range(c).Offset(j, 0).Value = vFileList(i)

Closed fileloupe on accident update#

Update Here is a thread where I have provided some code to loop through all of the files containing some given text (in this example '.pdf' but could just as easily be '.xls' to cover xlsx, xlsm etc).Īlso this example prints out a list of the files it finds to a worksheet. I can dig out come code I wrote doing something similar if it will help.

You can then look at the code produced by Excel and you may find that you don't need to make too many changes for this to be useful as a generic procedure.Īfter testing, if you wanted to take the automation one step further you could write a little procedure to loop through all of the Excel files in a directory and call your chart procedure for each file when it is open. For this sort of problem I would start by recording a macro of the steps you take manually into a personal macro workbook.