如何翻译简单的Excel VBA例程做VB.net

Question

我需要帮助来翻译我在自定义构建的excel插件中使用的以下两个子程序（两个不同的例程）来自VBA do VB.NET。它们是我正在构建的插件+功能区的一部分。

根据当前的情况，这个将excel计算设置为手动或半自动。

Sub Calculation()
If Application.Calculation = xlManual Then
    Application.Calculation = xlSemiautomatic
    MsgBox ("Cálculo automático")
Else
    Application.Calculation = xlManual
    MsgBox ("Cálculo manual")
End If
End Sub

这样就可以将所有工作表放大到85％。

Sub set_zoom()

Application.ScreenUpdating = False
Dim ws As Worksheet

For Each ws In Worksheets
ws.Select
ActiveWindow.Zoom = 85
Next ws

Application.ScreenUpdating = True

End Sub

让我给你一些背景信息。我有这个插件，我在excel VBA编辑器中构建。我试图将其导入vb.net，这样我就可以添加一个界面和一些按钮 - 这样我就可以将它分享给我的办公室同事了。

我的插件非常长，我不会打扰你寻求帮助来翻译它，尽管我需要基础知识才能开始。所以，我真的很难翻译上面的两个潜艇。当然，这些都是非常简单的例程，但它们大大提高了我们的生产力。我想当我学习如何将简单的翻译成上面的两个时，我可以改进以翻译我在插件中的一些更讨厌的例程。正确？

谢谢！