Microsoft excel Power Query (windows) 至 VBA (Mac)

Question

我创建了一个查询，它从一个文件夹中获取数据，并以我需要的方式对数据进行排序。

问题是它在 MacOs 上不起作用。MacOs 中不存在从文件夹 function 获取，我知道我需要使用 VBA 才能在 MacOs 上做同样的事情。

我不知道如何使用 VBA 这些是我的电源查询中的一些步骤：

= Folder.Files("C:\Users\location..") = Table.SelectRows(Source, each [Attributes]?[Hidden]? <> true) = Table.AddColumn(#"Filtered Hidden Files1", "转换文件”，每个#“转换文件”（[内容]））

等等..

我如何在 MacO 中用 VBA 模拟这些？

Answer 1

所以这是一个建议的解决方案，但不幸的是它遇到了权限问题，也许其他人可以提供帮助。

首先在电子表格中包含三个单元格。 使用Excel命名管理器分别命名为OS、FilePath和FileName。 他们的内容是：

OS: =LET(vers,INFO("OSVERSION"),IFERROR(LEFT(vers,FIND(" ",vers)-1),vers))
FilePath: =IF(A1="Windows","C:\...\","/Users/.../")
FileName= report.csv

（显然替换上面的实际 windows 和 mac 文件路径）

作为 Power Query M 代码的开始，使用：

let
  FilePath= Excel.CurrentWorkbook(){[Name="FilePath"]}[Content]{0}[Column1],  
  FileName= Excel.CurrentWorkbook(){[Name="FileName"]}[Content]{0}[Column1],  
  Source = Csv.Document(File.Contents(FilePath & FileName), [Delimiter = ",", Columns = 12, Encoding = 65001, QuoteStyle = QuoteStyle.None])
in
    Source

这在 Windows 端工作正常 - 我在 Mac 上遇到一些问题，出现如下错误：

查询“FetchReport (2)”（步骤“AutoRemovedColumns1”）正在访问具有不能一起使用的隐私级别的数据源。 请重建此数据组合。0: