Dim c As Range, d As Range
Dim Rstring As String
With Worksheets("Sheet1")
Set c = Range("aaa")
End With
a = c.Range("a1:a2").Value
Rstring = Join(WorksheetFunction.Transpose(a))
Это отлично работает, но не один удар
a=c.Range(c.Cells(0, 0), c.Cells(0, 1)).Value
Rstring = Join(WorksheetFunction.Transpose(a))
Я не могу понять это.
Есть ли способ, которым я могу использовать какое-то гибкое значение диапазона для транспонирования, чтобы я мог использовать их для цикла?
Моя цель - сравнить стоимость двух листов по 6 ячеек за раз.
Пожалуйста, помогите мне спасибо.