Привет еще раз!!!

Помогите разобраться!
У меня в j храниться строковое значение <!-- 1 -->dddd<!-- end-1 -->

Как мне при нажатии кнопки выводить текст из этой переменной, который находится между <!-- 1 --> и <!-- end-1 --> в поле hotels ???????

А если у меня такая строка:
<!-- 1 -->dddd<!-- end-1 --><!-- 2 -->вввввввв<!-- end-2 --> .... и еще куча символов ...

Можно поподробнее....
Как это будет?

Почему-то выдает ошибку "Type mismatch"


Подскажите, что здесь не так?

А как будет правильно-то?

У меня есть две кнопки "Объединить поля" и "Разгруппировать"

Это при нажатии "Объединить поля":
Private Sub all_Click()
Dim a As String
Dim b As String
Dim c As String
a = Form.Services.Value
b = Form.GuestRoom.Value
c = "<!-- 1 -->" & a & "<!-- end-1 -->" & "<!-- 2 -->" & b & "<!-- end-2 -->"
Form.alltext.Value = c
End Sub

Мне нужно, чтобы при нажатии на "Разгруппировать" был обратный эффект:
Значение из текстового поля alltext разгруппировывалось таким образом:

То, что в тегах <!-- 1 --> и <!-- end-1 --> поместить в текстовое поле Services,
то, что в <!-- 2 --> и <!-- end-2 --> в текстовое поле GuestRoom.


Как мне такую фишку провернуть?