Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #3  
Old 10-26-2015, 11:37 AM
laterdater laterdater is offline "For Each" with arrays Windows 7 64bit "For Each" with arrays Office 2013
Novice
"For Each" with arrays
 
Join Date: Oct 2015
Posts: 2
laterdater is on a distinguished road
Default

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
Reply With Quote
 



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
"For Each" with arrays 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

Other Forums: Access Forums

All times are GMT -7. The time now is 11:59 AM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft