PowerQuery汇总多个工作簿下的全部工作表

多个工作簿合并到同一个工作表(每个工作簿都有多个工作表)

有1993年至2001年的销售数据,每一年一个工作表,每三年一个工作簿,至今共有三个工作簿,九个工作表,现在要把这些数据全部汇总到一个工作表中,并且实现联动刷新,怎么操作呢?

案例文件链接:https://pan.baidu.com/share/init?surl=FZr7-6gclpHHAVKqwlkO2A

提取码:gd18

继续阅读“PowerQuery汇总多个工作簿下的全部工作表”

Office菜单栏中英文对照表

获取Excel菜单命令的VBA代码:

Sub ShowInfo()
    '返回菜单命令栏CommandBar的名称
    Dim bar As CommandBar
    Dim i As Integer
    [a1] = "序号": [b1] = "英文名": [c1] = "中文名"
    For Each bar In Application.CommandBars
        With ActiveSheet
            i = i + 1
            .Cells(i + 1, 1) = bar.Index
            .Cells(i + 1, 2) = bar.Name
            .Cells(i + 1, 3) = bar.NameLocal
        End With
    Next
    Cells.EntireColumn.AutoFit '自适应列宽
End Sub
继续阅读“Office菜单栏中英文对照表”

Excel VBA:Range对象

  • Range("ListObjectsName[Title]")
Sub Examples01()
    Dim x As Integer, y As Integer, rngList As Range
    x = Sheet1.UsedRange.Rows.Count
    y = Sheet1.UsedRange.Columns.Count
    Set rngList = Range("A1", Cells(x, y))

    Sheet1.ListObjects.Add(xlSrcRange, rngList, , xlYes).Name = "表1"
    Range("表1[余额]").FormulaR1C1 = "=ROUND(SUM([@收入]-[@支出]),2)"
End Sub
继续阅读“Excel VBA:Range对象”

在 Microsoft Query 创建参数查询

在查询查询Excel,可能需要使用输入值(参数)来指定有关查询的一些内容。 为此,在 Microsoft Query 中创建参数查询:

参数在查询的 WHERE 子句中使用 – 它们始终用作检索数据的筛选器。

运行或刷新查询时,参数可以提示用户输入输入值,使用常量作为输入值,或使用指定单元格的内容作为输入值。

参数是它修改的查询的一部分,不能在其他查询中重复使用。

备注:若要使用另一种方法创建参数查询,请参阅使用 Power Query (创建参数)

继续阅读“在 Microsoft Query 创建参数查询”