Динамические строки Манипуляция VBA Excel

Question

У меня есть строка из списка Sharepoint, который возвращает данные, как это:

"Doe, John;#44" or "Doe, Jane;#150". 

Мне нужно, чтобы иметь возможность удалить точку с запятой и символы после этого. Поскольку они могут быть 4, 5 или даже 6 символов, я не могу использовать правильную функцию.

Answer 1

Вы можете использовать InStr, чтобы найти точку с запятой и Left извлечь часть слева от него:

Sub test() 
    Dim s As String, i As Long 
    s = "Doe, John;#44" 
    i = InStr(1, s, ";") 
    s = Left(s, i - 1) 
    Debug.Print s 
End Sub 

Это печатает Doe, John

Answer 2

Вы можете использовать формулу REPLACE(LEFT(A1,FIND(";",A1)-1),1,1,), предполагая, что данные в ячейку A1.