執行VBA後，右方捲軸為何變成可拉到65536?

winston219

執行巨集後，請問如何修改VBA，以避免捲軸不要變成可拉到65536? 如附檔，謝謝! Book33.rar (7.38 KB)

下載次數: 10

2010-12-9 22:01

Hsieh

回復 1# winston219
程式在給值時使用整欄導致你對END的錯覺

1. Sub yy()
   
2. [a:a].HorizontalAlignment = xlCenter
   
3. Range("a2:a" & [b65536].End(3).Row) = "=row()-1"
   
4. Range("a2:a" & [b65536].End(3).Row) = Range("a2:a" & [b65536].End(3).Row).Value
   
5. End Sub

複製代碼

winston219

哈，可行了，感謝Hsieh大大的說明~