vba delete rows in another workbook

Attached 2 workbooks
I run controlbutton2 in workbook "sheetchange.xlsm with the intent
of deleting rows in workbook "sheetchangedata.xlsx that do not
contain zused or zconsignment in column A.

The coding does make "sheetchangedata.xlsx the active workbook
and "inventory report all stores" the active worksheet.
However, when I run commandbutton2 the correct rows are
deleted - but in sheetchange.xlsm not in "sheetchangedata.xlsx"
despite the fact that "sheetchangedata.xlsx" is active.
question - why aren't the rows deleted in the active workbook and active worksheet
question - can I change the line that deletes the entire row so that workbook and sheet
("sheetchangedata.xlsx " and "inventory report all stores" are specified in that line.

Thanks Carroll

As in a worksheet module any range without any sheet reference is relative to the worksheet of this module and not to the active sheet
so just add the workbook and sheet references for any range to be deleted …

This is the delete row line If Not (Range("A" & i).Value Like "*ZUSED*" Or Range("A" & i).Value Like "*ZCONSIGNMENT*") Then Rows(i).Delete

Ok, so the answer to my second question is yes.
I'm not sure how to change this line to specify the workbook/sheet.
Also, if I change this line to specify workbook/worksheet, then
I guess there is no reason to do all the coding to make "sheetchangedata.xlsx and sheet " inventory report all stores" active.

I guess I don't understand what "active" does.
Thanks for your help.
Carroll

Try change to

Please Login or Register  to view this content.

Jindon
Thanks for the code - works great
I have tried to add code to make the like operator case insensitive, but have been unsuccessful.
Have tried option compare and others but no luck
Appreciate any help
carroll

Jindon
I was successful with the option compare method - below
' Set the string comparison method to Text. Makes case insensitive
Option Compare Text ' That is, "AAA" is equal to "aaa".

OK, glad you found a way and thanks for the rep.

Just in case you want to compare case sensitive in other routine within the same module as I don't like Option statement.
1) Use UCase

Please Login or Register  to view this content.

2) Use InStr function

Please Login or Register  to view this content.

HTH


If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED.

Thanks for the other options
Carroll