Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Поиск подстроки по заданному критерию
 
Павел, все супер. Гигантское спасибо!
Поиск подстроки по заданному критерию
 
Да, Вы правы, Павел. Как-то не сообразил прикрепить файл.  
Серым цветом выделены максимальные подстроки, не содержащие пустых ячеек. В столбце S написаны числа, которые я хочу вычислить.
Поиск подстроки по заданному критерию
 
{quote}{login=VikNik}{date=10.02.2009 02:12}{thema=}{post}  
Сдается мне автор начал тему про строку листа Excel (A1:Z1), a la Row.  
А я что-то подумал про текстовую строку, a la String.  
Бывают непонятки в этих "строках".{/post}{/quote}  
Да. Я имел ввиду именно строку Excel, а не string`овую.  
 
Павел, спасибо за программу и комментарий. Хоть немного разобрался с макросами. Только один вопрос все таки остался. А именно - как сделать то же самое применительно к строке Excel?  
 
P.S.: Сорри, я действительно не очень понятно сформулировал.
Поиск подстроки по заданному критерию
 
{quote}{login=VikNik}{date=09.02.2009 11:49}{thema=}{post}Что такое пустоты? Это пробел или несколько пробелов подряд?{/post}{/quote}  
Пустые ячейки в смысле  
 
P.S. Пардон за мой французский в первом посте. Я имел ввиду вот это, только средствами Excel применительно к ячейкам:  
j:=0; k:=0;  
for i:=1 to 100 do begin  
if str[i]<>" " then j:=j+1;
else begin    
if j>k then k:=j;  
j:=0;  
end;  
end.
Поиск подстроки по заданному критерию
 
Павел, насколько я понимаю бэйсик, это как раз то, что нужно.  
 
Function МаксСтрока(Rng As Range) As String  
Dim Arr As Variant, i As Long  
     
   Arr = Split(Rng, " ")  
   For i = 0 To UBound(Arr)  
       If Len(Arr(i)) > Len(МаксСтрока) Then МаксСтрока = Arr(i)  
   Next i  
End Function  
 
Но так как с макросами не работал, есть вопрос. Как и где мне присвоить элементам Arr соответствующие значения моей строки из книги?
Поиск подстроки по заданному критерию
 
Доброй ночи.  
Возникла следующая проблема:  
Есть строка, в которой содержатся тестовые и числовые данные, а также пустоты. Из этой строки нужно найти подстроку максимальной длинной, не содержащую пустот. Разумеется, сделать это надо средствами Excel (версия 2002 SP2, если это имеет значение).  
С применением стандартных формул найти решение не получилось. С макросами пока не доводилось работать.  
Если кто-то знает как решить такую проблему, подскажите способ, пожалуйста.
Страницы: 1
Наверх