No.2ベストアンサー
- 回答日時:
考えすぎかもですが。
・データのナンバーリングはA2からスタート
・ナンバーリングは1からB2~B最終行にデータのある範囲
と思って(過去質からの憶測)
With Range("A2", Cells(Rows.Count, "B").End(xlUp).Offset(, -1))
.Formula = "=ROW()-1"
.Value = .Value
End With
No.1
- 回答日時:
こんにちは
作る 手順
記録マクロでオートフィル操作を行う
結果
Sub Macro1()
'
' Macro1 Macro
'
'
Range("A1:A2").Select
Selection.AutoFill Destination:=Range("A1:A13"), Type:=xlFillDefault
Range("A1:A14").Select
End Sub
B列の最終行の取得方法を調べる
記録方法を知っていれば記録する
https://excel-ubara.com/excelvba1/EXCELVBA318.html
記録されているコードを添削
範囲の書き方
https://sugoikaizen.com/excelvba/2_80/
添削例
Sub test()
'
' Macro1 Macro
'
'
Dim bLastR As Long
bLastR = Cells(Rows.Count, "B")・・・・
Range("A1:A2").Select
Selection.AutoFill Destination:=Range("A1:A" & bLastR), Type:=xlFillDefault
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 別ブックの列同士の値が一致したときの処理 1 2022/09/03 08:27
- Visual Basic(VBA) A列の最終行に合わせて範囲をコピー 2 2022/09/04 19:10
- Visual Basic(VBA) 重複データをまとめて合計を合算する 4 2022/10/25 20:25
- Visual Basic(VBA) 別シートに順番で貼り付け 2 2023/04/13 19:53
- Visual Basic(VBA) セルに値が入っていた時の処理 1 2022/10/22 19:23
- Visual Basic(VBA) VBA 最終行まで数式をコピーする 3 2023/01/03 15:44
- Visual Basic(VBA) 列の最終行までのセルと1つ隣のセルの合計を別の列に表示 2 2022/07/12 19:50
- Visual Basic(VBA) VBAでセル同士を比較して色付け 4 2023/03/06 19:57
- Visual Basic(VBA) 範囲を指定して別シートにコピペ 2 2022/09/15 07:32
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
エクセルVBAでのオートフィル
Excel(エクセル)
-
VBAで複数の数式セルを最終行までコピーするには?
Excel(エクセル)
-
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
アクティブセルから、A列最終行までフィルダウン
Excel(エクセル)
-
6
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
7
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
8
エクセルVBAで、値が入っている最終行の、右隣の値をコピーして、別のセルに貼り付けるコード
Excel(エクセル)
-
9
エクセルマクロにて最終行まで数式をコピーする構文
Excel(エクセル)
-
10
エクセルマクロ 行数可変のオートフィルター構文
Excel(エクセル)
-
11
【Excel VBA】一番右端セルまでの範囲指定の仕方(途中に空白セルあり)
Visual Basic(VBA)
-
12
Excel VBA マクロ ある列の最終行迄を参照し、別の列の空白セルに値を入力したいです
Visual Basic(VBA)
-
13
VBAで文字列を数値に変換したい
Excel(エクセル)
-
14
VBA 最終行まで数式をコピーする
Visual Basic(VBA)
-
15
ExcelのVBAで連番を振る。
Excel(エクセル)
-
16
VBA 数式を最終行までコピー
Excel(エクセル)
-
17
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
18
E列のセルに数値が入れば(空白でなければ)B列の同じ行のセルに色がつく
その他(Microsoft Office)
-
19
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
20
VBAのオートフィルターで該当行がない場合に処理を止めたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
文字列の結合を空白行まで実行
-
B列の最終行までA列をオート...
-
Worksheets メソッドは失敗しま...
-
Excelで、あるセルの値に応じて...
-
targetをA列のセルに限定するに...
-
ExcelVBA修正のお願い
-
VBAで10行おきにセルの下に罫線...
-
VBAのFind関数で結合セルを検索...
-
マクロ 最終列をコピーして最終...
-
IIF関数の使い方
-
URLのリンク切れをマクロを使っ...
-
vba 2つの条件が一致したら...
-
Excel2010 VBAでスペース区切り
-
C# dataGridViewの値だけクリア
-
VBマクロ 色の付いたセルを...
-
VBScriptでfindを使うには??
-
VBAで、特定の文字より後を削除...
-
VBAリストボックスへの複数列の...
-
vba 等間隔の列に対しての計算
-
別シートのデータを参照して値...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Worksheets メソッドは失敗しま...
-
Excelで、あるセルの値に応じて...
-
B列の最終行までA列をオート...
-
vba 2つの条件が一致したら...
-
Cellsのかっこの中はどっちが行...
-
マクロ 最終列をコピーして最終...
-
VBAを使って検索したセルをコピ...
-
データグリッドビューの一番最...
-
URLのリンク切れをマクロを使っ...
-
VBAのFind関数で結合セルを検索...
-
【VBA】2つのシートの値を比較...
-
文字列の結合を空白行まで実行
-
IIF関数の使い方
-
Excel(M365) Vlookup/セル反転(...
-
VBA指定行削除
-
VBAでのリスト不一致抽出について
-
C# dataGridViewの値だけクリア
-
Changeイベントでの複数セルの...
-
VBAで、特定の文字より後を削除...
-
rowsとcolsの意味
おすすめ情報