Array list writing to an Array of 'scattered cells' ?
Hi Howard,
Am Fri, 24 Mar 2017 01:56:27 -0700 (PDT) schrieb L. Howard:
For n = LBound(vaSrc) To UBound(vaSrc)
Range(vaTgt(n)) = Range(vaSrc(n))
Next 'n
try:
For n = LBound(vaSrc) To UBound(vaSrc)
Sheets("Sheet4") .Range(vaTgt(n)) =Sheets("Sheet3"). Range(vaSrc(n))
Next 'n
Regards
Claus B.
--
Windows10
Office 2016
|