![]() |
|
#3
|
|||
|
|||
|
I am still confused as to why my For Each didn't work, but I solved this by getting rid of my "For Each" and replacing it with the following:
Code:
Set rn = sh.UsedRange
k = rn.Rows.Count + rn.Row - 1
For y = 2 To k
If sh.Range("A" & y) Like "*2" Then
shdest.Range("D7") = sh.Range("A" & y)
Else: shdest.Range("D8") = sh.Range("A" & y)
End If
Next y
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Need help with conditional formatting & returning "Pass" / "Fail Results" in a Column N | mikey386 | Excel | 2 | 12-11-2014 01:14 PM |
| remove repeated words with " macro " or " wild cards " in texts with parentheses and commas | jocke321 | Word VBA | 2 | 12-10-2014 11:27 AM |
| How to edit the "Format" and the "show level" of an EXISTING table of content? | Jamal NUMAN | Word | 2 | 08-14-2011 10:46 AM |
How to choose a "List" for certain "Heading" from "Modify" tool?
|
Jamal NUMAN | Word | 2 | 07-03-2011 03:11 AM |
| "Microsoft Excel Application" missing in the "Component Services" on win08 | sword.fish | Excel | 0 | 02-26-2010 02:09 PM |