No.2
- 回答日時:
No1です。
>実際はA2は変数にして、状況に応じて可変できるようにしています。
>Range(Range(開始セル), Range(開始セル).End(xlToRight)).Select
ご提示の記述だとRange(開始セル)がA列を示しているという保証がなければ、ご質問とは異なる結果になると思いますけれど?
通常Rangeオブジェクトはセル範囲を表しますので、その最初の行の1列目(=A列)から値のある最終列までを選択するという意味でよければ
rw = Range(開始セル).Row
Range(Cells(rw, 1), Cells(rw, Columns.Count).End(xlToLeft)).Select
1行にまとめてしまうなら
Range(Cells(Range(開始セル).Row, 1), Cells(Range(開始セル).Row, Columns.Count).End(xlToLeft)).Select
となりますけれど、「開始セル」をどのように指定しているのか不明ですが、この記述法は(多分)まわりくどく要領が悪すぎる記述になっていると思います。
(ここでは「開始セル」としか書きようがないので、上記の様になります。
行がすえにわかっているのなら、上段の例の2行目だけを直接用いれば良いです。)
ありがとうございます。
「開始セル」という変数は、A2だったりF4に変わったりします。
それに応じて、
A2:ZA2 や F4:X4 のように開始セルからその行の一番右端セルの範囲をコピーできるようにしたいです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Excel(エクセル) Excel VBA 空白行があるセル範囲に色を付ける 3 2022/06/13 15:58
- Excel(エクセル) VBA 特定の列に入っているテキストをコピペ 2 2023/06/14 11:24
- Excel(エクセル) 日付で矢印マクロ 4 2023/07/25 16:47
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Visual Basic(VBA) Excelのマクロ ブック間である範囲をコピー Workbooks(“a.xlsx“).Sheets 3 2022/05/12 17:02
- Excel(エクセル) 余計なお世話的な「入力規則」?対策は? 2 2023/01/14 12:39
- Excel(エクセル) エクセルの関数で質問です。 3 2023/02/24 14:07
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Excel(エクセル) ログインIDの一発入力? 5 2023/07/07 12:30
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセル マクロ 最終列までを全選択
Excel(エクセル)
-
連続データが入った行の一番右端の右側の空白セル
Excel(エクセル)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
-
4
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
5
B列の最終行までA列をオートフィル
Visual Basic(VBA)
-
6
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
7
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
8
vbaで指定したセルより下の行を指定する方法について vbaの質問です。 例えば、「C6」セルより下
Excel(エクセル)
-
9
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
10
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
11
【VBA】特定列に文字が入っていたらそのセル行をコピーしてマスターブックの同じ行に貼り付けたい
その他(Microsoft Office)
-
12
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
13
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
14
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
15
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
16
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
17
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
18
エクセルでエラーが出て困っています。
Excel(エクセル)
-
19
Excelで、activecellから最終列まで選択するvbaはどうすれば?
Excel(エクセル)
-
20
VBAで複数の数式セルを最終行までコピーするには?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
【Excel VBA】一番右端セルまで...
-
Excel UserForm の表示位置
-
特定の色のついたセルを削除
-
円弧の描画方法
-
VBA:日付を配列に入れ別セルに...
-
DataGridViewでグリッド内に線...
-
Excel VBAでCheckboxの名前を変...
-
EXCELマクロからCSVファイルを...
-
EXCEL VBA 文中の書式ごと複写...
-
Excelで空白セル直前のセルデー...
-
EXCELのフォーム上でリアルタイ...
-
【VBA】【ユーザーフォーム_Lis...
-
Excel VBA 同じ処理を複数回行...
-
入力規則のリスト選択
-
リストを逆順にする関数(LISP)
-
Excel VBA IF文がうまく動作し...
-
VBAについて
-
Rangeの範囲指定限界
-
DataGridViewのフォーカス遷移...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
エクセルVBA 配列からセルに「...
-
Excel UserForm の表示位置
-
Excelで空白セル直前のセルデー...
-
【Excel VBA】一番右端セルまで...
-
EXCEL VBA 文中の書式ごと複写...
-
VBA にて、条件付き書式で背景...
-
特定の色のついたセルを削除
-
【VBA】【ユーザーフォーム_Lis...
-
VBA 複数条件の分岐処理の上手...
-
入力規則のリスト選択
-
【VBA】写真の貼り付けコードが...
-
Excel VBA IF文がうまく動作し...
-
VBA:日付を配列に入れ別セルに...
-
VBAでユーザーフォームにセル値...
-
Excel VBAでCheckboxの名前を変...
-
エクセルの合計を自動で表示さ...
-
関数の引数でrangeを指定したとき
-
複数指定セルの可視セルのみを...
-
DataGridViewでグリッド内に線...
おすすめ情報