Receio que isso não seja possível sem "coisas extravagantes do VBA". O melhor que você pode fazer sem o VBA é atribuir um formato personalizado a B1
com o valor de A1
codificado no formato.
Para definir o formato dessa forma, clique com o botão direito do mouse em B1
e selecione Format Cells...
. Escolha a categoria Custom
e digite o seguinte formato.
#"/10"
Mas é claro que você pode conseguir o que deseja com o VBA sem muita complicação.
Você só precisará adicionar o código abaixo ao módulo associado à planilha com essas células.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("A1")) Is Nothing Then
Me.Range("B1").NumberFormat = "#" & Chr(34) & "/" & CStr(Me.Range("A1").Value) & Chr(34)
End If
End Sub
Esse código é acionado toda vez que um valor é alterado na planilha. Se o valor que muda for A1
, ele redefinirá o formato numérico para B1
. Se o valor alterado estiver em uma célula diferente, ele não fará nada.
Para obter instruções sobre como adicionar esse código à sua pasta de trabalho, consulte minha resposta aqui . Certifique-se de seguir as etapas para adicionar o código que é acionado por um evento.