可以将工作表中两个单元格之间的范围与另一工作表中两个单元格的地址进行分类

Question

I have two cells in sheet1 that contain address for two cells in sheet2. for example in sheet1, the cells(1,1).value has the address $A$6 and cells(1,2) has the address $A$100. These two addresses refers to two cells in sheet2. Now I want to concatenate the range between $A$6 to $A$100 from sheet2.
My code doesn't work:

Sub concatenate()

   Set wss = Sheets("sheet1").Range("sheet2.Cells(1, 1).Value : sheet2.Cells(1, 2).Value")
   For Each cel In wss 
   tval = tval & cel.Value
   Next
   Sheets("sheet2").Cells(1, 7).Value = tval

 End Sub

Answer 1

Your syntax is incorrect because you're passing the whole parameter as a string, while it should be variables and strings. This should work, say all the rest is good:

Set wss = Sheets("sheet1").Range(sheet2.Cells(1, 1).Value & ":" & sheet2.Cells(1, 2).Value)

Explanation

This: sheet2.Cells(1,1).Value returns "$A$6" if executed; but, if you write it into a string as you did above (ie "sheet2.Cells(1,1).Value" ), it means exactly "sheet2.Cells(1,1).Value" . And clearly, the Range("sheet2.Cells(1,1).Value") doesn't exist.