微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

将列标题转换为行数据

如何解决将列标题转换为行数据

我在Access数据库中有一个表,该表具有要转换为行数据的列。

在这里找到了一个代码

converting database columns into associated row data

我是VBA的新手,我只是不知道如何使用此代码

我附了一些示例数据

当前表的设置方式为14列长。

+-------+--------+-------------+-------------+-------------+----------------+
| ID    |  Name  |  2019-10-31 |  2019-11-30 |  2019-12-31 |  ... etc ...   |
+-------+--------+-------------+-------------+-------------+----------------+
| 555   |  Fred  |          1  |          4  |         12  |                |
| 556   |  Barney|          5  |          33 |         24  |                |
| 557   |  Betty |          4  |          11 |         76  |                |
+-------+--------+-------------+-------------+-------------+----------------+

I would like the output to be

+-------+------------+-------------+
| ID    |  Date      |  HOLB       |
+-------+------------+-------------+
| 555   |  2019-10-31|  1          |
| 555   |  2019-11-30|  4          |
| 555   |  2019-12-31|  12         |
| 556   |  2019-10-31|  5          |
| 556   |  2019-11-30|  33         |
| 556   |  2019-12-31|  24         | 
+-------+--------+-------------+---+

如何将该代码修改为模块并在查询调用该模块?

或者您可能有其他任何想法。

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。