返回列表 上一主題 發帖

取出雙引號中的值~~

回復 1# hsiaohsien
  1. Sub nn()
  2. a = Split(Replace(Mid([A1], 1, Len([A1]) - 1), """,", ","), ",""")
  3. [B1].Resize(, UBound(a) + 1) = a
  4. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 屋寬不如心寬。
返回列表 上一主題