pgbigorokuのブログ

プログラムの再利用できそうなコードをアップ

EXCEL VBA セルの場所指定をA1の文字列形式で取得する。

Public Sub test()

    Debug.Print pstrA1形式FromR1C1形式(1, 2, 3, 4) '$B$1:$D$3
    

End Sub

'
'  セルの場所指定をA1の文字列形式で取得する。
'https://pgbigoroku.hatenablog.com/entry/2022/08/25/001634
'2021/8/23
Private Function nistrA1形式FromR1C1形式(ByVal plngFirstRow As Long, _
                                    ByVal pintFirstCol As Integer, _
                                    ByVal plngLastRow As Long, _
                                    ByVal pintLastCol As Integer) As String
    nistrA1形式FromR1C1形式 = Range(Cells(plngFirstRow, pintFirstCol), Cells(plngLastRow, pintLastCol)).Address
End Function