Автор Tim задал вопрос в разделе Другие языки и технологии
Excel добавление и удаление строчек (макрос) и получил лучший ответ
Ответ от Полосатый жираф Алик[гуру]
Вытащи мякину из головы и попробуй НОРМАЛЬНО задать вопрос. Ты в курсе, что каждые столбец, строка или ячейка в Excel имеет свой адрес?
Ответ от Abram Pupkin[гуру]
"...Нужно что бы макрос автоматически удалял или добавлял строки..."- в начало/конец таблицы ?- с охранением формул ?- заполнять аналогично второй таблицы или оставить строчки пустыми ?- придерживаться заданного формата или формат по умолчанию ?P.S.Учитывая уровень ваших знаний - вам надо не просто дать подсказку, а предоставить готовое решение Для этого надо знать ( а лучше видеть) где расположена таблица-образец
"...Нужно что бы макрос автоматически удалял или добавлял строки..."- в начало/конец таблицы ?- с охранением формул ?- заполнять аналогично второй таблицы или оставить строчки пустыми ?- придерживаться заданного формата или формат по умолчанию ?P.S.Учитывая уровень ваших знаний - вам надо не просто дать подсказку, а предоставить готовое решение Для этого надо знать ( а лучше видеть) где расположена таблица-образец
Ответ от FreedomS[гуру]
примерно выглядит так Sub КопированиеФормата ()'' КопированиеФормата Макрос'' Sheets("Лист2").Select Selection.End(xlToLeft).Select Selection.End(xlUp).Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Sheets("Лист1").Select Selection.End(xlUp).Select Selection.End(xlToLeft).Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=FalseEnd Subвставляет форматирование из Листа 2 в Лист 1более конкретно опиши что нужно получишь более конкретный ответ
примерно выглядит так Sub КопированиеФормата ()'' КопированиеФормата Макрос'' Sheets("Лист2").Select Selection.End(xlToLeft).Select Selection.End(xlUp).Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Sheets("Лист1").Select Selection.End(xlUp).Select Selection.End(xlToLeft).Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=FalseEnd Subвставляет форматирование из Листа 2 в Лист 1более конкретно опиши что нужно получишь более конкретный ответ
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Excel добавление и удаление строчек (макрос)
Помогите найти информацию о панелях в Excel. заранее пасиба!!
В Excel включены удобные графические панели инструментов. Щелчок на кнопке панели инструментов
подробнее...
спросили в Дата Даты
Подскажите, как сделать автоматическое добавление текущей даты в ячейку в excel???
Вариант Ивана Леконтцева не очень удачный. Он, конечно, работает, но при открытии книги на
подробнее...
Подскажите, как сделать автоматическое добавление текущей даты в ячейку в excel???
Вариант Ивана Леконтцева не очень удачный. Он, конечно, работает, но при открытии книги на
подробнее...
Нужна автосортировка excel
Автоматическая сортировка, кодом, который вам предложили е очень удачный в принципе. Дело в том,
подробнее...
Как сохранить новый источник данных для сводных таблиц Excel 2007?
сохрани за ново, к примеру с цифрой 2, удали старый, а новый переименуй как был
подробнее...