заменить первую цифру буквой, когда первая цифра также находится в остальной части ячейки в Excel

Question

Я хочу заменить первую цифру (9109) буквой "i" в колонке моего листа Excel A1 . Каждая ячейка имеет свой номер проекта, но каждый проект начинается с "9", поэтому я хочу заменить "9" на букву "i".

Очень важно: имейте в виду, что некоторые из моих номеров проекта выглядят как 9109, 9269. Поэтому мне нужно заменить только первую "9". Может кто-нибудь мне помочь?

Answer 1

VBA:

Sub test()
Dim original As String
Dim replacement As String

    For Each c In Range("A:A")

        If Left(c, 1) = 9 Then

        original = c.Value
        replacement = replace(original, "9", "i", 1, 1)
        c.Value = replacement

        End If

    Next

End Sub