change the Cell mode in excel from A1 to R1C1 using vba

To do this, you can write a simple macro as follows:

Sub bezugsart()
'
' bezugsart Makro
' Makro am 30.10.2007 von TMezger aufgezeichnet
'

If Application.ReferenceStyle = xlA1 Then
With Application
.ReferenceStyle = xlR1C1
End With

Else

With Application
.ReferenceStyle = xlA1
End With
End If

End Sub