我用if then判斷式後,若sheet1符合的資料,指定欄特定列回寫到sheet2, 如下,但這樣看來好不專業,有簡化的方式嗎
if then
sheets(2).Cells(K, 1) = sheets(1).Cells(i, 1).Value
sheets(2).Cells(K, 2) = sheets(1).Cells(i, 2).Value
sheets(2).Cells(K, 3) = sheets(1).Cells(i, 7).Value
sheets(2).Cells(K, 4) = sheets(1).Cells(i, j).Value
.............................
. |