Работа с Умной таблицей на VBA в Excel. Урок 1

[@dmprog1671]

Автору - огромное спасибо! И за "5 Интересных трюков" - в частности

[@denissavast]

Огромное спасибо Вам за материал! Успехов

[@edzu2601]

Спасибо БОЛЬШОЕ Вам за Ваш труд!!! Сто тысяч лайков!!!

[@ИванИваныч-б1ш]

Хорошие информативные видео! Спасибо. Интересная тема: слияние умной таблицы с документами Word с помощью vba!

[@TheMoliv]

Спасибо. Отличный урок, всё предельно понятно.

[@sergeyshvec9104]

Автору спасибо, отличный урок!

[@param994]

Спасибо большое за такое подробное объяснение, очень было полезно, объясняешь очень доступно и интересно. Прими мои благодарности, лайк и подписку)

[@yurd563]

Большое спасибо за видеоурок

[@lvrdns]

Подробно и доступно

[@photo_graf_khv]

Супер, годная инфа!

[@валерав-ц1ж]

Супер всё понятно.

[@FBI0777]

Если бы я мог, то насыпал бы тысячу лайков. Спасибо!

[@andreyageev864]

Всё чётко, по делу. Спасибо. Немного не понял, зачем финт с циклом, можно же так ListObj.Range.ColumnWidth = 10 Подписка однозначно!

[@АлексейКовалёв-ж9ы]

Спасибо за урок. Очень жду продолжения. Замечена одна неточность: при форматировании всех колонок считаешь количество строк, а форматируешь колонки. Насколько понимаю, правильным было бы записать ListObj.ListColumns.Count

[@easyexcellesson]

Да, спасибо, что указали на ошибку. Конечно надо было записать вместо ListRows - ListColumns

[@tigor66]

Автор не заметил ошибки, ибо, по случайности, у него оказалась (почти) квадратная таблица))) А я -то думаю, почему у меня выскакивает out of range

[@oliv17able]

Парни, можете написать функцию для подсчёта слова "собственно" в этом ролике? )). (Собственно, Автору лайк, однозначно)

[@сергейа-о9ь]

В видео допущен ошибка на 22:55 при установке ширины колонок. Количество столбцов нужно определять ListObj.ListColumns.Count, а не через свойство ListRows

[@liamtzinch5225]

Лол ... тоже заметил. Думал что он нарочно сделал чтобы кол колонок и строк были одинаковые

[@dshubad]

И в результате последняя колонка не меняла размер 23:55

[@DedEgor1945]

Извините, такой вопрос. В примере, когда делали ширину колонок 20. В первой строке цикла написали For i=1 to ListObjRows.Count Вопрос: Разве строки надо тут считать? Если мы колонки переделываем, то по логике надо колонки подсчитать и потом по количеству колонок прогнать цикл. А если у вас все правильно, поясните пожалуйста этот момент. Спасибо.

[@BOOM-ql5yb]

Супер

[@НиколайВасильевичМоголь]

Большое спасибо за урок! Очень ценно. А можно ли удалить сразу несколько смежных строк, указав диапазон? Или только по одной?

[@Rusia-16]

Самое нужное пропустил ))) Выделить группу ячеек в столбце!

[@ulfatmammadov4446]

A ode moon vzyat excel material kotoroe ti rabotaesh?

[@Nidvoraich]

Вопрос. Раз невозможно указать в одной книге два одинаковых имени умной таблицы - зачем каждый раз обращаться к ней через лист? Нет ли способа искать таблицу по имени сразу во всей книге? То есть - вместо ActiveWorkbook.Sheets("Лист1").ListObjects("Таблиццо") писать просто ActiveWorkbook.ListObjects("Таблиццо")

[@sssd3175]

Здравствуйте я заметил что у вас цвет рамки выделяемой ячейки зелёный, как можно это сделать подскажите пожалуйста, спасибо

[@Maslennikov_Alex]

Зачем добавлять строку в вба когда она и так автоматом добавляется? Тоже и со столбцом

[@ivansomatin9039]

Спасибо за Вашу работу, очень полезно, подскажите как сделать чтобы номер столбца который нужно добавить ListObj.ListColumns.Add 7 вставлялся автоматически например у меня лист "товар", ячейка "А15" = значение "6" ListObj.ListColumns.Add 7 (вместо "7" стало "6"). спасибо

[@ЮлияКаско]

Спасибо за информативное и понятное видео! Подскажите, а можно ли обратиться к столбцу не по его номеру, а по названию? Если да, то как это сделать? Буду Вам очень благодарна, если поможете со следующей задачей: как прописать формулу в умной таблице не по индексам ячейки (А2*В2), а по названиям столбцов?

[@easyexcellesson]

А в чем состоит задача? При использовании формул в умной таблице Названия столбцов подставляются автоматически

[@ЮлияКаско]

Easy Excel задача в том, что если добавится до запуска макроса столбец, то расчет макроса добьется, а если привязаться к названию столбца, то ничего менять не нужно

[@ПавелДмитриевич-н5с]

А как удалить дубликаты из умной таблицы средствами VBA? Записал макрос Sub Макрос6() ' ' Макрос6 Макрос ' Sheets("Архив").Select ActiveSheet.Range("Архив[#Все]").RemoveDuplicates Columns:=1, Header:=xlYes End Sub Но внутри другой, более сложной процедуры подобный код выдаёт ошибку 1004 "Application-defined or object-defined error"

[@ПавелДмитриевич-н5с]

Ответ нашёлся! Правильный код Sheets("Архив").Select ActiveSheet.Range("Архив").RemoveDuplicates Columns:=1, Header:=xlYes Непонятно, почему Запись Макросов записывает [#Все] и что это значит?

[@elnararzayeva811]

Здравствуйте! Почему у меня не получается? Выходит маленькое окошко и там написано: run-time error '9': Subscript out of range. Что это означает не поняла ?

[@easyexcellesson]

эта ошибка означает, что происходит попытка вызова несуществующего какого-то элемента. Точно сказать сложно, пока не увидишь ваш код. Можете выслать файл на почту, посмотрю - [e-mail]

[@elnararzayeva811]

Easy Excel хорошо вышлю скоро

[@elnararzayeva811]

Easy Excel я отправила на маил

[@user-hv8rh8nk9d]

А зачем при цикле for в конце писать “next 1”?

[@zhenyaelizarov6067]

FeSto Chan next i - это добавляет единичку в переменную i для следующей итерации

[@АлексейСоков-ь8и]

2021

[@АлексейБ-ф3я]

Как задать имя умной таблицы не жестко. Дело в том, что лист будет копироваться. И умная таблица на скопированном листе будет иметь другое имя - автоматически добавляется числовой индекс в конце. Если сходная была Таблица, то на скопированном листе будет Таблица1 и т.д. Макрос должен удалять и добавлять строки как в вашем видео как на исходном листе так и на скопированных. Проблема - обращаться при добавлении к умн. таблице на активном листе.

[@ПавелДмитриевич-н5с]

Не понятно как переименовать умную таблицу! На листе Платежи создал умную таблицу. Она сразу получила имя Таблица1 При попытке задать ей имя появился псевдоним ТабПлатежи, но Таблица1 тоже осталась. В диспетчере имён видно. что имени ТабПлатежи соответствует ДИАПАЗОН Таблица1 Пробую код: Set ShPayment = ThisWorkbook.Worksheets("Платежи") - работает Set ListObjPay = ShPayment.ListObjects("Таблица1") - работает Set ListObjPay = ShPayment.ListObjects("ТабПлатежи") - НЕ РАБОТАЕТ!

[@easyexcellesson]

Удалите одно имя. Диапазон таблицы должен быть задан только один раз.

[@ПавелДмитриевич-н5с]

Спасибо, уже сам разобрался. Сначала переименовал таблицу через "Диспетчер имён" на вкладке "Формулы". Потом еще раз всмотрелся в ролик, и понял свою ошибку. Я пытался переименовать умную таблицу через обычное поле для задания имён ячеек и диапазонов на вкладке "Главная". В результате получил объект типа Имя Диапазона, а не объект Имя Таблицы. У них в "Диспетчере имён" значки разные. А надо использовать на вкладке "Работа с таблицами/Конструктор" поле Имя таблицы. Таким образом имя существующей таблицы легко меняется 8-)

[@lesya5658]

Vba это что?

[@Nidvoraich]

Вижуал Бэйсик. Встроенный в офисные приложения язык программирования

[@ggfderererewd6377]

хватет уже слюной играться

[@keblysarvidas4235]

Мумбур люмбур И для чего всё это.

[@olgaikonnikova1196]

Простите. Я никак не пойму, зачем вообще она нужна эта умная таблица?. Вручную все как-то быстрее и проще делать..

[@Nidvoraich]

для экселя поле клеток, которое Вы видите - это просто поле клеток. Он не понимает, где началась таблица, где закончилась. Даже если Вы отформатировали всё границами и прочим. А умная таблица - это уже отдельный кусок на клеточном поле, про который Эксель точно в курсе, что это что-то единое. К умной таблице можно удобнее обращаться в формулах, например. В формуле будут уже не просто адреса ячеек, а название таблицы и столбца. Визуально это сильно упрощает чтение формул. Также Эксель понимает, что если в таблице добавилась строка - то нужно применить все формулы и форматирования как у верхней строки. Скорее всего - Вы мало работаете в Экселе, поэтому разница для Вас не так очевидна. С опытом поймёте

[@Алексей1-е2ф]

а не проще удалить вручную все и ничего не писать. До сих пор не могу понять зачем ВБА. Что в нем такого суперового? По мне так сложно все, писать на английском кучу строк что бы удалить строку. Обьясните мне тупому, зачем ВБА. Сколько не искал ответа нету(

[@Яна-э6ы9с]

kzbin.info/www/bejne/aXa7foSvoLt4d5Y

[@tigor66]

я каждый день привожу в нормальный вид одни и те же таблицы на протяжении 6 лет. Если б руками - давно с ума сошел бы)))

[@Nidvoraich]

пока таблиц мало - можно и ручками. Но если надо ежедневно как-то с ними работать (составлять единый отчёт по нескольким таблицам, например) то сильно проще один раз написать алгоритм, отладить его и дальше не париться.