●EXCEL・VBA質問スレ Part2●at TECH●EXCEL・VBA質問スレ Part2● - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト150:デフォルトの名無しさん 07/06/15 16:13:53 Rangeの最初の位置を（左上）得たいのですが、どうするのが簡単なんでしょ。 ActiveSheet.Range("テーブル[列]").Offset(0, 0) Offsetでよいのかな？うまくいっているみたいですけど 151:デフォルトの名無しさん 07/06/15 16:19:45 ActiveSheet.Range("テーブル[列]")(1) など 152:150 07/06/15 16:26:32 Excel2007です。 >>151 サンクスです。 でじつは、Rangeオブジェクトを for で回そうと、 Dim StartCell As Range, LastCell As Range Set StartCell = ActiveSheet.Range("テーブル[列]").Offset(0, 0) Set LastCell = ActiveSheet.Range("テーブル[列]").End(xlDown) ' 資産に関連するもの更新 For i = StartCell.Row To LastCell.Row CalculateTable (ActiveSheet.Cells(i, 4)) Next i としていたのですが、もっと簡単な書き方はないでしょうか？ Dim Cell As Range For Each Cell In ActiveSheet.Range("テーブル[列]") CalculateTable (Cell) Next とすると、 CalculateTable (Cell) で、オブジェクトが必要です、と怒られてしまいます。 orz 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch