Формат ячейки в виде кода ТН ВЭД

Формат ячейки в виде кода ТН ВЭД, нужно отформатировать ячейку под коды ТН ВЭД

Пользователь

Сообщений: 16 Регистрация: 01.01.1970

18.10.2017 14:58:25

Всем доброго для
Вопрос следующий. Подскажите как сделать формат ячейки под кода ТН ВЭД
Пример: код 7318169200 нужно чтоб отображался 7318 16 92 00
и второй момент если я ввожу в ячейку не полный код например только 731816 и enter то в ячейке должно отобразиться 7318 16 00 00. Т.е. авто добавление нулей до 10 цифр справа
Формат #### ## ## не выходит

tolstak Пользователь Сообщений: 471 Регистрация: 01.08.2017	#2 18.10.2017 15:10:05 Алексей Башмаков, попробуйте формат "0000\ 00\ 00\ 00". Нулями добивает, но к сожалению, с другой стороны.. In GoTo we trust

Kuzmich

Пользователь

Сообщений: 8057 Регистрация: 21.12.2012

18.10.2017 15:14:48

UDF

Код

Function TH(cell)
  If Len(cell) = 10 Then
    TH = Mid(cell, 1, 4) & " " & Mid(cell, 5, 2) & " " & Mid(cell, 7, 2) & " " & Mid(cell, 9, 2)
  Else
    cell = cell & String(10 - Len(cell), "0")
    TH = Mid(cell, 1, 4) & " " & Mid(cell, 5, 2) & " " & Mid(cell, 7, 2) & " " & Mid(cell, 9, 2)
  End If
End Function