標題: [發問] 兩列之值相同 [打印本頁]

---

作者: cw3076    時間: 2011-5-23 14:40     標題: 兩列之值相同

請教大大,
  我有二列的數值, 我想讓下列之值等於上一列,
   請問VBA程式如何寫?

---

作者: GBKEE    時間: 2011-5-23 14:46

回復 1# cw3076
B=A.Value

---

作者: mark15jill    時間: 2011-5-23 15:04

本帖最後由 mark15jill 於 2011-5-23 15:15 編輯

回復 1# cw3076


    Sub Macro1()
'
' Macro1 Macro
'
' GBKEE 大大提供的
'
   
    Rows("2:2").Value = Rows("1:1").Value  'rows("2:2") = 下一列  rows("1:1")=目前列
   
End Sub




or
sub xx
    Rows("2").Select
    Selection.FormulaR1C1 = "=R[-1]C"

    Rows("3").Select
    Selection.FormulaR1C1 = "=R[-1]C"

    Rows("4").Select
    Selection.FormulaR1C1 = "=R[-1]C"

    Rows("5").Select
    Selection.FormulaR1C1 = "=R[-1]C"
end sub

ps 很想直接用矩陣下去帶= = 但是 程度低 試驗失敗=ˇ=

---

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