如何將比對的資料貼到儲存格中 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 如何將比對的資料貼到儲存格中

返回列表下一主題上一主題發帖

[發問] 如何將比對的資料貼到儲存格中

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

2^# 跳轉到 »

發表於 2011-8-16 13:13 | 只看該作者

回復 1# gctsai

Sub tt()
A = Range("C65536").End(xlUp).Row
For i = 2 To A
If IsError(Range("F" & i)) Then
Else
Range("C" & i) = Range("F" & i)
End If
Next
End Sub

複製代碼

學習才能提升自己

靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。

返回列表下一主題上一主題