Código:
Sub IntercambiarEstiloRef()
If Application.ReferenceStyle = xlA1 Then
Application.ReferenceStyle = xlR1C1
MsgBox "Estilo de referencia R1C1 activo.", vbInformation
Else
Application.ReferenceStyle = xlA1
MsgBox "Estilo de referencia A1 activo.", vbInformation
End If
End Sub
⭐ Si te gustó, por favor regístrate en nuestra Lista de correo y Suscríbete a mi canal de YouTube para que estés siempre enterado de lo nuevo que publicamos