Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Создание отступа по типу тега (html) &nbsp или как в Word кнопка TAB (табуляция)
 
#1
26.05.2011 18:00:32
Столкнулся с проблемой, когда есть массив с текстом слева и цифрами справа.  
Проблема в том, что нужно выровнять массив так, чтобы цифры были четко друг над другом, ровно, как в разных столбцах, но при этом в одной ячейке с текстом.  
Т.е. каждая ячейка должна быть такой (цифры под цифрами):  
Ячейка №1:  
Иванов Вася 1903  
Ячейка №2:  
ЦУМ         20  
 
(20 четко под 19)  
есть идея: написание формулы, считающей количество символов, приравнивающих их по ширине с "Х" и вставляющая необходимое количество пробелов между текстом и цифрами.
 
 
 
#2
26.05.2011 18:10:47
идея с количеством символом не подойдет... разная ширина символов...
 
 
 
#3
26.05.2011 18:12:04
а почему, например, не в разных столбцах? работать проще бы было, скорее всего...
 
 
 
#4
26.05.2011 18:12:30
{quote}{login=Диана}{date=26.05.2011 06:10}{thema=}{post}идея с количеством символом не подойдет... разная ширина символов...{/post}{/quote}  
Никто не мешает заменить шрифт на моноширинный :-)
 
 
 
#5
26.05.2011 18:15:25
Век живи, век учись :) не знала :) тогда можно :)
 
 
 
#6
27.05.2011 01:58:32
Макрос обработает все ячейки столбца, в котором находится активная ячейка. Без установки шрифта.  
 
Sub gg()  
Dim c As Range, i&, m&  
With ActiveCell.EntireColumn.SpecialCells(xlCellTypeConstants, xlTextValues)  
   For Each c In .Cells  
       i = InStrRev(c, " ")  
       If i > m Then m = i  
   Next  
   For Each c In .Cells  
       i = InStrRev(c, " ")  
       c = Left(c, i) & Space$(m - i) & Mid$(c, i + 1)  
   Next  
End With  
End Sub
 
 
 
#7
27.05.2011 13:05:25
{quote}{login=Юрий М}{date=26.05.2011 06:12}{thema=Re: }{post}{quote}{login=Диана}{date=26.05.2011 06:10}{thema=}{post}идея с количеством символом не подойдет... разная ширина символов...{/post}{/quote}  
Никто не мешает заменить шрифт на моноширинный :-){/post}{/quote}  
 
Видите ли вся проблема в том, что шрифт: Arial.  
И нужно, чтобы все символы, что учитываются были приняты например за: "Х", тогда - все прокатит, мне кажется но хз какая сюда нужна формула =(
 
 
 
#8
27.05.2011 13:07:16
{quote}{login=Диана}{date=26.05.2011 06:12}{thema=}{post}а почему, например, не в разных столбцах? работать проще бы было, скорее всего...{/post}{/quote}  
 
Дело в том, что этот документ автоматически формируется в Oracle, а уж потом экспортируется в Excel и в Oracle нельзя добавить еще 1 столбец.
 
 
 
#9
27.05.2011 13:08:47
{quote}{login=The_Prist}{date=26.05.2011 06:19}{thema=}{post}Вот такой формулой можно:  
=ПОДСТАВИТЬ(A2;СЖПРОБЕЛЫ(ЛЕВСИМВ(ПРАВСИМВ(" "&ПОДСТАВИТЬ(СЖПРОБЕЛЫ(A2);" ";ПОВТОР(" ";60));60);60));)&ПОВТОР(" ";$C$2-ДЛСТР(A2))&СЖПРОБЕЛЫ(ЛЕВСИМВ(ПРАВСИМВ(" "&ПОДСТАВИТЬ(СЖПРОБЕЛЫ(A2);" ";ПОВТОР(" ";60));60);60))  
 
Да, шрифт должен быть моноширным. Например - Courier{/post}{/quote}  
 
пробелы - не выход =(  
нужен тег!
 
 
 
Страницы: 1
Читают тему
Наверх