1

同じブック内のあるシートから別のシートにデータをコピーするために、Excelでマクロを作成しています。現在、コードは次のように動作します。

Dim sourceSheet As Worksheet
Dim destSheet As Worksheet
Dim numCases As Integer
Dim i As Integer

numCases = 10
Set destSheet = ThisWorkbook.Sheets("Raw_Data")
Set sourceSheet = ThisWorkbook.Sheets("Formatted_Data")

For i = 1 To numCases
    destSheet.Cells(i,1).Value = sourceSheet.Cells(1,i).Value
Next

このコードは、あるシートから別のシートに値をコピーして正しいセルに配置するという点で適切に機能します。問題は、シート「Raw_Data」に戻る参照値としてセルにデータを入力する必要があることです。つまり、「Formatted_Data」でセルを選択すると、数式バーに「Raw_Data」！C1のようなものが表示される必要がありますが、代わりに数値だけが表示されます。コピーを実行したり、値を設定して参照を維持したりする方法はありますか？

ありがとう、

バレット

4

1 に答える 1

3

交換

destSheet.Cells(i,1).Value = sourceSheet.Cells(1,i).Value

と

sourceSheet.Cells(1,i).Formula = "=" & destSheet.Name & "!" & destSheet.Cells(i,1).Address(False,False)

于 2013-02-14T21:32:37.487 に答える