XL 2019 ligne et colonne 0

Sub test_1()
MsgBox Columns(1).Address
MsgBox Columns(1).Column
'genérera une erreur
MsgBox Columns(0).Address
End Sub
Sub test_2()
'et ce qui vaut pour les colonnes, vaut pour les lignes
MsgBox Rows(1).Address
MsgBox Rows(1).Column
'genérera une erreur
MsgBox Rows(0).Address
End Sub

Sub test()
 Dim c As Range: Set c = Range("B2")
 Debug.Print c(0, 0).Address ' A1
 Debug.Print c(1, 0).Address 'A2
 Debug.Print c(0, 1).Address 'B1
 Debug.Print c(1, 1).Address 'B2
 Debug.Print c(100, 100).Address 'CW101
End Sub

Sub Test()
With ActiveSheet.UsedRange
    .Rows(1).Insert xlDown
    MsgBox .Rows(0).Address, , "Ligne 0"
    .Columns(1).Insert xlToRight
    MsgBox .Columns(0).Address, , "Colonne 0"
End With
End Sub

Sub Test2()
With ActiveSheet.UsedRange
    .Rows(1).Insert
    MsgBox .Rows(0).Address(4, 4, xlR1C1), , "Ligne 0"
    .Columns(1).Insert
    MsgBox .Columns(0).Address, , "Colonne 0"
End With
End Sub

Sub Test3()
With ActiveSheet.UsedRange
    .Rows(1).Insert xlDown
    MsgBox .Rows(0).Address(4, 4, xlR1C1) & Chr(13) & .Rows(0).Row, , "Ligne 0"
    .Columns(1).Insert xlToRight
    MsgBox .Columns(0).Address(4, 4, xlR1C1) & Chr(13) & .Columns(0).Column, , "Colonne 0"
End With
End Sub