Thread: Find a value in a sheet and replace it with another value if it matches
View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.programming
Claus Busch Claus Busch is offline
external usenet poster
  
Posts: 3,872
Default Find a value in a sheet and replace it with another value if it matches
Hi Garry,

Am Wed, 03 Sep 2014 09:39:45 -0400 schrieb GS:

vDataSource = Sheets("Errata").Range("A2:C1711")
vDataTarget = Sheets("Data").Range("D2:D1711")

the lines above fill perfectly your arrays

vDataSource = rngSource: vDataTarget = rngTarget

This line is not needed and erase the arrays


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional
Reply With QuoteReply With Quote