Kuzmich написал: Function iStrReverse(cell As String) As StringDim tempDim i As Integer temp = Split(cell, ",") For i = UBound(temp) To 0 Step -1 iStrReverse = iStrReverse & temp(i) & "," Next iStrRevers
Kuzmich - Вам тысячу раз спасибо и миллион благодарностей!!!
Добрый день знатокам и профессионалам. Прошу помощи т.к. потерял формулу макрос для отзеркаливания данных в ячейке. Помогите пожалуйста! Данные в ячейке цифры или через запятую 12,13,14,15 или через два пробела 12 13 14 15 Необходимо преобразовать (отзеркалить в обратном порядке) 15,14,13,12 или 15 14 13 12 соответственно. Значений может быть от 2-х до 20-ти. Заранее спасибо откликнувшимся.