Forum Discussion
Solved
VBA code to get column data from another worksheet.
Hi All, I am using below code to get column data from another worksheet, but the below code is working for full column, and I don't want to replace my Heder data of another sheet. can someone...
- That's because they don't have the same range. You have to adjust your range in Sheet2.
ie Sheet2.range("b8:b" & lr +7)
Tried this one also but code is transferring data to same range only.
Means suppose I have update Sheet1.Range("B2:B") & Sheet2.Range("B2:B") then code works fine, but If I Update Sheet1.Range("B2:B") & Sheet2.Range("B8:B") then code is not transferring data to same range.
Means suppose I have update Sheet1.Range("B2:B") & Sheet2.Range("B2:B") then code works fine, but If I Update Sheet1.Range("B2:B") & Sheet2.Range("B8:B") then code is not transferring data to same range.
That's because they don't have the same range. You have to adjust your range in Sheet2.
ie Sheet2.range("b8:b" & lr +7)
ie Sheet2.range("b8:b" & lr +7)
Hi FikturFox
It is working fine, I have done small change insted of +7 it is woking with +6.
Sub Select_Data()
Dim lr As Long
lr = Sheet1.Range("B" & Rows.Count).End(xlUp).Row
If Not IsEmpty(Sheet1.Range("B2:B" & lr).Value) Then Sheet2.Range("B8:B" & lr+6).Value = Sheet1.Range("B2:B" & lr).Value
End Sub