Board logo

標題: [發問] 複製後, 如何貼上原始公式 [打印本頁]

作者: bobomi    時間: 2014-12-20 10:40     標題: 複製後, 如何貼上原始公式

A1 公式放入   "= B1"    ' 不能放 = $B$1

滑鼠選取 A1 -> 複製 -> 滑鼠移至 A2 -> 貼上

觀察A2 ,  A2 公式變成   "= B2"

但是我希望的是 A2 公式一樣   "= B1"

請問要如何做呢?

謝謝
作者: K_Wing    時間: 2014-12-20 11:43

回復 1# bobomi

那麼為何不在A2直接放入"=B1"
作者: bobomi    時間: 2014-12-20 11:52

回復  bobomi

那麼為何不在A2直接放入"=B1"
K_Wing 發表於 2014-12-20 11:43



因為其實要貼上的區域是 A2 到 A100

上面只是舉例而已
作者: hugh0620    時間: 2014-12-20 16:40

本帖最後由 hugh0620 於 2014-12-20 16:55 編輯

回復 3# bobomi

可以試試~ 不過我是用迴圈去跑~ 不知道你自己是不是你要的~
Sub TEST()
    For I = 2 To 100
          Range("A" & I).FormulaR1C1 = Range("B1").FormulaR1C1
    Next
End Sub
作者: ML089    時間: 2015-10-26 20:54

回復 1# bobomi


A1 公式放入  '= B1  當作文字

所以任意複製都不會改變

再用 資料剖析 - 分隔符號 - 輸入其他分隔符號  ',把文字變成公式
作者: bobomi    時間: 2015-11-2 21:03

回復 5# ML089


可以了, 謝謝
作者: p223941    時間: 2016-1-29 13:14

回復 5# ML089


    謝謝你~解決長久的困擾




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