Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


177 / 13645 ツリー ←次へ | 前へ→

【81664】結合セルの先頭行 E.T 21/2/17(水) 22:49 質問[未読]
【81665】Re:結合セルの先頭行 γ 21/2/18(木) 9:47 回答[未読]

【81664】結合セルの先頭行
質問  E.T  - 21/2/17(水) 22:49 -

引用なし
パスワード
   こんばんは。
A列で、1〜3行目が結合セル、4〜8行目が結合セル、9行目は結合なし、10〜12行目が結合セル・・・これは例であって、どの行とどの行が結合セルになるかは固定ではありません。結合セルがどことどこであっても、それぞれ結合セルごとの先頭の行を知りたいのですが、どなたか教えてください。ちなみに、最終行も固定ではありません。

【81665】Re:結合セルの先頭行
回答  γ  - 21/2/18(木) 9:47 -

引用なし
パスワード
   こういうことですか?
Sub test()
  Dim r As Range
  For Each r In Intersect(ActiveSheet.UsedRange, Columns("A"))
    If r.MergeCells Then
      If r.Address = r.MergeArea(1).Address Then
        Debug.Print r.Row
      End If
    End If
  Next
End Sub

177 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free