如何从 VBA 字符串数组中提取第 n 个元素?
我有一个字符串,例如:TEST - 2017/01/20 = Invoice
我希望尽可能简洁地提取出第二个和第三个元素。我正在尝试像这样的Javascripty,但它不起作用,所以必须有一种VBA方式:
Dim Report As String
Dim CurrLine As String
Dim CurrDate As String
Dim CurrTask As String
CurrLine = "TEST - 2017/01/20 = Invoice"
CurrDate = Trim(Split(CurrLine, '-')[1])
CurrTask = Trim(Split(CurrLine, '=')[1])
Report = Report & CHR(34) & CurrDate & CHR(34) & "," & CHR(34) & CurrTask & CHR(34)
//result: "2017/01/20","Invoice"
最佳答案
可能的解决方案
Dim Report As String
Dim CurrLine As String
Dim CurrDate As String
Dim CurrTask As String, St
CurrLine = "TEST - 2017/01/20 = Invoice"
St=Split(replace(CurrLine, "=","-"),"-")
CurrDate = St(1)
CurrTask = St(2)
Report = Report & CHR(34) & CurrDate & CHR(34) & "," & CHR(34) & CurrTask & CHR(34) //result: "2017/01/20","Invoice"
关于arrays - 从 VBA 字符串数组中获取第 n 个元素,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/41984894/