過去ログ

                                Page     170
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼行指定について  幸トラ 02/10/7(月) 15:40
   ┗Re:行指定について  こうちゃん 02/10/7(月) 15:55
      ┗Re:行指定について  幸トラ 02/10/7(月) 16:13

 ───────────────────────────────────────
 ■題名 : 行指定について
 ■名前 : 幸トラ
 ■日付 : 02/10/7(月) 15:40
 -------------------------------------------------------------------------
   はじめまして、幸トラといいます。

現在、ある行以降の行削除を行おうとしています。
3行目ならRows(3)となりますが、
「3行目以降」という範囲は、どのように表現すればよいのでしょうか?
どなたかご教授をよろしくお願いします。
 ───────────────────────────────────────  ■題名 : Re:行指定について  ■名前 : こうちゃん <nakajima19@hotmail.com>  ■日付 : 02/10/7(月) 15:55  -------------------------------------------------------------------------
   幸トラ さん、こんにちは

>現在、ある行以降の行削除を行おうとしています。
>3行目ならRows(3)となりますが、
>「3行目以降」という範囲は、どのように表現すればよいのでしょうか?
>どなたかご教授をよろしくお願いします。

「3行目以降すべて」ならこんな感じです・・
Range(Cells(3, 1), Cells(Rows.Count, 1)).EntireRow
 ───────────────────────────────────────  ■題名 : Re:行指定について  ■名前 : 幸トラ  ■日付 : 02/10/7(月) 16:13  -------------------------------------------------------------------------
   こうちゃんさん、ありがとうございました!

>「3行目以降すべて」ならこんな感じです・・
>Range(Cells(3, 1), Cells(Rows.Count, 1)).EntireRow

早速実行したところ、うまくいきました。
あとは微調整するだけです。
本当にありがとうございました。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 170