首页 > 解决方案 > VBA:用日期转置表格

问题描述

我是 VBA 的新手。我正在尝试转置我的数据:

在此处输入图像描述

我想得到这个结果:

在此处输入图像描述

我整天都在尝试这样的方法: Resize(UBound(Table2, 1), UBound(Table2, 2)) = Table2, Application.transpose(Tbl1) 但我没有 diserid 结果。请问你能帮帮我吗?非常感谢!

在此处输入图像描述

在此处输入图像描述

在此处输入图像描述

在此处输入图像描述

在此处输入图像描述

标签: excelvbadatepivotpowerquery

解决方案


电源查询解决方案 (CVR)

添加了更正;归功于Ron Rosenfeld

  • 点击进入您的表格。
  • 选择Data > From Table/RangePower Query Editor包含您的数据的打开。
  • 第一列被选中。如果没有,请单击第一列的标题 ( Date) 将其选中。
  • 选择Transform > Pivot ColumnPivot Column窗口打开。
  • Values Column组合框中,第二列 ( Values) 已被选中。如果没有,请选择它。
  • 单击已选择的Advanced Options位置,它将汇总同一列的多个条目。如果没有,请选择它。SumID/Date
  • OK。数据被转换。
  • 选择Home > Close & LoadPower Query Editor关闭并转换后的数据显示在新工作表的表格中。

精简版

  • 点击进入您的表格。
  • 选择Data > From Table/RangePower Query Editor包含您的数据的打开。
  • 选择Transform > Pivot ColumnPivot Column窗口打开。
  • OK。数据被转换。
  • 选择Home > Close & LoadPower Query Editor关闭并转换后的数据显示在新工作表的表格中。

推荐阅读