|Hi helpful gurus!|
New to VB and have question.
I have spreadsheet with text values in Col A (Laptop, Desktop..etc) mixed in with other text
(Ex: Column A could say Laptop, it could also say "Brand New Laptop"...etc)
Based on finding the text value "laptop" regardless of case anywhere in Col A, I want VB to copy/paste that row into a secondary spreadsheet called Laptop.
I have a VB that does this if EXACT match for "Laptop" in Col A. How do I tell it to look in Col A for "laptop" wherever the word comes inside the cell in Col A?
Thanks so much!
' JimMacro Macro
Set a = Sheets("SOURCE081711")
Set b = Sheets("LAPTOPS")
x = 1
z = 2
Do Until IsEmpty(a.Range("A" & z))
If a.Range("A" & z) = "Laptop" Then
x = x + 1
b.Rows(x).Value = a.Rows(z).Value
z = z + 1