Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


46156 / 76732 ←次へ | 前へ→

【35554】実行時エラー'1004': 'Range'メソッドは失敗しました
質問  K.K.  - 06/3/7(火) 16:51 -

引用なし
パスワード
   以下のところで「実行時エラー'1004': 'Range'メソッドは失敗しました」
と表示されますが、何が原因なのか分かりません。

Dim Ha2 As Integer
Ha2 = Application.Match("Oct 2005 HA", Range(Cells(2, 6), Cells(2, 6).End(xlToRight)), 0)
Workbooks("Nov 2005.xls").Sheets("input").Activate
Union(Range(Cells(5, Ha2 + 5 + i), Cells(10, Ha2 + 5 + i)), Range(Cells(14, Ha2 + 5 + i), Cells(22, Ha2 + 5 + i)), Range(Cells(26, Ha2 + 5 + i), Cells(37, Ha2 + 5 + i)), Range(Cells(41, Ha2 + 5 + i), Cells(65, Ha2 + 5 + i)), Range(Cells(70, Ha2 + 5 + i))).FormulaR1C1 = "=RC[-10]-RC[-1]"
4 hits

【35554】実行時エラー'1004': 'Range'メソッドは失敗しました K.K. 06/3/7(火) 16:51 質問
【35563】Re:実行時エラー'1004': 'Range'メソッドは... Ned 06/3/7(火) 20:21 発言
【35587】Re:実行時エラー'1004': 'Range'メソッドは... K.K. 06/3/8(水) 9:36 質問
【35630】Re:実行時エラー'1004': 'Range'メソッドは... Ned 06/3/8(水) 19:36 発言
【36342】Re:実行時エラー'1004': 'Range'メソッドは... K.K. 06/3/29(水) 12:23 お礼

46156 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free