- ベストアンサー
VBA 複数セルを選択する場合の記述について
マクロにて、離れた複数のセルを選択したいのですが どのように記述してもエラーになってしまいます 例:Range("A1:C2,E1:F2") ※ 選択する部分を可変にしたいので全て cells(a,b)の方法で記述したいです ※ グラフのデータ選択に用いたいので一行で書きたいです 【失敗した記述】 ・Range(Cells(1,1),Cells(2,3),Cells(1,5),Cells(2,6)) ・Range(Range(Cells(1,1),Cells(2,3)),Range(Cells(1,5),Cells(2,6))) お手数ですが、よろしくお願いします
- masaki1976
- お礼率50% (10/20)
- Visual Basic
- 回答数2
- ありがとう数3
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
ほかの回答にも出ていました。 Union(Range(Cells(1,1),Cells(2,3)),Range(Cells(1,5),Cells(2,6))).Select
その他の回答 (1)
- hana-hana3
- ベストアンサー率31% (4940/15541)
力業だとこんな感じかな? Range(Range(Cells(1, 1), Cells(2, 3)).Address & "," & Range(Cells(1, 5), Cells(2, 6)).Address).Select
関連するQ&A
- VBAで、複数の離れたセルを選択したい
複数の離れたセルを選択したいのですが、うまくいきません。 A1とA4を選択する場合、通常は、 Range("A1,A4").select なのでしょうが、変数Qを使いたいのです。 セルA1はCells(Q,1)、セルA4はCells(Q,4)となり、 Range(Cells(Q, 1), Cells(Q, 4)).select なのかと思ったのですが、これだと、 Range("A1,A2,A3,A4").select になってしまいます。 離れたセルを変数を使い選択するには、どうしたらよいでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセルのCELLS関数で複数セルを選択したい
こんにちは。EXCEL VBAのことで質問させていただきます。 複数セル(たとえばA1からC1)をまとめて選択する際、 Range("A1:C1").Select と記述すると思います。 これを「Range」ではなく「Cells」で記述できないでしょうか? 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロでのセル選択の記述
エクセルマクロで、2つ以上のセルを選択する場合、 ひとつに、(A1:A2)の形で選択する方法がありますが、 Cells(*,*)を用いて同様のことを指定する記述はありますか? Cells(1,1)とCells(1,2)をアクティブにしたい場合など・・。 教えてください。宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルVBA セルの値を使ってのセル選択
セルに入力した値でセル選択の範囲を指定したいです セルの値がxの時 セルB1~Cx と セルD100~Ex+100 を同時に選択したいのですが どうすれば良いのでしょう? セルA1に50と入力されているとします Range("B1:C50,D100:E150").Select となってほしい訳です Range や Cells とか調べたのですが分かりませんでした
- ベストアンサー
- Excel(エクセル)
- エクセルVBAでセル選択するコードが変
エクセルのワークシートでVBAでセル選択するコードで理解に苦しむことがあります。 通常、Cells(2, 1)はセル番地で言えばA2セル Cells(4, 1)はセル番地で言えばA4セルです。 しかし、 With .Range("B5:B15")でくくれば .Cells(2, 1)はセル番地で言えばB6セルだと思います。 .Cells(4, 1) はセル番地で言えばB8セルだと思います。 ところが下記のコードを動かすと、なぜかC10:C12が選択されてしまいます。 この理屈がわかりません。 Sub test02() With Sheets("Sheet1") With .Range("B5:B15") .Range(.Cells(2, 1), .Cells(4, 1)).Select End With End With End Sub なお、 .Range(.Cells(2, 1), .Cells(4, 1)).Selectを .Range(“A2:A4”).Selectに書きかえると、希望のB6:B8が選択されます。
- ベストアンサー
- Excel(エクセル)
- VBA 選択された離れたセルの値の取得について
EXCELのVBAでどうしても前に進めず困っております。 目的としているコードは、離れたセル(複数)をあらかじめCtrlキーで選択状態にしておき、選択されたセルの値のみをVBAが別のセルに並べていくというものです。 以下が私の作ったコードなのですが、思ったとおりの動作をしてくれません。 VBA初心者なもので、おかしな記述がたくさんあると思うのですが、どなたかアドバイスお願いします。 Public Sub xx() Dim SelectArea As String Dim TargetCell As Range Dim a As Integer Dim Row As Integer Dim Column As Integer Dim CNT1 As Integer a = 0 Row = 0 Column = 0 For CNT1 = 1 To 10 Row = Row + 1 SelectArea = Selection.Address Set TargetCell = Range("B3").Cells(Row - 1, Column) If Intersect(Range(SelectArea), TargetCell) Is Nothing Then Else Range("A30").Cells(a, 0) = Range("B3").Cells(Row - 1, Column).Value a = a + 1 End If Next End Sub
- ベストアンサー
- オフィス系ソフト
- VBA 簡単な疑問
Excel用に、VBAを書いています。初心者です。 素朴な疑問があります。 1.セルを指定する際に、Range()とCells()がありますが、 Range("D5") or Cells(5, 4) Rangeのカッコ内に指定する範囲(D5,A1など)に相当するCellsのカッコ内に指定する値(5,4 1,1など)を簡単に知る方法はないでしょうか? たとえば、Range("CT")をCellsで書く場合に、何行目(これは左の数値を見れば分かりますが)の何列目かを計算するのはできますが、ミスの原因になりそうです。 2. 単一セルについて、セルの選択とアクティブにするのは何か違いがあるのでしょうか? 複数のセルを選択であれば、その複数の中でどれをアクティブにするか意味がありそうですが、単一の場合は全く同じと考えて良いのでしょうか? お手数ですが、よろしくお願いします。
- 締切済み
- Excel(エクセル)
- ExcelVBAで「Cells」を使ってセルの選択範囲を指定する方法
例えば、セル「A1」から「C5」とセル「F1」から「I4」の範囲を選択する場合、 Range("A1:C5,F1:I4").Select としますがこれを「Cells(Row,Column)」を使うやり方はどのようにすればよいのでしょうか? Range(Cells(1, 1), Cells(5, 3)).Select Range(Cells(1, 6), Cells(4, 9)).Select 上記のような二つに分けてプログラムを動かすのではなく、あくまでセル「A1」から「C5」とセル「F1」から「I4」の範囲を同時に指定する方法です。 回答よろしくお願いします。
- ベストアンサー
- Visual Basic
- EXCEL VBA----離れたセル範囲の指定
こんにちは。初歩的なことで困っています。 Range("A3:A19,F3:F19").Select のように、離れたセル範囲を選択したいのですが 上の例の19行目が不定であるため、変数を使ったCellsプロパティを使用し i=Range("A3").End(xldown).Row Range("Cells(3, 1).Cells(i, 1), Cells(3, 6).Cells(i, 6)").Select と書いてみたのですが、エラーになってしまいました。 正しい指定の仕方を教えて下さい。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロでのセルの選択範囲について
マクロのセル範囲の指定でうまくできなくて困っています。 マクロでB3:B5を選択するように、コードを次のように Range(Cells(3.2), Cells(5, 2)).Select 書くと、B1:C5を選択します。 試しに、 Cells(3, 2).Select と書くと、B3を選択します。 次に、マクロを Cells(5, 2).Select と書くと、B5を選択します。 どうしてでしょうか。 宜しくお願い致します。
- ベストアンサー
- Excel(エクセル)