Sub R1C1形式に変換する() 'R = Row(行)、C = Column(列)のこと R1C1形式 = Range("B3").Address(ReferenceStyle:=xlR1C1) MsgBox "セルB3は「" & R1C1形式 & "」" End Sub