Board logo

標題: [發問] 請教此巨集如何寫?? [打印本頁]

作者: t8899    時間: 2013-8-1 10:03     標題: 請教此巨集如何寫??

1. F1:F100 有任一個儲存格大於2000則提示此儲存格對應A欄的值
2. K欄為公式 =IF(K21="","",L21-K21)
假如 k21:K350 的倒數第一格是錯誤 (#n/a #div/o...)
則執行abc 巨集
作者: t8899    時間: 2013-8-1 12:49

抱歉
是 k21:K350 的倒數第一格起算
K350 沒錯 依序檢查K349 K348 ........................有錯誤則 RUN ABC
作者: t8899    時間: 2013-8-2 05:19

抱歉
第二個問題已解決
第一個問題想改為
假如F1>E1,F2>E2,F3>E3,F4>E4.....F100>E100
則提示達到條件的儲存格所對應B欄的值
作者: owen06    時間: 2013-8-2 07:57

本帖最後由 owen06 於 2013-8-2 07:59 編輯

回復 3# t8899

這樣子呢?
For Each f In [f1:f100]
If f > f.Offset(0, -1) Then
MsgBox f.Offset(0, -4).Address & "值:" & f.Offset(0, -4)
End If
Next

可是我不知道怎麼讓.address顯示出來的樣式變成b1,而不是$b$1,
有人可以教導一下嗎?謝謝~




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)