Question

我有一个代码会输出一个城市列表作为字符串，我将如何分割此列表并将每一行粘贴到另一个单元格中，因为知道此列表中的行数未知

列表的例子

output = driver.FindElementByXPath("//*[@id=""EchoTopic""]/div[1]/div[1]/table/tbody/tr").Text Worksheets("Cityfinder").Cells(p, 5) = output

这可能不仅仅是3个城市，这是我目前为止的一部分代码：

p

这将返回列表，它可能是从1到30多个城市一直在进行，我们的想法是不粘贴列表，而是在每个单独的SSL_ca_path行上列出不同的列

Answer 1

以下是@litelite使用split提到的一个示例 - split分配了构建数组的数量：

Sub splitandUbound()

    Dim s() As String, s1 As String
    Dim i As Integer

    s1 = "C:\_KTemp\TEMP\Test Macro for FolderExists\test\test1\test2\test3"

    ' Create the array
    s = Split(s1, "\")

    ' fill the array
    For i = 0 To UBound(s)
        debug.print Trim(s(i))
    Next

End Sub

如何在不同的行中拆分未知大小的列表

1 个答案: