about data copting
hello
i have a lot of data series in one column A1, A2.......An. i wanted to copy these data and paste in another sheet with first 10 number of data in first row and from 11 in second row ... I have used following macrows code: Dim lastrow As long, lastCol As Long Dim rng As range, i As long With Worksheets("sheet1") lastrow = .Cells(Rows.Count,1). End(X1Up).Row For i = 1 To lastrow Step 11 Set rng = worksheets("sheet2")_ ..Cells(rows.count,1).End(X1Up)(2) lastcol = .Cells(i, 256).End(X1Toleft).Column ..Cells(i,1).Resize(11,lastcol).copy rng.PasteSpecial x1value, Transpose:= True Next End with It works properly but i need that after every 365 data it will start from new row. One more thing is it possible to link some data from another cell sothat it repeats every time after 365 data. Thanks |
All times are GMT +1. The time now is 04:35 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com