Sub?cz()
暗淡?f?作為?範圍:?暗淡?我,?n?作為?整數
n?=?3357:?列(“D”)。數字格式?=?"@"
為了什麽?我?=?3357?去哪?3343?壹步?-1
設置?f?=?範圍(" B3343:B3357 ")。Find(Range("A "?& amp?我)。值)
如果?不是嗎?f?是嗎?什麽都沒有?然後呢?範圍(" C "?& amp?n)。價值?=?我:?範圍(" D "?& amp?n)。價值?=?範圍(" A "?& amp?我)。值:?n?=?n?-?1
然後
結束?潛水艇