使用macros指定和检索excel中的excel cellValues

我是VB编程的新手。 无法弄清楚我在做什么错在这里：

Dim somevariable as Integer somevariable = WorksheetFunction.QUOTIENT(Range(Sheet1!A1), Range(Sheet1!B1)) 

谢谢

Answer 1

完全新的答案作为给定的细节。 你正在使用VBA所以你可以调用WorksheetFunctions

 Dim someVariable someVariable = WorksheetFunction.Quotient(Worksheets("Sheet1").Cells(1, "A").Value, Worksheets("Sheet1").Cells(1, "B").Value) Debug.Print someVariable 

在MSDN WorksheetFunction上有一个相当不错的支持函数列表。 请在链接页面上select当前的Excel版本。

此外，我发现另一个非常重要的网站有关您的问题， 并不是所有的WorksheetFunctions支持作为应用程序 。 （请参阅support.microsoft.com ）

所以我search了解决方法，并find一个相当简单的StackOverflow 。 但另一方面 – 你真的可以利用VBA内置运营商MOD

 ' created some variables, as I made some attempts on creating a good example Dim value1 value1 = Worksheets("Sheet1").Cells(1, "A").Value Dim value2 value2 = Worksheets("Sheet1").Cells(1, "B").Value someVariable = value1 Mod value2 Debug.Print someVariable ' of course you may use a single line statement too someVariable = Worksheets("Tabelle1").Cells(1, "A").Value Mod Worksheets("Tabelle1").Cells(1, "B").Value 

我认为有一些相当不错的链接可以深入研究。

Answer 2

尝试这个

 somevariable = WorksheetFunction.QUOTIENT(Worksheets("Sheet1").Range(A1), Worksheets("Sheet1").Range(B1))