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(エクセル)
-
B列の最終行までA列をオートフィル
Visual Basic(VBA)
-
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
6
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
7
vbaで指定したセルより下の行を指定する方法について vbaの質問です。 例えば、「C6」セルより下
Excel(エクセル)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
10
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
11
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
12
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
13
【VBA】特定列に文字が入っていたらそのセル行をコピーしてマスターブックの同じ行に貼り付けたい
その他(Microsoft Office)
-
14
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
15
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
16
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
17
値が入っている一番右のセル位置を返す方法
Excel(エクセル)
-
18
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
19
VBAのオートフィルターで該当行がない場合に処理を止めたい
Excel(エクセル)
-
20
VBA データ(特定値)のある最終行を取得したい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAコードについて教えてくださ...
-
VBAマクロ実行時エラーの修正に...
-
【Excel VBA】一番右端セルまで...
-
Excel UserForm の表示位置
-
【VBA】写真の貼り付けコードが...
-
エクセルVBA 配列からセルに「...
-
特定の色のついたセルを削除
-
エクセル VBA ボタンをクリック...
-
飛び地セルの空白判定
-
Excel VBAでCheckboxの名前を変...
-
マクロの実行時エラー'1004'が...
-
【Excel VBA】マクロで書き込ん...
-
VBAでユーザーフォームにセル値...
-
下記のマクロの説明(意味)を...
-
EXCEL VBA 文中の書式ごと複写...
-
VBA コンボボックスで選んだも...
-
ExcelのVBAコードを教えて頂け...
-
Excel VBAで特定の範囲の空白セ...
-
EXCELのフォーム上でリアルタイ...
-
VBA初心者です。 セルB2~B6に書...
マンスリーランキングこのカテゴリの人気マンスリー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でグリッド内に線...
おすすめ情報