I have copied data to a column range on worksheet 'A' and then created a target row range on worksheet 'B'. But I can't seem to get it to transpose the data properly so it displays properly on worksheet 'B'. Instead of getting the data in the row cells, I'm only getting the first value from the column range in all the target cells because it's not transposed properly.
The following range is Worksheet 'A' (C11:C16)
The following rnage is Worksheet 'B' (A1:A4)
Finally, I save the data to the target range:
What should I do to make this work?
Thanks for all responses!
The following range is Worksheet 'A' (C11:C16)
Code:
sRange = sCol & sRowStart & ":" & sCol & sRowEnd
Set rRange = ActiveWorkbook.Worksheets(MODEL_TAB).Range(sRange)
rRange = WorksheetFunction.Transpose(rRange)
The following rnage is Worksheet 'B' (A1:A4)
Code:
sRange = "A" & nWLRow & ":" & sWL_LastCol & nWLRow
Set rCustom = ActiveWorkbook.Worksheets(INPUT_TAB).Range(sRange)
Finally, I save the data to the target range:
Code:
rCustom.Value = rRange.Value
What should I do to make this work?
Thanks for all responses!