VBAのREPLACE関数について

Question

Range("A1")からRange("A2")の数値列を除外したデータを取得したいです。
VBAのREPLACE関数を使用して、数値データの一部を削除しようと考えました。

しかし
Range("A1")に30896684764
Range("A2")に4764
と入力されている状態でコードを実行すると出力結果が30896684764となってしまいます。
本当は30896684764から4764を削除した数値を取得したいのですが、なぜか上手くいきません、、、

buf2 = Replace(buf, "Range(A1)", "")のRange(A1)を直接4764に変更すると3089668と取得したいデータを得ることが出来るのですが、
マクロでRange("A1")、Range("A2")の数値が定期的に変わるようになっているので、上記の方法は現実的ではありません。
解決方法をご教授していただけると幸いです。お願いします。

<試したこと>
Range(A1)にint、strなどを付けたり、Range(A1)をCells(1,1)に変更したりしましたが出来ませんでした、、
エクセルのバージョンは2019 MSO 64bitです。

Dim buf As String
        buf = Range("A1")
        buf2 = Replace(buf, "Range(A2)", "")
        Range("A3") = buf2

'Range("A3")の出力結果
'30896684764’

Answer 1

ダブルクォーテーションの位置が違うと思います。

buf2 = Replace(buf, Range("A1"), "")

Comments

[tjagwmdj]

解決出来ました。ご回答ありがとうございました。

[DreamTheater]

ついでにbufとbuf2も不要です。
Range("A3").Value = Replace(Range("A1").Value, Range("A2").Value, "")