Cavaliere
03-24-2010, 06:04 AM
Hi everyone,
Could you please tell me what's wrong with the following script or suggest alternative and more clear variant:)
Worksheets("DataBases").Activate
l = WorksheetFunction.Match("Test", Range("C2:F2"), 0)
Range("B1:B9").Value = Range(Range(Cells(2, l + 2)).End(xlUp), Range(Cells(2, l + 2)).End(xlDown)).Value
VB gives "Method 'Range' of object '_Global' failed"
Thanks is advance
Could you please tell me what's wrong with the following script or suggest alternative and more clear variant:)
Worksheets("DataBases").Activate
l = WorksheetFunction.Match("Test", Range("C2:F2"), 0)
Range("B1:B9").Value = Range(Range(Cells(2, l + 2)).End(xlUp), Range(Cells(2, l + 2)).End(xlDown)).Value
VB gives "Method 'Range' of object '_Global' failed"
Thanks is advance