Выделить все пустые ячейки в умной таблице и применить очистку ячеек
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
|
30.09.2025 13:04:58
gling, так дело в том что там нет вроде невидимых символов, но после импорта они почему то не считаются пустыми.
Дело в том что первый столбец не должен иметь ширину больше 10, что собственно и прописано в настройках листа но в этом столбце после импорта есть длинные значения, которые не вмещаются в ширину столца, и если вручную очистить ячейки столбца B, тогда все значения столбца A начинают отображаться полностью |
|
|
|
|
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
|
30.09.2025 12:38:57
Никита Дворец, я в прикрепленном шаблоне закоментировал все функции фильтрации и очистки
и после импорта вижу что xlCellTypeBlanks в столбцах B и C не видит пустых ячеек. Если вручную очистить пару ячеек в этих столбцах, тогда видит и выделяет их как положено p.s. но в столбцах B и C достаточно пустых ячеек после импорта
Изменено: - 30.09.2025 12:48:04
|
|
|
|
|
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
|
30.09.2025 12:11:55
Никита Дворец, спасибо за внимание. Прописал так:
Set rng = Range("A1:C48") но выделение происходит только в столбце A Хотелось бы выделить пустые ячейки сразу во всех столбцах |
|
|
|
|
Выделить все пустые ячейки в умной таблице и применить очистку ячеек
|
30.09.2025 11:38:27
Уважаемые форумчане, подскажите пожалуйста как оптимизировать код макроса?
В прикреплённых файлах макрос импортирует данные, а затем: 1. Включает Фильтр 2. Отфильтровывает пустые ячейки в 1-м столбце и выделяет их 3. Затем очищает выделенные ячейки командой Selection.ClearContents затем выполянются такие же действия по 2-му столбцу и затем по 3-му Вроде всё работает, но хотелось бы оптимизировать макрос. По форумам узнал что есть возможность выделять пустые ячейки без фильтра через SpecialCells(xlCellTypeBlanks), но как применить не понимаю. И ещё вот один из продвинутых специалистов VBA предлагает какой-то хитрый метод:
P.S. Прикреплённые файлы должны лежать в одной папке |
|||
|
|
|
Импорт данных даже если первая ячейка пустая
|
25.09.2025 11:34:12
Sanja, большое вам спасибо!
|
|
|
|
|
Импорт данных даже если первая ячейка пустая
|
25.09.2025 11:16:53
Уважаемые форумчане, помогите пожалуйста исправить код макроса чтобы импорт данных работал даже если первая ячейка пустая.
Для теста, оба файла должны лежать в одной папке. В файле Шаблон.xlsb зелёная кнопка вызывает импорт из файла Заказ.xlsx Если в файле Заказ.xlsx в ячейке D7 или R7C4 будет прописана цифра, то всё работает, но если пусто, то срабатывает ошибка Run-time error '9': Subscript out of range. И по кнопке Debug выделяется желтым строка макроса:
|
|||
|
|
|
Макрос: удалить скрытые автофильтром строки
|
24.09.2025 14:13:06
МатросНаЗебре, большое спасибо!
|
|
|
|
|
Макрос: удалить скрытые автофильтром строки
|
24.09.2025 13:01:02
Jack Famous, спасибо большое!
Макрос из сообщения работает превосходно, но как сделать чтобы он работал не на всех листах, а только на определённой умной таблице? |
|
|
|
|
Объединить формулу с формулой диапазона
|
11.08.2025 10:13:41
ПавелW,
|
|
|
|
|
Объединить формулу с формулой диапазона
|
11.08.2025 10:04:18
ПавелW, работает! Огромное вам спасибо!
|
|
|
|
|
Объединить формулу с формулой диапазона
|
11.08.2025 06:43:37
Уважаемый форучане, добрый день!
В прикреплённом файле на листе Brand формула диапазона выводит требуемый результат, но такой результат я смог получить только при обращении к столбцу Test на листе 1С, в котором содержится формула. Помогите пожалуйста объединить формулу. Задача избавиться от столбца Test на листе 1С.
Изменено: - 11.08.2025 06:44:04
|
|
|
|
|
Условное форматирование на динамическом массиве
|
07.08.2025 15:00:02
ПавелW, спасибо вам большое! Работает!
|
|
|
|
|
Условное форматирование на динамическом массиве
|
07.08.2025 14:49:13
Msi2102, да, я именно из урока узнал, что в моём случае нельзя использовать умную таблицу для динамического массива. Просто у меня немного другая задача.
Изменено: - 08.08.2025 05:57:40
|
|
|
|
|
Условное форматирование на динамическом массиве
|
07.08.2025 14:32:11
Sanja, я честно говоря не понимаю о чём вы. Ткните пожалуйста носом, что бы понять где именно я должен записать эту ссылку?
|
|
|
|
|
Условное форматирование на динамическом массиве
Всплывающая подсказка при наведении курсора на картинку
Макрос для импорта данных из трёх книг + несколько функций во время импорта, и несколько функций после импорта.
|
20.02.2025 18:30:49
Hugo, большое вам спасибо!
|
|
|
|
|
Макрос для импорта данных из трёх книг + несколько функций во время импорта, и несколько функций после импорта.
|
18.02.2025 19:05:17
Уважаемые форумчане, добрый день!
Есть три файла, которые лежат в разных местах: Making.xlsb Goods.xlsb и Данные1С.xlsx В файле Шаблон.xlsb требуется докрутить имеющийся макрос, который копировал бы данные из выше перечисленных файлов. Очень важно, чтобы сбор данных из этих файлов работал по такому же принципу как это сделано в прилагаемом файле Шаблон.xlsb Первым делом из файла Making.xlsx, затем из файла Goods.xlsx, затем из Данные1С.xlsx Количество строк может меняться во всех файлах. Если какого-то файла нет в указанном месте, то молча пропускаем его и тянемем данные из следующего. Если нет всех трёх файлов, тогда выдаём сообщение "данные для импорта отсутствуют" Данные для импорта начинаются так: для Making.xlsb по всей видимости нужно прописывать так: .Range(.Cells(18, 3), .Cells(.Cells(.Rows.Count, 3).End(xlUp).Row, .Cells(18, .Columns.Count).End(xlToLeft).Column)).Value Для Goods.xlsb так: .Range(.Cells(8, 4), .Cells(.Cells(.Rows.Count, 4).End(xlUp).Row, .Cells(8, .Columns.Count).End(xlToLeft).Column)).Value для Данные1С.xlsx в текущем макросе уже прописано так: .Range(.Cells(13, 2), .Cells(.Cells(.Rows.Count, 2).End(xlUp).Row, .Cells(13, .Columns.Count).End(xlToLeft).Column)).Value Мне, как человеку не знающему VBA нужно, чтобы было интуитивно понятно каким образом я мог бы в перспективе добавить файлы и прописать координаты для импорта. Все существующие функции обязательно нужно оставить. И нужно чтобы они работали с данными из всех файлов. Нужно добавить функцию, которая работала бы примерно так же как и функция с листом Price А именно: сравнить код с кодом на листе Name и во всех совпадающих строках изменить Артикул, Торговую марку и Наименование согласно данных на листе Name Нужно усовершенствовать существующую функцию: "получить Торговую марку" Существующая функция получает в столбце Наименование результат, и этот результат она должна сравнить с существованием полученного слова на листе Brand в столбце Бренды 1С Если есть абсолютное совпадение (обязательно абсолютное совпадение, т.к. есть бренд "ARGO" и есть бренд "CARGO", т.е. я имею ввиду что макрос должен найти точное совпадение), тогда пишем результат, если совпадения нет, тогда результат берём из столбца Дополнительное описание (Бренд) Во время импорта нужно чтобы все данные в столбец артикул записывались в текстовом формате. Можно конечно выделить весь столбец и формат текста сделать текстовым, но я уверен, что понимающий сможет сделать текстовыми только те ячейки, в которые будут тянуться артикулы. Хочу обратить внимание на то, что в файлах, из которых импортируются данные, в столбце Артикул есть ячейки с числовым форматом, и для таких ячеек очень нужен макрос, который правильно конвертировал бы число в текст. В файле Данные1С.xlsx приведено только несколько примеров в строках 19, 20 и 21 т.е. нули содержатся в начале артикула, а импортируются данные к сожалению без нулей. В общем нужен желательно универсальный макрос, который позволил бы правильно конвертировать такие числа в текст. Также во время импорта нужна функция, которая ищет в столбце Базовая единица измерения (ЕИ), следующие значения: "м" и "п.м.", и меняет их на "пог.м.", а "компл" меняет на "к-т" Отдельные функции, которые не должны применяться во время импорта данных, т.е. функции или макросы, которые будут выполняться по инициативе пользователя уже с существующими данными на листе: Нужна функция, которая проверяет столбцы: Торговая марка, Артикул, Остаток и RUB без НДС, на наличие пустых ячеек и значения 0. Если такие ячейки будут найдены, то нужно выдать диалог с сообщением "Пустая ячейка" и выделить первую найденную ячейку, и по нажатию на кнопку выделить следующую ячейку с ошибкой, и т.о. пролистать все такие ячейки, или нажать на кнопку Отмена и остановить показ ячеек с ошибкой. Также нужна ещё одна проверочная функция, которая ищет в столбце Артикул, скобки "(" ")" "[" "]", кавычки "'" "'", символ собаки "@" и запятые "," и если найдена такая ячейка в которой содержатся скобки, кавычки, собаки или запятые, то нужно выдать диалог с сообщением "недопустимые символы" и выделить первую найденную ячейку, и по нажатию на кнопку выделить следующую ячейку с ошибкой, и т.о. пролистать все такие ячейки, или нажать на кнопку Отмена и остановить показ ячеек с ошибкой. Так же нужна функция, которая проверяла бы столбцы: Торговая марка и Наименование, на наличие слова "Stellox", и удалила бы все строки, в которых найдено это слово. Бюджет на всё это дело 3000 рублей РФ
Изменено: - 20.02.2025 08:10:18
|
|
|
|
|
Макрос для сохранения стиля таблицы при преобоазовании формул в значения, Макрос для сохранения стиля таблицы при преобоазовании формул в значения и удаления пустых строк таблицы
|
06.02.2025 12:01:07
МатросНаЗебре, большое вам человеческое спасибо!
|
|
|
|
|
Макрос для сохранения стиля таблицы при преобоазовании формул в значения, Макрос для сохранения стиля таблицы при преобоазовании формул в значения и удаления пустых строк таблицы
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 14:04:24
Sanja, благодарю
|
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 13:54:46
Sanja, так мне не составит труда поставить последнюю версию Office.
Подскажите формулу пожалуйста. |
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 13:49:41
Sanja, вы тут самый активный, подскажите пожалуйста, какую формулу для решения этой задачи использовали бы именно вы?
|
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 13:44:43
Sanja,
Требуется получить значение при совпадении трёх других значений этой же строки |
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 13:31:39
Sanja,
Функция ИНДЕКС в паре с функцией ПОИСКПОЗ не повзоляет получить нужный результат. Нужна другая формула. |
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 09:57:43
БМВ, Счастливчик, с русскими именами функций сработало! Спасибо большое!
Странно. Неужели моей версии excel нужны именно русские имена функций? |
|
|
|
|
Получить значение при совпадении трёх других значений этой же строки
|
30.01.2025 08:58:51
БМВ, поменял все запятые на точку с запятой:
|
|||
|
|
|