ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Using wildcards in workbook calls (https://www.excelbanter.com/excel-programming/427661-using-wildcards-workbook-calls.html)

Bishop

Using wildcards in workbook calls
 
Why can't I get the following code to work? I want this macro to find an
open workbook called "ExportedData---" (where the dashes could be be
anything) and perform the following actions. That's why I'm using the *
wildcard. For example, one instance of the workbook might be named
"ExportedData[2]" the next instance might be called "ExportedData[1]". As
you can see from my comments I've tried messing around with a few different
methods but just can't make it work. In this current setup I'm getting a
"Compile Error: Argument not Optional" and it highlights the word Workbooks
in the With statement.

Sub CatalystToTally()

'Dim wb As Range
'Dim ws As Range
'Set wb = Workbooks
'Set ws = Worksheets

With Workbooks Like "ExportedData*"
'.Rows(1).Delete Shift:=xlUp
.Rows("1:1").Delete Shift:=xlUp
.Columns(D).ColumnWidth = 13
.Columns(D).NumberFormat = "0"
.Cells.Select
.Selection.Copy
.ThisWorkbook.Worksheets("Catalyst Dump").Paste
End With
End Sub


All times are GMT +1. The time now is 03:51 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com