Ｐａｇｅ 518 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼選択セル danceman 03/1/9(木) 11:34 ┣Re:選択セル つん 03/1/9(木) 11:51 ┃ ┗かぶちゃった JuJu 03/1/9(木) 12:16 ┗Re:選択セル JuJu 03/1/9(木) 12:01 ┗Re:選択セル danceman 03/1/9(木) 13:35 ─────────────────────────────────────── ■題名 ： 選択セル ■名前 ： danceman ■日付 ： 03/1/9(木) 11:34 -------------------------------------------------------------------------
| Do Ecells = 5 Cells(Ecells, 5).End(xlDown).Offset(1, 0).Activate . . . このようにある行をずっとみて空欄になっているところに動作をさせる ことを行っているのですが、今のままだと動作するときに一つのセルだけ しか選ばれていないのでこれをCells(Ecells, 5)の5のところを5〜8と 一気に選択したいのですがどのようにマクロを書いたらよいでしょう？ 誰か教えてください。 |
| danceman さん、こんにちは >Do > Ecells = 5 > Cells(Ecells, 5).End(xlDown).Offset(1, 0).Activate > . > . > . >このようにある行をずっとみて空欄になっているところに動作をさせる >ことを行っているのですが、今のままだと動作するときに一つのセルだけ >しか選ばれていないのでこれをCells(Ecells, 5)の5のところを5〜8と >一気に選択したいのですがどのようにマクロを書いたらよいでしょう？ えっと、ご質問されていることを、単純にお答えすると、 Dim Ecells As Long Dim i As Long For i = 5 To 8 Ecells = 5 Cells(Ecells, i).End(xlDown).Offset(1, 0).Activate Next i になるでしょうか？ Cells(Ecells, 5)の5のところを5〜8・・・というのは、５列目から８列目に処理させる、ということですよね？ |
| つんさん。ごめんなさい^^; |
| dancemanさん、こんにちはぁ >Cells(Ecells, 5).End(xlDown).Offset(1, 0).Activate >一気に選択したいのですがどのようにマクロを書いたらよいでしょう？ 一気に？ こういうことですか？ Cells(Ecells, 5).End(xlDown).Range("A2:D2").Select ではではぁ |
| ありがとうございました。 見事にできました。 |