Показать сообщение отдельно
Старый 15.05.2008, 15:48     # 473
kasha
Member
 
Аватар для kasha
 
Регистрация: 08.08.2005
Адрес: Прибалтика
Пол: Male
Сообщения: 217

kasha Известность не заставит себя ждать
подскажите пожалуйсто.

есть ячейка формата text. в ней запись следующего вида.

There are a lot of free space.a1

мне бы как-нибудь считать в другую клетку последние 2 символа т.б. "a1".

сам в интернете нашел такой макрос:

Private Sub Worksheet_Activate()
a = Лист1.Cells(1, 1)
i = Len(a)
lastsymbol = Mid(a, i, 1)
Лист1.Cells(2, 1) = lastsymbol
End Sub

но с макросами вообще не знаком. и Если вы считаете что он мне подходит, то разьясните пожалуйста хотя бы, что значат строки все, кроме i = Len(a) - это я так понимаю в переменную заносится длина строки(кол=во символов в ячейке) .
спасибо
kasha вне форума