Как вы заменяете конкретный символ в столбце A на значения в столбце B в Excel?

Question

Я работаю в Excel. Ниже приведен код из 4 строк в столбце A. В столбце B у меня есть целая серия, начиная с 0. Я хотел бы, чтобы значения в столбце B заменили «?» в колонке А. Я искал Google для расширенной копирования и вставки и поиска и замены методов в Excel, но результаты просто сказали мне использовать специальную пасту. Я попытался обратиться к столбцу B в инструменте «Найти и заменить», но не смог этого сделать. Любая помощь будет принята с благодарностью.

"<class type=""sItemManager::cITEM_PARAM_DATA""> 
<s16 name=""data.mNum"" value=""900""/> 
<s16 name=""data.mItemNo"" value=""?""/> 
<u32 name=""data.mFlag"" value=""1""/> 
<u16 name=""data.mChgNum"" value=""0""/> 
<u16 name=""data.mDay1"" value=""0""/> 
<u16 name=""data.mDay2"" value=""0""/> 
<u16 name=""data.mDay3"" value=""0""/> 
<s8 name=""data.mMutationPool"" value=""0""/> 
<s8 name=""data.mOwnerId"" value=""4""/> 
<u32 name=""data.mKey"" value=""0""/> 
</class>" 
"<class type=""sItemManager::cITEM_PARAM_DATA""> 
<s16 name=""data.mNum"" value=""900""/> 
<s16 name=""data.mItemNo"" value=""?""/> 
<u32 name=""data.mFlag"" value=""1""/> 
<u16 name=""data.mChgNum"" value=""0""/> 
<u16 name=""data.mDay1"" value=""0""/> 
<u16 name=""data.mDay2"" value=""0""/> 
<u16 name=""data.mDay3"" value=""0""/> 
<s8 name=""data.mMutationPool"" value=""0""/> 
<s8 name=""data.mOwnerId"" value=""4""/> 
<u32 name=""data.mKey"" value=""0""/> 
</class>" 
"<class type=""sItemManager::cITEM_PARAM_DATA""> 
<s16 name=""data.mNum"" value=""900""/> 
<s16 name=""data.mItemNo"" value=""?""/> 
<u32 name=""data.mFlag"" value=""1""/> 
<u16 name=""data.mChgNum"" value=""0""/> 
<u16 name=""data.mDay1"" value=""0""/> 
<u16 name=""data.mDay2"" value=""0""/> 
<u16 name=""data.mDay3"" value=""0""/> 
<s8 name=""data.mMutationPool"" value=""0""/> 
<s8 name=""data.mOwnerId"" value=""4""/> 
<u32 name=""data.mKey"" value=""0""/> 
</class>" 
"<class type=""sItemManager::cITEM_PARAM_DATA""> 
<s16 name=""data.mNum"" value=""900""/> 
<s16 name=""data.mItemNo"" value=""?""/> 
<u32 name=""data.mFlag"" value=""1""/> 
<u16 name=""data.mChgNum"" value=""0""/> 
<u16 name=""data.mDay1"" value=""0""/> 
<u16 name=""data.mDay2"" value=""0""/> 
<u16 name=""data.mDay3"" value=""0""/> 
<s8 name=""data.mMutationPool"" value=""0""/> 
<s8 name=""data.mOwnerId"" value=""4""/> 
<u32 name=""data.mKey"" value=""0""/> 
</class>" 

Answer 1

Попробуйте следующее (вы можете удалить некоторые ВАР, которые были включены в целях отладки):

Sub test() 
    Dim rng As Range, cl As Range 
    Set rng = Range("A1:A4") 
    Dim cl1 As Range, cl2 As Range 
    For Each cl1 In rng 
     Set cl2 = cl1.Offset(0, 1) 
     Dim ival As Integer 
     ival = cl2.Value 
     Dim res As String 
     res = Application.WorksheetFunction.Substitute(cl1.Text, "?", Trim(Str(ival))) 
     cl1 = res 
    Next cl1 
End Sub 

или это

Sub test() 
    Dim rng As Range, cl As Range 
    Set rng = Range("A1:A4") 
    Dim cl1 As Range, cl2 As Range 
    For Each cl1 In rng 
     Set cl2 = cl1.Offset(0, 1) 
     Dim ival As Integer 
     ival = cl2.Value 
     cl1.Replace What:="~?", Replacement:=Str(ival) 
    Next cl1 
End Sub