irisqueiroz
Member
Hi,
I'd some help to write a code like this:
For i = 1 to LstRow
If cells(i,3) = any cell in a named range (ex: D1:D52 is a named range "ColumnD") then
'check if cell (i,3) have the same value as any cell in the range "ColumnD"
offset(0,1) "ColumnD" , and send the cell(i,3) to the sheet named the value of column E.
For example (on the file that I attached):
For i = 1 'cells(1,3) is "AUTO"
so I search on the named range "ColumnD" where's the word "AUTO". In this case, it's in the position 1 too. So I offset(0,1) and go to Column E. The value is "Oficina" in Column E, line 1. So i have to send the cell(1,3).value to the sheet named "oficina" (i'll create those sheets).
And so on...
https://www.dropbox.com/s/4uk9m9k6jcqdbqf/example.xlsx?m
I'd some help to write a code like this:
For i = 1 to LstRow
If cells(i,3) = any cell in a named range (ex: D1:D52 is a named range "ColumnD") then
'check if cell (i,3) have the same value as any cell in the range "ColumnD"
offset(0,1) "ColumnD" , and send the cell(i,3) to the sheet named the value of column E.
For example (on the file that I attached):
For i = 1 'cells(1,3) is "AUTO"
so I search on the named range "ColumnD" where's the word "AUTO". In this case, it's in the position 1 too. So I offset(0,1) and go to Column E. The value is "Oficina" in Column E, line 1. So i have to send the cell(1,3).value to the sheet named "oficina" (i'll create those sheets).
And so on...
https://www.dropbox.com/s/4uk9m9k6jcqdbqf/example.xlsx?m