Formulaプロパティーを使って下記の通りマクロを組んだのですが繰り返し行うマクロを組み簡潔にしたいのですが。For - Next といった形で
基本 =$A$4& " - " & 1 の数式でページが変わるごとに2,3としたい。
Sub kirokuNo入力()
Range("e11:e35").Formula = "=$a$4& "" - "" & 1" ’1ページは25行
Range("e36:e65").Formula = "=$a$4& "" - "" & 2" ’2ページ以下30行
Range("e66:e95").Formula = "=$a$4& "" - "" & 3"
Range("e96:e125").Formula = "=$a$4& "" - "" & 4"
Range("e126:e155").Formula = "=$a$4& "" - "" & 5"
Range("e156:e185").Formula = "=$a$4& "" - "" & 6"
Range("e186:e215").Formula = "=$a$4& "" - "" & 7"
End Sub
No.2
- 回答日時:
こんばんはと
>ページが変わるごとに と For - Next といった形
をこだわる必要がある(4ページなどの時もある)のであれば、ページ設定されている ページ分をループでべたに・・
Dim i As Integer
With ActiveSheet
For i = 1 To .HPageBreaks.Count
If i = 1 Then
.Range("e11:e35").Formula = "=$a$4& "" - "" & " & i
Else
.Range("e36:e65").Offset(30 * (i - 2)).Formula = "=$a$4& "" - "" & " & i
End If
Next
End With
ご質問のコードは
ストレートに書かれているので #1様の関数が良いと思います
早々にご回答いただきありがとうございました。For-Nextで私も挑戦してきましたが出来ずに質問させていただきました。ページ数が未定ですので#1様の関数式を使わせていただきました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 表示形式、文字列セル(列)に数式を入力するには マクロ 1 2022/09/18 10:53
- Excel(エクセル) Formulaプロパティーを使ってセルに数式を組んだのですが簡潔にしたい。 3 2022/08/21 20:51
- Excel(エクセル) マクロを簡潔にしたい 6 2022/09/16 10:37
- Visual Basic(VBA) ローマ字、ハイフン付きの並び替え ローマ字抽出方法 Excelマクロ 4 2022/04/01 14:10
- Excel(エクセル) Excelマクロ 同列内で複数の数式を繰り返す方法 5 2022/05/22 13:58
- Visual Basic(VBA) エクセルのマクロとシートの保護について教えてください。 1 2022/10/18 08:36
- Visual Basic(VBA) 最終列の右へSUM関数を作成するため下記コードを実行しましたが、最終列「10月28日」が上書きされて 3 2022/12/05 20:32
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
- Visual Basic(VBA) 関数を最終行までコピー 3 2022/09/04 11:05
- Visual Basic(VBA) 他のシートからコピーする下記マクロで貼付け位置をWorksheets(1).Range("A3")の 8 2023/01/30 18:48
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelのマクロについて教えてく...
-
Vba 実数および実数タイプの変...
-
ユーザーフォームに別シートか...
-
VBA レジストリの値の読み方に...
-
エクセルVBAについて
-
VBA listBoxから
-
ExcelのVBAコードについて教え...
-
VBA 複数条件の分岐処理の上手...
-
ExcelのVBAです。フォルダ内の...
-
VBAの計算で@が出てしまう件
-
VB.net(VB)で、フォームにExcel...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
VBAの質問になります Userform内で
-
VBAの質問になります メッセー...
-
Excel マクロについての相談
-
Vba SelStart、SelLen教えてく...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBA 定義されたプロージ...
-
Excel-VBAのmsgBox()の不思議
-
【VBA】マクロの入ったファイル...
-
VBA 複数条件の分岐処理の上手...
-
現在のブックを閉じないで、マ...
-
VBAで各列の"+"と"o"の合計数を...
-
VBAに詳しい方教えてください。
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ユーザーフォームに別シートか...
-
エクセルのマクロについて教え...
-
ExcelVBA シート名を複数セルか...
-
エクセルのマクロについて教え...
-
VBA listBoxから
-
Excelのマクロについて教えてく...
-
エクセルのマクロについて教え...
おすすめ情報