|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
1. 加载文件夹之后 我的版本会自动运行一个函数 不知你的有没有?
- let
- 源 = (示例文件参数1) => let
- Source = Excel.Workbook(示例文件参数1, null, true),
- #"????????2018-12-02_2018-12-02??1" = Source{[Name="????????2018-12-02_2018-12-02??"]}[Data]
- in
- #"????????2018-12-02_2018-12-02??1"
- in
- 源
2. 这个是后来PQ自己跑完的(加载文件夹)
- let
- Source = Folder.Files("C:\Users\丫头\Desktop\excelHome\测试"),
- #"Invoke Custom Function1" = Table.AddColumn(Source, "从 测试 转换文件", each #"从 测试 转换文件"([Content])),
- #"Renamed Columns1" = Table.RenameColumns(#"Invoke Custom Function1", {"Name", "Source.Name"}),
- #"Removed Other Columns1" = Table.SelectColumns(#"Renamed Columns1", {"Source.Name", "从 测试 转换文件"}),
- #"Expanded Table Column1" = Table.ExpandTableColumn(#"Removed Other Columns1", "从 测试 转换文件", Table.ColumnNames(#"从 测试 转换文件"(示例文件))),
- #"Changed Type" = Table.TransformColumnTypes(#"Expanded Table Column1",{{"Source.Name", type text}, {"Column1", type text}, {"Column2", type text}, {"Column3", type text}, {"Column4", type text}, {"Column5", type text}, {"Column6", type text}, {"Column7", type text}, {"Column8", type text}})
- in
- #"Changed Type"
3. 从eRP中可以到处CSV 或者 txt吗 或许这样能够解决问题 如果有此选项 试试看
|
|