無法執行vba - Excel程式區 - 麻辣家族討論版版

[發問] 無法執行vba

1^# 跳轉到 »

發表於 2011-4-18 16:40 | 顯示全部帖子

Sub kkk()
Set a = Sheet1.UsedRange
With Sheet2
.[a1] = "Dve"
.UsedRange.Offset(2, 0) = ""
a.AdvancedFilter 2, .[a1:a2], .[A4]
End With
End Sub

靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。