複製一個變種的完整的一行到其他變種

Question

我有這樣的

ranging from var(1,42) to var(4000,42) 

一個變種我已經做基礎上，要求某些操作，並與0和1的填充VAR的第42列。現在，我只需將那些var的行導入到第42列中有1的表單中。這是我應得的進出口使用循環像這些

for k = 1 to 41 ' the inner loop 

編碼

t=1 
For i = 1 to 4000 
     If var(i,42) = 1 Then 
     For k = 1 to 41 
      var2(t,k) = var(i,k) 
     Next k 
     t = t + 1 
     End If 
Next i 

我覺得是需要的行從一個變種到其他new_var副本，但這裏的人說，循環費時。他們甚至說它是一種糟糕的編寫代碼風格，但我沒有找到更好的方法來將一個var複製到其他var，我的意思是隻有需要的行。假設我必須將一個var的第30行內容複製到其他var，然後林使用循環複製從1到41的列內容，但有沒有像複製var的整個行到另一個var？

Answer 1

尼科，

它是慢循環範圍 - 循環變體陣列是exteremely快。這當然不是錯誤的代碼！

你的方法很好。

因此，與我在Is it possible to dump a certain range of variant into the sheet?中的解決方案相同的方法適合您使用。它寫道：50,000個細胞左右，第二陣列，然後將其轉儲到片在不到一秒鐘的

Answer 2

你問：

是有什麼樣的VAR的整行復制到其他VAR ？ [大概是在一個單一的命令]

答案是：不，沒有。你的方法是我所知道的唯一方法。