|
Command button copy array
I have a command button on sheet1 of a work sheet, part of what it does is copy a range of cells to sheet 2. The code I am using seems rather crude For j = 1 To 2 For k = 1 To 2 Sheets("Sheet2").Cells(j, k) = Sheets("Sheet1").Cells(j, k) Next k Next j Is there a smarter way of doing this by defing arrays in both sheets and making sheet 2 array = sheet 1 array? Grateful for your advices -- Noslien ------------------------------------------------------------------------ Noslien's Profile: http://www.excelforum.com/member.php...o&userid=31701 View this thread: http://www.excelforum.com/showthread...hreadid=514186 |
Command button copy array
Try something like
Worksheets("Sheet2").Range("A1:B2").Value = _ Worksheets("Sheet1").Range("A1:B2").Value -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Noslien" wrote in message ... I have a command button on sheet1 of a work sheet, part of what it does is copy a range of cells to sheet 2. The code I am using seems rather crude For j = 1 To 2 For k = 1 To 2 Sheets("Sheet2").Cells(j, k) = Sheets("Sheet1").Cells(j, k) Next k Next j Is there a smarter way of doing this by defing arrays in both sheets and making sheet 2 array = sheet 1 array? Grateful for your advices -- Noslien ------------------------------------------------------------------------ Noslien's Profile: http://www.excelforum.com/member.php...o&userid=31701 View this thread: http://www.excelforum.com/showthread...hreadid=514186 |
Command button copy array
Many thanks for your help -- Noslien ------------------------------------------------------------------------ Noslien's Profile: http://www.excelforum.com/member.php...o&userid=31701 View this thread: http://www.excelforum.com/showthread...hreadid=514186 |
| All times are GMT +1. The time now is 05:03 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com