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

Вход

Регистрация

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

 

= Мир MS Excel/автоматический перенос строк в конец документа - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
автоматический перенос строк в конец документа
greenrilo Дата: Вторник, 04.04.2023, 09:23 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

2013
Как настроить автоматический перенос строк в конец документа при условии что в одной из ячеек появляется любая дата? Есть план работ My WebPage и необходимо чтоб при появлении любого значения в столбце "Н", чтобы вся строка к которой относится ячейка автоматически уходила в конец таблицы, за надпись "Отгруженные"
 
Ответить
СообщениеКак настроить автоматический перенос строк в конец документа при условии что в одной из ячеек появляется любая дата? Есть план работ My WebPage и необходимо чтоб при появлении любого значения в столбце "Н", чтобы вся строка к которой относится ячейка автоматически уходила в конец таблицы, за надпись "Отгруженные"

Автор - greenrilo
Дата добавления - 04.04.2023 в 09:23
Gustav Дата: Вторник, 04.04.2023, 12:25 | Сообщение № 2
Группа: Админы
Ранг: Участник клуба
Сообщений: 2797
Репутация: 1161 ±
Замечаний: ±

начинал с Excel 4.0, видел 2.1
Примерно такой скрипт:
[vba]
Код
function onEdit(e) {
    var rng = e.range;
    var sheet = rng.getSheet();

    if (sheet.getSheetName() == "апрель 2023"
        && rng.getColumn() == sheet.getRange('H:H').getColumn()
        && rng.getRow() >= 7 // чтобы случайно не снести заголовок таблицы
        && String(rng.getValue()).length > 0) {

        var rowFrom = rng.getRow();
        var rowTo = sheet.getLastRow() + 1;
        sheet.moveRows(sheet.getRange(rowFrom + ':' + rowFrom), rowTo);
        sheet.getRange('H'+rowTo).activate();
    }
}
[/vba]


МОИ: Ник, Tip box: 41001663842605
 
Ответить
СообщениеПримерно такой скрипт:
[vba]
Код
function onEdit(e) {
    var rng = e.range;
    var sheet = rng.getSheet();

    if (sheet.getSheetName() == "апрель 2023"
        && rng.getColumn() == sheet.getRange('H:H').getColumn()
        && rng.getRow() >= 7 // чтобы случайно не снести заголовок таблицы
        && String(rng.getValue()).length > 0) {

        var rowFrom = rng.getRow();
        var rowTo = sheet.getLastRow() + 1;
        sheet.moveRows(sheet.getRange(rowFrom + ':' + rowFrom), rowTo);
        sheet.getRange('H'+rowTo).activate();
    }
}
[/vba]

Автор - Gustav
Дата добавления - 04.04.2023 в 12:25
  • Страница 1 из 1
  • 1
Поиск:

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