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

Вход

Регистрация

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

 

= Мир MS Excel/Замена по условию - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Замена по условию (Формулы/Formulas)
Замена по условию
Snow Дата: Вторник, 14.05.2019, 14:04 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 110
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007,2010
Здравствуйте, товарищи.
Очень нужна ваша помощь. Есть огромный ехел в котором нужно заменить дату (таких замен нужно будет 800 шт)

Нужна формула, чтобы дата составления = дате принятия в бух учет
К сообщению приложен файл: 3588370.xlsx (10.4 Kb)


Сообщение отредактировал Snow - Вторник, 14.05.2019, 14:14
 
Ответить
СообщениеЗдравствуйте, товарищи.
Очень нужна ваша помощь. Есть огромный ехел в котором нужно заменить дату (таких замен нужно будет 800 шт)

Нужна формула, чтобы дата составления = дате принятия в бух учет
Автор - Snow
Дата добавления - 14.05.2019 в 14:04
китин Дата: Вторник, 14.05.2019, 14:08 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7014
Репутация: 1073 ±
Замечаний: 0% ±

Excel 2007;2010;2016
Snow, Дайте теме более конкретное название в соответствии с Правилами форума

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
СообщениеSnow, Дайте теме более конкретное название в соответствии с Правилами форума
Автор - китин
Дата добавления - 14.05.2019 в 14:08
and_evg Дата: Вторник, 14.05.2019, 14:42 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация: 78 ±
Замечаний: 0% ±

Excel 2007
Здравствуйте в Ячейку N4
Код
=AF6
 
Ответить
СообщениеЗдравствуйте в Ячейку N4
Код
=AF6
Автор - and_evg
Дата добавления - 14.05.2019 в 14:42
Snow Дата: Вторник, 14.05.2019, 15:00 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 110
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007,2010
Цитата and_evg, 14.05.2019 в 14:42, в сообщении № 3 ()
в Ячейку N4
=AF6

и так 800 раз? %)
 
Ответить
Сообщение
Цитата and_evg, 14.05.2019 в 14:42, в сообщении № 3 ()
в Ячейку N4
=AF6

и так 800 раз? %)
Автор - Snow
Дата добавления - 14.05.2019 в 15:00
and_evg Дата: Вторник, 14.05.2019, 15:11 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация: 78 ±
Замечаний: 0% ±

Excel 2007
А где у вас эти 800 раз? В примере не видно
 
Ответить
СообщениеА где у вас эти 800 раз? В примере не видно
Автор - and_evg
Дата добавления - 14.05.2019 в 15:11
Snow Дата: Вторник, 14.05.2019, 15:14 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 110
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007,2010
Цитата Snow, 14.05.2019 в 14:04, в сообщении № 1 ()
Здравствуйте, товарищи.
Очень нужна ваша помощь. Есть огромный ехел в котором нужно заменить дату (таких замен нужно будет 800 шт)

Нужна формула, чтобы дата составления = дате принятия в бух учет

yes
 
Ответить
Сообщение
Цитата Snow, 14.05.2019 в 14:04, в сообщении № 1 ()
Здравствуйте, товарищи.
Очень нужна ваша помощь. Есть огромный ехел в котором нужно заменить дату (таких замен нужно будет 800 шт)

Нужна формула, чтобы дата составления = дате принятия в бух учет

yes
Автор - Snow
Дата добавления - 14.05.2019 в 15:14
sboy Дата: Вторник, 14.05.2019, 15:38 | Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 724 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Помогите нам помочь Вам.
Цитата and_evg, 14.05.2019 в 15:11, в сообщении № 5 ()
где у вас эти 800 раз?

в одном файле 800 листов? на одном листе 800 дат? 800 файлов?

Яндекс: 410016850021169
 
Ответить
СообщениеДобрый день.
Помогите нам помочь Вам.
Цитата and_evg, 14.05.2019 в 15:11, в сообщении № 5 ()
где у вас эти 800 раз?

в одном файле 800 листов? на одном листе 800 дат? 800 файлов?
Автор - sboy
Дата добавления - 14.05.2019 в 15:38
Snow Дата: Вторник, 14.05.2019, 16:42 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 110
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007,2010
Цитата sboy, 14.05.2019 в 15:38, в сообщении № 7 ()
Помогите нам помочь Вам.
:girl_smile:
800 документов на одно листе (сформированных в программе)и в каждом из них надо сделать такую замену
К сообщению приложен файл: 4572398.xlsx (29.9 Kb)


Сообщение отредактировал Snow - Вторник, 14.05.2019, 16:44
 
Ответить
Сообщение
Цитата sboy, 14.05.2019 в 15:38, в сообщении № 7 ()
Помогите нам помочь Вам.
:girl_smile:
800 документов на одно листе (сформированных в программе)и в каждом из них надо сделать такую замену
Автор - Snow
Дата добавления - 14.05.2019 в 16:42
sboy Дата: Среда, 15.05.2019, 09:05 | Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 724 ±
Замечаний: 0% ±

Excel 2010
Чтобы сделать это формулой, необходимо руками выделить все 800 ячеек через Ctrl, ввести формулуand_evg и нажать Ctrl+Enter
Или макросом замену делать

Яндекс: 410016850021169
 
Ответить
СообщениеЧтобы сделать это формулой, необходимо руками выделить все 800 ячеек через Ctrl, ввести формулуand_evg и нажать Ctrl+Enter
Или макросом замену делать
Автор - sboy
Дата добавления - 15.05.2019 в 09:05
_Boroda_ Дата: Среда, 15.05.2019, 13:14 | Сообщение № 10
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16674
Репутация: 6479 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Запустите такой макрос
[vba]
Код
Sub Макрос1()
    r_ = Cells(1).SpecialCells(xlLastCell).Row
    c_ = "N"
    x_ = "Дата составления"
    Application.ScreenUpdating = 0
    Application.Calculation = 3
    For i = 1 To r_
        If Cells(i, c_) = x_ Then
            Cells(i + 1, c_).FormulaR1C1 = "=R[3]C[18]"
        End If
    Next i
    Application.Calculation = 1
    Application.ScreenUpdating = 1
End Sub
[/vba]
К сообщению приложен файл: 4572398_1.xlsm (36.5 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеЗапустите такой макрос
[vba]
Код
Sub Макрос1()
    r_ = Cells(1).SpecialCells(xlLastCell).Row
    c_ = "N"
    x_ = "Дата составления"
    Application.ScreenUpdating = 0
    Application.Calculation = 3
    For i = 1 To r_
        If Cells(i, c_) = x_ Then
            Cells(i + 1, c_).FormulaR1C1 = "=R[3]C[18]"
        End If
    Next i
    Application.Calculation = 1
    Application.ScreenUpdating = 1
End Sub
[/vba]
Автор - _Boroda_
Дата добавления - 15.05.2019 в 13:14
Snow Дата: Среда, 15.05.2019, 16:26 | Сообщение № 11
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 110
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007,2010
 
Ответить
Сообщение
Автор - Snow
Дата добавления - 15.05.2019 в 16:26
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Замена по условию (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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