Top.Mail.Ru
Ответы

VBA нужна помощь

Задание необходимо реализовать в 2-х вариантах:

1. С использованием любых функций для работы со строками ( StrComp , StrConv , Lset , RSet , InStr , Left , LTrim , Mid , Right , RTrim , Trim и д.р.)

2. С использованием только функций Mid, Len, Asc, Chr

Для некоторых задания потребуются символы-разделители – это пробел, точка, запятая, « » “ ” ( ) ? !: ; -.
Удалите в выделении все пробелы, расположенные слева от символов-разделителей (см. выше)

По дате
По Рейтингу
Аватар пользователя
Гуру
15лет

??
че за гон?
циклы нельзя что ли? ?

st as string, S_out as string
i as ineger,n as integer
n=len(st)
for i = n to n 2 step -1
if mid(st,i,1)<>"?" and mid(st,i+1,1)<>" " then s_out=s_out & mid(st,i,1)
next i

пойдет?