Sure, just change
Let WbA.Worksheets.Item(Cnt).Name = WsNme & "_2"
to
Let WbA.Worksheets.Item(Cnt).Name = arrBB(MtchedCel.Row, 1)
Alan
Sure, just change
Let WbA.Worksheets.Item(Cnt).Name = WsNme & "_2"
to
Let WbA.Worksheets.Item(Cnt).Name = arrBB(MtchedCel.Row, 1)
Alan
….If you are my competitor, I will try all I can to beat you. But if I do, I will not belittle you. I will Salute you, because without you, I am nothing.
If you are my enemy, we will try to kick the fucking shit out of you…..
Winston Churchill, 1939
Save your Forum..._
KILL A MODERATOR!!
Posting Permissions
Reply With Quote
Bookmarks