![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.2ベストアンサー
- 回答日時:
A1~A1000までデータがあり、そのうちのいくつかが空白だとして回答します。
B1セルに『=ISBLANK(A1)』と入力
C1セルに『=IF(B1=TRUE,ROW(B1),"")』と入力
D1セルに『=IF(B2="",","&TEXT(C1,0),IF(B1=FALSE,D2,","&TEXT(CONCATENATE(C1,D2),0)))』と入力
B1~D1セルを1000行目(データ範囲)までコピー
D1セルに書いてある値が空白になっている行の番号です。
B、C列は作業列です。
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_14.png?e8efa67)
No.3
- 回答日時:
以下のようなマクロを登録します。
(標準モジュールとして登録)-----------------------------
Option Explicit
'空白行を表示する
Sub Macro1()
Dim colMax, rowMax As Long
Dim col, row As Long
Dim flag As Boolean
Dim err As String
Dim ctr As Long
Range("A1").Select
ActiveCell.SpecialCells(xlLastCell).Select
colMax = ActiveCell.Column
rowMax = ActiveCell.row
'MsgBox (rowMax & ":" & colMax)
err = ""
ctr = 0
For row = 1 To rowMax
flag = True
For col = 1 To colMax
If Cells(row, col) <> "" Then
flag = False
Exit For
End If
Next
If flag = True Then
ctr = ctr + 1
If ctr Mod 5 <> 1 Then
err = err + ","
End If
err = err & row & "行"
If ctr Mod 5 = 0 Then
err = err + vbLf
End If
End If
Next
If err <> "" Then
MsgBox (err)
End If
End Sub
-------------------------------------
Macro1を実行すると空白行がメッセージボックスに表示されます。
No.1
- 回答日時:
任意の空きセルに次式を入力して、下方にズズーッとオートフィル
=IFERROR(SMALL(IF(A$1:A$1000="",ROW(A$1:A$1000)),ROW(A1)),"")
【お断り】上式は必ず配列数式として入力のこと
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 改行コードの取り方 1 2022/03/22 14:14
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) Excelについて質問です(ver2019) 1 2023/06/30 21:20
- Excel(エクセル) セルの上書き禁止について 5 2022/04/02 10:09
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- Excel(エクセル) 列の複数ある空白セルを飛ばして、セルに並べて表示したい 3 2023/02/12 16:49
- Excel(エクセル) エクセルの表でダブりを解消する方法を、教えてください。 5 2023/04/12 12:11
- PHP ここで言う空文字の意味とは? 1 2022/08/05 16:27
- Visual Basic(VBA) エクセルVBAで『A列』に新規で数値を入力し『B列』から右方向の空白セルにその値を貼り付ける方法 4 2022/11/05 08:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで「ページレイアウト...
-
エクセルの数式バーのフォント...
-
2列に入っているデータを1列...
-
【Excel】別シートから条件に合...
-
EXCELの散布図で日付が1900年に...
-
エクセルをエクセレントに究める
-
F9キーについて。
-
Excelの数式について教えてくだ...
-
数字入力後他の文字等が表示さ...
-
Excelセルを跨いで合計を出す方法
-
計算能力
-
【ExcelVBA】ダブルクォーテー...
-
エクセルのツールバーから数値...
-
エクセル関数を使って
-
エクセル シート表示
-
エクセルでファイルの最終更新...
-
Excel 2019 [オプション]の[リボンのユ...
-
特定の文字列を含む、住所を抽...
-
祝日と土曜、日曜の合計をカウ...
-
Excel分数の表示について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
半角カタカナをヘボン式ローマ...
-
(マクロ)vlookupの元データを同...
-
エクセルで上位バイトのセルと...
-
exselの質問です
-
Excel 大小比較演算子による「...
-
Excel VBについての質問です。
-
エクセルの問題です。絶対値の...
-
非表示列の再表示に失敗
-
職場の人から聞かれており、こ...
-
Excel関数-文字列で自動作成さ...
-
Excelデータをコピペして、ペー...
-
ユーザー定義関数をアドイン登...
-
【マクロ】for next構文について
-
エクセルの日付を編集する
-
【マクロ】VLOOKUPにて参照元に...
-
exselで最小数で並び替える関数
-
libre 表計算ソフトの計算がう...
-
エクセルで表
-
エクセルの表で1年間の曜日を...
-
西暦和暦
おすすめ情報