2012-04-25 50 views
0

簡単な問題があるようで私を助けてください。この質問は、私が答えを見つけるためにすべての通常のサイトを試してきたので、最後の手段に近いことに注意してください。Excel VBAを使用してチャートに値を読み取る

私はExcel vbaを使用しています。いくつかの値をワークシートから同じワークブックの別のワークシートにコピーしたい。

次のように私が作成したコードの行は次のとおりです。

Range(Cells(1, 4), Cells(1, 6)) = Worksheets("Summary Data").Range(Cells(1, 4), Cells(1, 6))

このコード行は、「ファイル名を指定して実行時エラー1004」を生成。

私はそれがうまく実行されるコードの次の行を実行する場合:

Range(Cells(1, 4), Cells(1, 6)) = Worksheets("Summary Data").Cells(1, 4)

をしかし、私は別のワークシートにワークシート「の概要データ」に範囲をコピーしたいです。

上記のエラーや解決方法を説明することで、誰かが私の血圧管理を助けてくれますか?

+0

を参照してください。 ://stackoverflow.com/questions/8047943/excel-vba-getting-range-from-an-inactive-sheet説明が必要な場合はお知らせください。 –

答えて

0

私は簡単な解決策を教えてくれるでしょう。マクロの記録を開始し、コピーするセルを別のシートにコピーしてそこに貼り付け、マクロの記録を停止します。その後、ビジュアル基本エディタに行き、マクロコードを参照してください。

0

古い質問が...

おそらく、あなたはあなたの文を修飾する必要があります。

Range(Cells(1, 4), Cells(1, 6)).Value = _ 
    Worksheets("Summary Data").Range(Cells(1, 4), Cells(1, 6)).value

以上完全にあなたの範囲を限定:この場合に役立ちます:) HTTPを

Dim ws1 As Worksheet, ws2 As Worksheet 
Set ws1 = ActiveSheet 
Set ws2 = Worksheets("Summary Data") 

ws1.Range(ws1.Cells(1,4), ws1.Cells(1,6)).Value = _ 
    ws2.Range(ws2.Cells(1,4), ws2.Cells(1,6)).Value 
関連する問題