VBA设置当前工作簿为母本工作簿，运行后打开别的工作表运行宏：对A列从大到小排序

您可以使用以下VBA代码来实现您的需求：

Sub SortColumnA()
    Dim wb As Workbook
    Set wb = ThisWorkbook ' 将当前工作簿设置为母本工作簿
    Dim ws As Worksheet
    Set ws = wb.ActiveSheet ' 获取当前活动工作表
    With ws
        .Range("A:A").Sort key1:=.Range("A1"), order1:=xlDescending, Header:=xlYes ' 对A列进行从大到小排序
    End With
End Sub

您可以将以上代码复制到VBA编辑器中（按下Alt+F11打开），然后保存并关闭VBA编辑器。接下来，您可以在任何工作表上运行该宏，它将对该工作表的A列进行排序。请注意，您需要将此代码添加到母本工作簿中的VBA代码模块中。