Здравствуйте. На днях обнаружил такое явление. Подходит один из сотрудников, что не может сортировать таблицу по датам. Посмотрел на своем компе - все прекрасно сортируется, (хотя стоит "Сортировка от А до Я", а когда даты в правильном формате, там бывает "от старых к новым"). Выходит на моем компе даты в тектовом формате сортируются правильно, а у других (проверял еще на нескольких) не сортируются (понятно, что переведенные в правильный формат - они сортируются на всех). Всвязи с этим проверял версии Office 2016, поставил на другом компе такую же версию как у меня (16.0.4738,1000), и все равно не сортирует. В чем еще могут различаться наши компьютеры, что у меня сортирует текстовые даты, а у них нет? На примере Первая колонка с датами в текстовом формате, отсортирована на моем компе
Здравствуйте. Чего только не случается с компом от кривых рук пользователей. Короче в Excel перестала ставиться запятая, она каким-то магическим образом превращается в тире (или минус). Как это можно исправить? В настройках копался ничего такого не нашел. Спасибо
Не могу разобраться, помогите пожалуйста. В коде есть такая строка, которая образует массив из Range:
Код
a = Application.Transpose(Selection)
но, когда этот Selection только одна ячейка, как массив она не назначается переменной. Можно ли сделать так, чтобы какого бы размера не был Selection (даже если это лишь одна ячейка), передавался в переменную массива? Когда пробую так:
Код
a = Array(Application.Transpose(Selection))
получается наоборот, с одной ячейкой - нормальный массив (только индекс начинается с нуля, а не с одного, но это другой вопрос), а если несколько ячеек - массив (если это вобще массив) какой-то нестандартный, т.е. индексы a(0)(1), a(0)(2) и т.д. Что это такое? Знаю одномерный (5), двумерный (5, 9) и т.д. массивы, но такое (0)(1) вижу первый раз.
Здравствуйте. Пытаюсь сделать, чтобы при изменении значений в определенном столбце, менялись значения (есть макрос, который это делает) в правой смежной ячейке. Делаю так для примера:
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Target.Offset(0, 1) = Target.Row
End Sub
так он вводит номер строки изменяемой ячейки в 51 ячейку справа от неё, а я как бы указал одну ячейку отстоящей справа (Offset(0, 1)). Это такая особенность? Почему так происходит? Мне надо чтобы, например ввел я значение в столбец A, а в столбце B, напротив, появился номер этой строки (если это сработает, я свой макрос приделаю). Например вставил я значения из буфера обмена в столбец A, а в столбце B, напротив каждой строки появился номер каждой строки. Надеюсь понятно изложил. Спасибо
Здравствуйте Уважаемые. У меня никак не получается закрепить фигуру в Excel таким образом, чтобы она не скролилась вместе с листом, а всегда была перед глазами. Со вчеращнего дня ищу в интернете, нащел в свойствах фигуры поставить "Не пермещать и не изменять размеры" (см. скрин), но при этом фигура всё равно перемещается вместе с листом.
Здравствуйте Уважаемые. Два дня мучился, все таки написал код, который делает то, что мне нужно, но уж очень долго (сверяет до 2000 строк с более чем 8000 строками другой книги по определенным столбцам и при совпадении значений копирует строки в третью книгу). Есть ли способ добавить скорости этому макросу? Есть догадки, что помогут массивы, но с ними я на "Вы".
Здравствуйте. Почему этот код не присваивает значения диапазона, диапазону в другой книге. Целый день вожусь с этой строкой, ничего не пойму. Вроде есть макрос с такой же строкой, так он работает. Может ли его работоспособность зависеть от контекста? Вот код (лишнее убрал).
Код
Sub example1()
Range(Cells(1, 1), Cells(1, 3)) = Workbooks("тест.xlsx").Sheets("Лист1").Range(Cells(2, 1), Cells(2, 3)).Value
End Sub
Здравствуйте. Искал здесь и в яндексе, не нашел код VBA для проверки имени активной надстройки. Код addins.count возвращает кол-во надстроек находящихся в папке, а как обратиться именно к активным надстройкам? Спасибо.
Здравствуйте. Подскажите пожалуйста, как открыть книгу через VBA, чтоб она открывалась в фоне, а не становилась активной. Код ниже открывает книгу и делает ее активной. А надо чтобы оставалась открытой в фоне.
Помогите пожалуйста спецы. Есть ли в Excel способ перемещения выделенной области? Т.е. есть выделенный диапазон (смежный и/или не смежный), нужно выделить такую же область, отстоящую от выделенной на n-количество ячеек. Надеюсь изложил понятно. Пытался vba код написать - не получилось.
Здравствуйте. Помогите пожалуйста убрать запрос о сохранении скрытой книги PERSONAL.XLSB. Дело в том, что при выполнении определенного макроса в книге, вносятся изменения в скрытую книгу (PERSONAL.XLSB), и надо чтобы при закрытии активной книги (видимой, с которой в данный момент работаю и вместе с которой закрывается скрытая PERSONAL.XLSB), не выдавался запрос: "Сохранить внесенные изменения в личной книге макросов?" и просто закрывалась без сохранения. Знаю про модуль ЭтаКнига и процедуру: Private Sub Workbook_BeforeClose(Cancel As Boolean), но это работает при непосредственном закрытии активной книги. А мне надо чтобы скрытая PERSONAL.XLSB закрывалась вместе с последней рабочей книгой (ну как обычно), но без сохранения и запросов. Надеюсь изложил понятно. Спасибо.
Приветствую. Вот эта вот строка макроса: [I2] = InputBox("Начало периода", , DateSerial(Year(Date), Month(Date) + 1, 1)) вводит дату в текстовом формате. Что нужно исправить, чтобы дата вводилась в соответствующем формате?
Здравствуйте. Помогите пожалуйста допилить макрос. Нужно чтобы при выполнении условия, выделялись ячейки для дальнейшего удаления строк. Макрос такой: j = 1 While Cells(j, 3) <> "" If Cells(j, 3) > Cells(j, 1) Then Cells(j, 3).Select End If j = j + 1 Wend
Добрый вечер. Вот есть две колонки, мне надо определить данные в 1ой колонке идентичные тем, что во 2ой колонке. Я делаю так, выделяю обе колонки, условное формат-ие/повторяющиеся списки. Дело в том, что в 1ой колонке есть повторяющиеся значения, поэтому данный метод форматирует и те значения, которых нет во 2ой колонке, это мне не подходит. Мне нужно определить только те значения из 1ой колонки, которые встречаются во 2ой. Что подскажете?
Здравствуйте. Скажите пожалуйста возможно ли в формуле, например функции =РАБДЕНЬ("09.01.2013";10) сделать второй аргумент нарастающим, т.е. чтобы число 10 при протягивании формулы менялось на 11, потом на 12,13,14,15 и т.д.
Добрый день. Подскажите пожалуйста. Есть список людей (с номерами паспортов и т.д.) и есть второй список, мне нужно выявить всех людей в первом списке, которые есть во втором списке. Как можно осуществить этот поиск не по одному человеку, а всех сразу?
Здравствуйте. В столбце имеются данные (город, улица), перед ними необходимо добавить район (т.е. надо добавить одно и то же перед имеющимися данными). Как это можно сделать? Заранее спасибо.
Здравствуйте Знатоки. Есть столбик с паспортными данными (серия и номер), а надо теперь серию и номер поместить в разные столбики. Как сделать (может с помощью найти и заменить) так, чтобы последние шесть цифр в столбике остались, а первые убрать? Надеюсь понятно изложил и без образца.
Уважаемые, такая проблема. Есть список людей (во вложении) и например в столбце № пенс., некоторые номера записаны со знаком "тире" перед последними двумя цифрами (или вообще без ничего), а мне нужен там пробел. Часа три сегодня сидел, и вручную исправил несколько страниц, а их там под 50 (около 3000 чел.). Как это можно сделать по быстрее? Или без макроса не обойтись?
Здравствуйте знатоки. Такая проблема. Есть список людей (образец прикрепил), который меняется каждый месяц (кто-то исключается, кто-то добавляется). Для того чтобы изменять список (удалять, добавлять, сортировать, нумеровать) мешают две строки в конце каждой страницы. Вот как сделать так, чтобы убрать эти две строки (автоматом с помощью макроса или может как-то еще), произвести все манипуляции со списком и вернуть их обратно (каждую на свое место, а последние две в конец отредактированного списка) со всеми формулами естественно.