vbaマクロでセルの値をコピーした後に値をカスタマイズする

Question

複数のセルを1つの行にコピーしてカスタマイズした形式で貼りたいとします。 >セルの値（A1）がセル（B1）中の10 値=セル（C1）で20 値= NOW 30

を= -

シート1：たとえば

細胞（D1）の値は次のようでなければならない、などの所望の形式でこれらのセルの値をコピーして貼り付ける - >

F（10）、B（20）、X（30）、合計= 60

コピー/ペースト方法では不可能な場合は他の方法がありますか？

ありがとうございました。

Answer 1

ここでは、この

With Worksheets("Sheet1") 
    .Range("D1") = "f(" & .Range("A1") & "),b(" & .Range("B1") & "),x(" & .Range("C1") & "),total = " & WorksheetFunction.Sum(.Range("A1:C1")) 
End With 

Answer 2

を試すには、値と出力のための目標範囲の範囲内で渡す方法です。

Sub CreateSummary() 

Dim x() As Variant 
Dim y As Range 

    x = Range("A1:C1") 
    Set y = Range("D1") 

    y = "f(" & x(1, 1) & "),b(" & x(1, 2) & "),x(" & _ 
    x(1, 3) & "),total = " & WorksheetFunction.Sum(x) 

End Sub 

結果はあなたの例に基づいて：あなたは、これまで持っていますどのようなコード