用于Excel VBA的YAMLparsing器

我有一些YAML文件，我需要使用MS Excelmacros在Excel中填充这些数据。 我能够读取YAML文件并尝试逐行读取并查找语义。 但是这个过程变得越来越复杂。 我正在寻找一个替代解决scheme。

Excel VBA是否有YAMLparsing器？ 如果是这样，你可以build议几个？ 我需要这个哈希的哈希格式的YAML，以便我可以访问哈希格式的哈希中的YAML数据？

感谢Jeevan

Answer 1

我试图find一个准备使用的解决scheme，没有发现。 我做了一些可用的东西 这不是纯粹的YAML解释器，但可以parsing键值数据。

函数VBA ParseYAML

Sub ParseYAML() Dim myFile As String, text As String, textline As String ' open YAML file myFile = Application.GetOpenFilename() ' verify if a file were open If Not myFile = "Falsch" Then Open myFile For Input As #1 Dim dataArray Dim c As Collection Set c = New Collection Line = 0 Do Until EOF(1) Line Input #1, textline oneline = Replace(textline, " ", "") dataArray = Split(oneline, ":", 2) sizeArray = UBound(dataArray, 1) - LBound(dataArray, 1) + 1 ' Verification Empty Lines and Split don't occur If Not textline = "" And Not sizeArray = 0 Then Data = dataArray(1) Key = dataArray(0) ' test if line don't start with - If InStr(1, Key, "-") = 0 Then c.Add Data, Key End If ' just for debug Line = Line + 1 'text = text & textline End If Loop Close #1 Range("D6").Value = c.Item("key1") Range("D7").Value = c.Item("key2") Range("C18").Value = c.Item("key3") Set c = Nothing End If End Sub 

YAML文件的例子

– 第一节：
KEY1：DATA1
KEY2：DATA2
– 第2节：
KEY3：DATA3