excel vba - Copying value from 2nd worksheet into first based on matching 1st columns -
i have 2 worksheets 1 single column common in both 1st column of both worksheets. want match columns in both sheets , matching columns ( i.e. sheet1.ax = sheet2.ax) want rows in row sheet 2 last row column of sheet 1 . using below code –
dim lastcol long dim rng range dim rng2 range dim integer ‘ use cells on sheet set rng = sheets(“sheet1”).cells set rng2 = sheets(“sheet2”).cells ‘ find last column lastcol = last(2, rng) ‘ after last column data change value of cell in row 1 = 1 895 rng.parent.cells(i, lastcol + 1).value = rng2.parent.cells(i,1).value next
with above code able copy first column sheet2 need copy columns sheet2 1st column in sheet2 same 1st column in sheet1 can please
Comments
Post a Comment