VBA查询M减去-dax列的最小值

在VBA中查询M减去-dax列的最小值很简单。我们可以使用Excel对象模型中的Range类来检索和修改单元格数据。以下是实现此功能的代码片段：

Sub Minus_DAX_From_M()
    ' 将当前工作表指定为ws变量
    Dim ws As Worksheet
    Set ws = ActiveSheet
     
    ' 获取M列和DAX列的值
    Dim MRange As Range
    Dim DAXRange As Range
    Set MRange = ws.Range("M:M")
    Set DAXRange = ws.Range("DAX:DAX")
     
    ' 查找DAX列的最小值
    Dim MinDAX As Double
    MinDAX = Application.WorksheetFunction.Min(DAXRange)
     
    ' 将M列的每个单元格减去最小值
    Dim cell As Range
    For Each cell In MRange
        cell.Value = cell.Value - MinDAX
    Next cell
     
    ' 显示消息框，指示操作已完成
    MsgBox "M列已更新!"
End Sub

在此代码片段中，我们首先将当前工作表指定为ws变量。接下来，我们检索M列和DAX列的值，并使用WorksheetFunction.Min函数查找DAX列的最小值。然后，我们使用For Each循环遍历M列中的每个单元格，并从其值中减去最小值。最后，我们显示一个消息框，指示操作已完成。

此代码片段可以在任何包含M和DAX列的工作表上使用。只需将其复制并粘贴到VBA编辑器中，然后运行即可。