Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Вставка функции в конец ячейки - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Вставка функции в конец ячейки
dudic Дата: Среда, 13.05.2015, 13:07 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 40% ±

Excel 2003
Как вставить функцию в конец строки и чтобы текст из ячейки не удалялся?
Если ячейка (С1) не пустая, то в ячейку (А1) после фамилии пишется "смс"
Если ячейка (Е1) не пустая, то в ячейку (А1) после фамилии пишется "майл"
Или пишется и то, и то
К сообщению приложен файл: 1234.xls (14.0 Kb)


Сообщение отредактировал dudic - Среда, 13.05.2015, 19:12
 
Ответить
СообщениеКак вставить функцию в конец строки и чтобы текст из ячейки не удалялся?
Если ячейка (С1) не пустая, то в ячейку (А1) после фамилии пишется "смс"
Если ячейка (Е1) не пустая, то в ячейку (А1) после фамилии пишется "майл"
Или пишется и то, и то

Автор - dudic
Дата добавления - 13.05.2015 в 13:07
китин Дата: Среда, 13.05.2015, 13:13 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
макросом.(каков вопрос-таков ответ) deal пример то где?


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщениемакросом.(каков вопрос-таков ответ) deal пример то где?

Автор - китин
Дата добавления - 13.05.2015 в 13:13
ShAM Дата: Среда, 13.05.2015, 19:54 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 1347
Репутация: 249 ±
Замечаний: 0% ±

Excel 2010
Как-то так:
[vba]
Код
Sub aaa()
     For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
         If Cells(i, 3) <> "" Then Cells(i, 1) = Cells(i, 1) & ", смс"
         If Cells(i, 5) <> "" Then Cells(i, 1) = Cells(i, 1) & ", майл"
     Next i
End Sub
[/vba]
К сообщению приложен файл: dudic.xls (34.5 Kb)
 
Ответить
СообщениеКак-то так:
[vba]
Код
Sub aaa()
     For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
         If Cells(i, 3) <> "" Then Cells(i, 1) = Cells(i, 1) & ", смс"
         If Cells(i, 5) <> "" Then Cells(i, 1) = Cells(i, 1) & ", майл"
     Next i
End Sub
[/vba]

Автор - ShAM
Дата добавления - 13.05.2015 в 19:54
setania Дата: Четверг, 14.05.2015, 10:50 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 20% ±

Excel 2010
Добрый день. Помогите пожалуйста волшебной формулой. При составлении графика работы сотрудников на месяц, в ячейку вносится временной диапазон с 10.00 до 22.00 например. В конце месяца хочется получить три колонки, в одной кол-во отработанных дней, во второй кол-во отработанных часов, в третьей кол-во отработанных ночных часов (после 22.00) Буду очень признательна, таким талантливым людям!!
[moder]Не подлизывайтесь! Лучше Правила форума прочитайте и сделайте так, как там написано.
В этой теме ответы на этот вопрос будут удалены.


Сообщение отредактировал _Boroda_ - Четверг, 14.05.2015, 11:04
 
Ответить
СообщениеДобрый день. Помогите пожалуйста волшебной формулой. При составлении графика работы сотрудников на месяц, в ячейку вносится временной диапазон с 10.00 до 22.00 например. В конце месяца хочется получить три колонки, в одной кол-во отработанных дней, во второй кол-во отработанных часов, в третьей кол-во отработанных ночных часов (после 22.00) Буду очень признательна, таким талантливым людям!!
[moder]Не подлизывайтесь! Лучше Правила форума прочитайте и сделайте так, как там написано.
В этой теме ответы на этот вопрос будут удалены.

Автор - setania
Дата добавления - 14.05.2015 в 10:50
dudic Дата: Четверг, 14.05.2015, 18:34 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 40% ±

Excel 2003
Неужели так сложно?! И что мне с этим делать?! Как редактировать, как менять и вообще, где этот макрос находится? А если строчек 500?
 
Ответить
СообщениеНеужели так сложно?! И что мне с этим делать?! Как редактировать, как менять и вообще, где этот макрос находится? А если строчек 500?

Автор - dudic
Дата добавления - 14.05.2015 в 18:34
_Boroda_ Дата: Четверг, 14.05.2015, 20:32 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16895
Репутация: 6613 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Пишите в соседней ячейке вот такую формулу
Код
=A1&ЕСЛИ(C1<>"";" смс";"")&ЕСЛИ(E1<>"";" майл";"")
, протягивайте ее вниз насколько нужно и, если все это таки нужно иметь в столбце А, то копируйте полученное и вставляйте через спецвставку значениями в столбец А
К сообщению приложен файл: 1234_1.xls (24.0 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеПишите в соседней ячейке вот такую формулу
Код
=A1&ЕСЛИ(C1<>"";" смс";"")&ЕСЛИ(E1<>"";" майл";"")
, протягивайте ее вниз насколько нужно и, если все это таки нужно иметь в столбце А, то копируйте полученное и вставляйте через спецвставку значениями в столбец А

Автор - _Boroda_
Дата добавления - 14.05.2015 в 20:32
dudic Дата: Пятница, 15.05.2015, 00:18 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 40% ±

Excel 2003
Да, это хорошо! Спасибо! То, что надо.
 
Ответить
СообщениеДа, это хорошо! Спасибо! То, что надо.

Автор - dudic
Дата добавления - 15.05.2015 в 00:18
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!