07-12-22 11:28 AM
Answered! Go to Answer.
07-12-22 06:23 PM
07-12-22 01:13 PM
07-12-22 01:38 PM
07-12-22 03:09 PM
Hi Geoff / Eric
Thanks for the feedback.
The original file contains just over 54 000 lines of data.
We are using the Apply Filter Action, where we provide the filter column ID. Example column B and the ID used is 2
Then we are providing the string value we looking for. Example "Test", I have also tried "=Test" just in case. I left the bottom 3 inputs blank.
The stage before this I activate the worksheet and apply an AutoFit function just to validate visually that the VBO is working and that I am on the correct sheet.
I also tried a smaller file of just 110 lines and get the same error.
Using the code in the VBA module in the excel seems to work, but I cannot get it to work from the VBO for some reason. (Probably one of those "ID - 10 - T" type errors) 😊
Kind regards
Gavin
07-12-22 04:04 PM
07-12-22 05:41 PM
Hi Eric, Yes, man sorry I forgot to mention that it was the Custom VBO
The commented line of code (Line 7) was just some hard coding I put in myself to see if I got a different response.
The rest was already there. I am not sure where this Action came from originally.
Thanks a mill....
Dim ws as Object
Try
ws = GetWorkbook(Handle, Nothing).ActiveSheet
ws.UsedRange.AutoFilter (Field:= Filter_Column_Id, Criteria1 := First_Criteria, Operator:= Operator_Logic ,Critera2:= Second_Criteria, VisibleDropDown:= Show_DropDown)
'ws.UsedRange.AutoFilter (Field:=2, Criterial:="Test" )
Success = True
Catch e as Exception
Success = False
Message = e.Message
Finally
ws = Nothing
End Try
07-12-22 06:23 PM
08-12-22 07:50 AM
08-12-22 08:38 AM
Thanks Eric, I found the correct VBO and it is working fine. I must have found someone's Work In Progress VBO. Very different from this one.
Kind Regards
Gavin
08-12-22 08:53 AM
Hi Ritansh, Thanks for the information, Much appreciated.
Kind regards
Gavin