愛心 發問時間: 電腦與網際網路軟體 · 3 年前

請問以下函數 =TRIM(RIGHT(SUBSTITUTE(F6,"/",REPT(" ",LEN(F6))),LEN(F6))),如何轉換成VBA, 這是為了要取儲存格F6內"/"右邊的全部字元,但VBA內的儲存格需換成變數,例如Cells(x, 2),請高手幫幫忙!?

1 個解答

評分
  • 3 年前
    最佳解答

    x 想要做什麼

    Sub 巨集1()

    For i = 2 To [F65536].End(3).Row

    Rng = Cells(i, 6)

    Rnga = Len(Rng)

    Rngb = InStr(1, Rng, "/")

    Cells(i, 1) = Mid(Rng, Rngb + 1, Rnga - Rngb)

    Next

    End Sub

還有問題?馬上發問,尋求解答。