Страницы: 1
RSS
Разнести из одной в разные ячейки время и имя игрока
 


Здравствуйте. Нужна помощь. Имеем время забитого гола с именем игрока. Нужно отфильтровать время забитого голо от имени игрока в разные ячейки. Спасибо.      
 
Что-то вроде этого
=IF(LEN($F2);TRIM(RIGHT(SUBSTITUTE(TRIM(LEFT(SUBSTITUTE(TRIM(MID(CLEAN(SUBSTITUTE("@"&SUBSTITUTE($F2;CHAR(10);"@");"@";REPT(" ";LEN($F2))));COLUMNS($H:H)*LEN($F2);LEN($F2)));".";REPT(" ";99));99));")";REPT(" ";99));99));"")
Изменено: БМВ - 11.07.2020 15:44:12
По вопросам из тем форума, личку не читаю.
 
FrOleg80, еще вариант макросом.
Код
Sub dsd()
Dim i As Long, k As Long, n As Long
Dim col As Long, lr As Long
lr = Cells(Rows.Count, 1).End(xlUp).Row
For n = 6 To 7
A = Cells(1, Columns.Count).End(xlToLeft).Column
    For i = 2 To lr
    Z = A
    k = Len(Cells(i, n))
        For k = 1 To k
            If IsNumeric(Replace(Mid(Cells(i, n), k, 1), Chr(10), "")) Then
            On Error Resume Next
            If Not IsNumeric(Replace(Mid(Cells(i, n), k - 1, 1), Chr(10), "")) Then
            Z = Z + 1
                Cells(1, Z) = Cells(1, n)
                Cells(i, Z) = Cells(i, Z + 1) & Mid(Cells(i, n), k, 1)
            Else
                Cells(1, Z) = Cells(1, n)
                Cells(i, Z) = Cells(i, Z) & Mid(Cells(i, n), k, 1)
            End If
            End If
            Next k
    Next i
Next n
End Sub
Не бойтесь совершенства. Вам его не достичь.
 
Mershik, с макросами у меня туга, а больше не как
 
БМВ Вам показал формулу. Или с формулами тоже туго?
 
Обсуждается параллельно тут
 
Да совершенно верно, я создал эту тему там тоже.

Цитата
vikttur написал: БМВ  Вам показал формулу.
У меня был еще вопрос по теме просто кто то отредактировал.
 
FrOleg80, вопрос удалил я. А Вам стоит ознакомиться с правилами форума (о количестве вопросов в теме, о бездумном цитировании). Размещаете тему параллельно на других форумах - показывайте ссылки (и здесь, и там)
Страницы: 1
Наверх