Boa noite!!
Tente...

 Private Sub Workbook_Open()
 
 Worksheet("Plan3").Calculation = xlManual
 
 End Sub

lostruler,

Boa Noite!

Bem... como você quer o cálculo manual apenas na Plan3, por exemplo, sugiro que você coloque o código VBA abaixo dentro do Evento Activate da Plan3:

Private Sub Worksheet_Activate()
    Application.Calculation = xlManual
End Sub

No mesmo evento, nas Plan1 e Plan2, deve ser inserido o código abaixo de modo a normalizar o cálculo automático nessas plans, quando o usuário selecionar uma delas:

Private Sub Worksheet_Activate()
    Application.Calculation = xlCalculationAutomatic
End Sub

Alexandre/Wagner,

Muito Obrigado.

Abs.