powered by simpleCommunicator - 2.0.39     © 2025 Programmizd 02
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как можно добавать символ к уже емеющимуся тексту в Excel
22 сообщений из 22, страница 1 из 1
как можно добавать символ к уже емеющимуся тексту в Excel
    #33312360
Фотография dartvaider
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Существует множество ячеек , в которых есть различные данные, можно ли как либо глобально добавать в них один символ?
например:
ячейки:
1
2
3
4
5
в них нужно добавить символ пробел после чиел и перед числами.
что бы было :
1
2
3
4
5
можно ли как либо это сделать глобально?
Заранее благодарен,спасибо!
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33312431
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Probel()
    Dim cel As Range
    Set cel = ActiveSheet.UsedRange
    For Each cel In cel.Cells
        If IsNumeric(cel.Value) Then _
            cel.NumberFormat = "@": cel = " " & cel.Value & " "
    Next cel
End Sub
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33316020
Фотография dartvaider
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vkodor
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Probel()
    Dim cel As Range
    Set cel = ActiveSheet.UsedRange
    For Each cel In cel.Cells
        If IsNumeric(cel.Value) Then _
            cel.NumberFormat = "@": cel = " " & cel.Value & " "
    Next cel
End Sub


хмм чё то не работает может быть я не понял что то?
я имую ввиду к каждой строчки каждой ячейки добавить по 2 пробела по бокам- можно ли это сделать с помощью этого макроса?
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33317034
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Sub Probel()
    Dim cel As Range
    Set cel = ActiveSheet.UsedRange
    For Each cel In cel.Cells
        If IsNumeric(cel.Value) Then  ' находит число в ячейке
            ' если в ячейке число то 
            cel.NumberFormat = "@" ' переводит ячейку в текстовый формат
            cel = " " & cel.Value & " " ' добавляет к числу два пробела 
    Next cel
End Sub

А зачем добавлять прбелы?
обычно от них избавляются 
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33331776
Фотография dartvaider
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vkodor
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Sub Probel()
    Dim cel As Range
    Set cel = ActiveSheet.UsedRange
    For Each cel In cel.Cells
        If IsNumeric(cel.Value) Then  ' находит число в ячейке
            ' если в ячейке число то 
            cel.NumberFormat = "@" ' переводит ячейку в текстовый формат
            cel = " " & cel.Value & " " ' добавляет к числу два пробела 
    Next cel
End Sub

А зачем добавлять прбелы?
обычно от них избавляются 


Вот именно мне нужно добавить пробелы перед записями и после них для того чтобы можно было потом сохранить в тхт файл и открыть его через Excel с разделителем (пробелом)
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33331833
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а ты сохрани в текстовый файл с разделителем пробелом и все :)
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33331848
Фотография dartvaider
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
White Owlа ты сохрани в текстовый файл с разделителем пробелом и все :)Ну так и делаю, но это нужно делать когда пробелы есть! а если перед словом я или после него пробела нет, тогда ничего не получиться!
Если сделать новую ячейку , поставить в ней пробел и растянуть её на все записи, потом поставить эту ячейку между словами, между которыми требуется пробел , для дальнейшего сохранения и открытия с разделенными пробелами, то потом после сохранения в тхт и открытия ничего не выходит :(
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33331862
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
по моему, ты занимаешься фигней.
Давай с самого начала, что у тебя есть? И что тебе нужно получить?
Добавлять пробелы к текстам в ячейке - точно не нужно, ибо бессмысленно.
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33332451
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Операторы чтения и записи
VBA предоставляет несколько операторов чтения и записи данных в файл.
Представленные далее операторы используются для чтения данных из файла с последовательным доступом
input — читает из файла указанное количество символов
■ Input # — читает файл в виде последовательности переменных; переменные разделяются запятой. :
■ Line input # — читает файл построчно (строки разделяются символами возврата каретки и/или перевода строки).
Для записи данных в файл с последовательным доступом используются два оператора
■ Write # — записывает последовательность значений, где каждое значение отделено запятой и находится в кавычках. Если оператор завершается точекой с запятой после каждого значения не будет вставляться последовательность возврат каретки/ перевод
строки. Данные,'записанные с помощью оператора Write #, обычно читаются из файла с помощью оператора input #.
■ Print # — записывает последовательность значений, где каждое значение отделено символом пробела. Если завершить оператор точкой с запятой, то после каждого значения не будет вставляться последовательность возврат каретки/перевод строки. Данные, записанные с помощью оператора Print #, обычно читаются с помощью оператора Line Input # или оператора Input.
Примеры управления текстовыми файлами
В данном разделе содержится несколько примеров, демонстрирующих ра
бы управления текстовыми файлами.
Импортирование данных из текстового файла
Следующий пример читает текстовый файл и размещает каждую строку данных ную ячейку (начиная с активной ячейки).
Sub ImportDataO
.Set ImpRng = ActiveCell
Open "c:\windows\desktop\textfile.txt" For Input As #1
r = 0 ...
Do Until EOF{1)
Line Input #1, data
ActiveCell.Offset(r, 0) = data
r = r + 1 Loop Close #1
End Sub
В большинстве случаев данная процедура не принесет пользы, так как каждая строка данных просто помещается в отдельную ячейку. Но можно воспользоваться командой
Данные-Текст по столбцам для разбора данных по столбцам.

цитата из книги Джона Уокенбах
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33332794
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Прога vkodor прекрасно работает и добавляет пробел слева и справа.
В чем проблемма то dartvaider ?
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33691960
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Помню, что делал енто, НО КАК?
НАДА в Экселе к данным определенных ячеек добавить спереди и после...
Например в ячейке число 12, надо чтобы было "=12*0,5"
Подскажите как енто сделать с помощью "найти-заменить" или исчо как, но НЕ ПРОГРАММНО !!!
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33692044
5631
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
=" "&A1&" "
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33692086
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
5631=" "&A1&" "
так исчо не пробовал, поясни - A1 - енто ссылка на ячейку (адрес)???
Спасибо
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33692497
5631
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть ячейка A1 c текстом "ААААА".
В ячейке В1 набираем =" "&A1&" ". Нажимаем на Enter. Получаем в B1 " AAAAA ".
Копируем формулу на весь столбец B:B. Получаем в нем, что хотим. "&"- это то же самое, что сцепить().
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33692545
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Таким способом и его разновидностями и я могу, надо, чтобы без вспом ячеек (без буфера).
Но за идею =" "&A1&" " (хотя и цикл.ссылка), спасибо
Буду усложнять =" "&A1&" " с номером строки - авось найду способ ....
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33692576
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SteplerПомню, что делал енто, НО КАК?
НАДА в Экселе к данным определенных ячеек добавить спереди и после...
Например в ячейке число 12, надо чтобы было "=12*0,5"
Подскажите как енто сделать с помощью "найти-заменить" или исчо как, но НЕ ПРОГРАММНО !!!
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  


А СТАНДАРТНОЙ ЗАМЕНОЙ ВОСПОЛЬЗОВАТЬСЯ НЕЛЬЗЯ?
МЕНЮ "ПРАВКА - ЗАМЕНИТЬ"
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33940804
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
5631=" "&A1&" "

Combining Text and Formatted Values

To combine text with a formatted value:

1. In cell A1, enter the text IBM owe Limelight Media Inc.
2. In cell A2, enter the number 4222.
3. In cell A3, enter the text for services supplied in March 2004.
4. In cell A5, enter the formula:
=A1&" "& TEXT(A2,"$ #,##0") &" "&A3

To format the number to present it in thousands:

Change the number format to "$ #, K":
=A1&" "& TEXT(A2,"$#, K") &" "&A3
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33940808
Фотография Ivan33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33942163
Taranaga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SteplerПомню, что делал енто, НО КАК?
НАДА в Экселе к данным определенных ячеек добавить спереди и после...
Например в ячейке число 12, надо чтобы было "=12*0,5"
Подскажите как енто сделать с помощью "найти-заменить" или исчо как, но НЕ ПРОГРАММНО !!!
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
А это наверное "Специальеная вставка" -> умножить...
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #33942383
mg@
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mg@
Гость
Taranaga SteplerПомню, что делал енто, НО КАК?
НАДА в Экселе к данным определенных ячеек добавить спереди и после...
Например в ячейке число 12, надо чтобы было "=12*0,5"
Подскажите как енто сделать с помощью "найти-заменить" или исчо как, но НЕ ПРОГРАММНО !!!
Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Присутствовали ли Вы, когда Вас фотографировали?  
А это наверное "Специальеная вставка" -> умножить...
если в ячейке значение, то надо делать так:
1. Написать в каконибудь другой ячейке такую формулу: =0,5
2. скопировать эту ячейку в буфер
3. выделить ячейку с числом 12
4. специальная вставка - формулы+умножить. В результате получится формула =12*(0,5)
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
как можно добавать символ к уже емеющимуся тексту в Excel
    #39180957
batunin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как прибавить к содержимому ячейки I1 содержимое ячейки BC2 и соответственно оно изменялось в зависимости от числа которое будет в BC2
...
Рейтинг: 0 / 0
как можно добавать символ к уже емеющимуся тексту в Excel
    #39180960
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
чем не устраивает обычная формула
=I1+BC2
?
...
Рейтинг: 0 / 0
22 сообщений из 22, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как можно добавать символ к уже емеющимуся тексту в Excel
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]