Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 164 След.
ВПР в макросе не по полному совпадению, Макрос, который заменяет ВПР, ищет только по полному совпадению, использование частичного совпадения не получается
 
Цитата
Ульяна XXX: как преобразовать макрос
1. не говорите про формулы, когда используете код или получите решение только по ним
2. Ваш макрос работает на словарях, а они не поддерживают маску, необходимую для поиска по частичному совпадению
3. Как реализовать: забрать данные в массив и бегать по нему проверяя каждый элемент вот так If arr(r,c) like "*часть слова*" Then
3.1. Можно без массива искать с помощью метода Range.Find, как в инструменте "Найти" - он поддерживает подстановочные символы маски

Название темы: VBA. Поиск по частичному совпадению
Изменено: Jack Famous - 10 Июл 2020 16:34:39
Реквизиты для благодарностей — в профиле
Автофильтром с помощью макроса фильтровать остатки по складам.
 
А ещё код макроса хорошо бы видеть))
Реквизиты для благодарностей — в профиле
Требуется сотрудник для работы в Санкт-Петербурге
 
Приветствую!
Ищу себе замену в связи со сменой места работы

Что делать:
  • обрабатывать сметы (выгрузки из сметных программ, в основном "Гранд-Смета") определённым образом, приводя их к универсальному "плоскому" виду
  • вести "базу данных" в виде связанных умных таблиц в одной книге (один файл - один объект)

Кто нужен:
  • "аналитический склад ума", что бы это ни значило)))
Предстоит понять логику работы системы учёта, а не просто выучить, "что нажимать"
  • специальность или опыт, связанный со строительством будет преимуществом
  • знание VBA будет преимуществом

Какие навыки нам нужны:
  • высокий уровень владения MS Excel
  • умение работать в основных офисных программах MS Office и с PDF

Условия:
  • ЗП ~60 тыс (уточняется с начальником по итогам собеседования)
  • большая компания с офисом в 3х минутах от метро Пролетарская в БЦ "Вант" с объектами по всей России
  • оформление по ТК, как положено - отпуска, больничные и т.д.
  • 5/2 с 9 до 18
Изменено: Jack Famous - 10 Июл 2020 10:59:45
Реквизиты для благодарностей — в профиле
О погоде
 
k61, круто очень  8-0
Реквизиты для благодарностей — в профиле
ячейки с зада :), и такое бывает
 
БМВ, ты забыл, что у нас декада нумерологии на форуме?  ;)
P.S.: с возвращением и бегом за Работой  :D
Реквизиты для благодарностей — в профиле
Обновление 18.06
 
БМВ, переживаю, что тебе накинули пару лишних сообщений и теперь ты совершенно незаслуженно вырвался в топ  :D
Реквизиты для благодарностей — в профиле
Баг или фича? Почему значение #d# для Excel'я является числом
 
sokol92, приветствую, Владимир! Это проблема, поскольку в данных такие фрагменты "текста-как-чисел" содержатся, но обработаться должны как текст, а не число
Реквизиты для благодарностей — в профиле
Баг или фича? Почему значение #d# для Excel'я является числом
 
мда…Excel не перестаёт фокусничать, а то что на скрине (от Владимира ZVI) вообще треш, конечно — что хочу, то и ворочу  :evil:
для меня это, безусловно, проблема и баг, нежели фича, т.к. теперь придётся дополнительные проверки вводить  :(
спасибо за разъяснения!  :idea:

UPD: к счастью, решается с помощью простой и быстрой проверки
Код
If IsNumeric(x)
   If x<>--x Then MsgBox "Текст-Как-Число"
End If
Изменено: Jack Famous - 7 Июл 2020 22:52:19
Реквизиты для благодарностей — в профиле
Баг или фича? Почему значение #d# для Excel'я является числом
 
Доброго времени суток, Планетяне!
Заказчик тут обнаружил интересную фичу (или багулину)…

Если писать 1e5, то это экспонициальный ввод числа - понятно, но почему литера d так себя ведёт?
Подробности на скринах и в названии темы

P.S.: замена .Value2 на .Value ничего не меняет
Реквизиты для благодарностей — в профиле
Делимся..., разным
 
Цитата
msi2102: зайчихи
а с чего вы взяли, что это зайчихи?
Отец разве не может с сыном или дочей сидеть?
Реквизиты для благодарностей — в профиле
Подбор значений для получения определенной суммы. Прописать % скидок
 
serj., пишу в личку
Заказ свободен - требуется непростая комбинаторика (подбор значения) в цикле
Увеличивать бюджет ТС не готов
Изменено: Jack Famous - 6 Июл 2020 22:16:27
Реквизиты для благодарностей — в профиле
Правильная обработка ошибок при вызове процедур
 
bakid, здравствуйте
Я делаю примерно так
общий принцип - если что-то вызываем внутри основного макроса, то у меня в 99% это сделано в виде булевой функции. В таком случае, в главном макросе можно легко определить, всё ли пошло по плану. В главном макросе в конце назначаем включение всего отключенного и закрытие всего открытого - переходим по метке туда в случае проблем при вызове подпроцедур

Ссылки:
Передача значений переменных из одного макроса в другой. Вызов макроса из макроса
Передача параметров процедурам и функциям в VBA, необязательные (optional) параметры, передача по ссылке (ByRef) и по значению (ByVal), применение ссылок при передаче параметров
Изменено: Jack Famous - 6 Июл 2020 11:42:36
Реквизиты для благодарностей — в профиле
Как ускорить свой код в 1000 раз
 
Цитата
БМВ: для меня достаточно этого
да уж — "убийца" офиса без нормальной поддержки  :D
Реквизиты для благодарностей — в профиле
Быстрое выделение колонок с одинаковым названием
 
Цитата
БМВ: мат часть   тут
там скупо - я видел
Реквизиты для благодарностей — в профиле
Как отсортировать 5 миллионов строк?
 
bedvit, браво  :idea:
Наши полномочия здесь всё
Реквизиты для благодарностей — в профиле
Быстрое выделение колонок с одинаковым названием
 
k61, приветствую, Карен!
Не знал, что так можно - спасибо  :idea:
Матчасть
Реквизиты для благодарностей — в профиле
Аналог БД
 
Цитата
Андрей VG: ах, кружите меня
:D
Реквизиты для благодарностей — в профиле
Удаление дубликатов одновременно в строках и колонках Excel таблицы
 
A A, проверяйте

Выделить диапазон (для примера - A1:C10) и нажать кнопку (или запустить макрос иным образом)
Код
Реквизиты для благодарностей — в профиле
Посчитать количество рабочих часов в промежутке суток (вход/выход через турникет), много условий
 
Цитата
kilativ: Переводи
Цитата
kilativ: Как ты определил
у нас принято к незнакомым людям обращаться "на вы"
Реквизиты для благодарностей — в профиле
Быстрое выделение колонок с одинаковым названием
 
Цитата
Captain Nemo: Помогите пжл сделать такой макрос, кто умеет
гуглите "удалить столбцы vba" - наример вот тут есть

БМВ,  :D
Изменено: Jack Famous - 3 Июл 2020 13:55:01
Реквизиты для благодарностей — в профиле
Быстрое выделение колонок с одинаковым названием
 
Captain Nemo, вам нужен макрос обратного цикла по столбцам с удалением
Реквизиты для благодарностей — в профиле
В функции Replace ошибка при указании заменяемого текста
 
Anton Anton, пожалуйста)
Название темы: VBA. Как заменить кавычки
Реквизиты для благодарностей — в профиле
Облегчение базы данных в Эксель, Как сделать чтобы БД в эксель работала шустрее
 
Цитата
Alex77: Скажите, что Вы имели ввиду?
например, в статье Николая Владимировича Самый быстрый ВПР наглядно показана разница
Изменено: Jack Famous - 3 Июл 2020 10:38:20
Реквизиты для благодарностей — в профиле
Подтягивание данных из другого файла
 
Цитата
Лена11: выдает ошибку на
перед строкой, на которой выскакивает ошибка напишите
MsgBox Target.Address & " — " & MV.Address и скажите, что выдаст окно — т.к. Target у вас не может быть нигде, кроме как в 10 столбце, то Offset(,-7) не подведёт, а значит дело в MV

P.S.: зачем Debug.Print в 11 строке, если вы в него ничего не пишете?…
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim MV As Range

If Target.Count > 1 Then Exit Sub
If Intersect(Target, Range("J3:J500")) Is Nothing Then Exit Sub
Set MV = Worksheets("маты").Columns(1).Find(Target.Value2, , , xlWhole)
If MV Is Nothing Then Exit Sub

msgbox mv.address

k = MV.Value
Target.Offset(0, -7) = MV.Offset(0, 1) & " " & MV.Offset(0, 2) & " " & MV.Offset(0, 3)
Target.Offset(0, -6) = MV.Offset(0, 4)
End Sub
Изменено: Jack Famous - 3 Июл 2020 10:27:43
Реквизиты для благодарностей — в профиле
Power Query. Фильтрация столбца по текущему году.
 
Цитата
Михаил Лебедев: А я уже подумал, что 2020 объявили "Годом Power Query"
а я усомнился, что PQ всего годик  :D
Реквизиты для благодарностей — в профиле
Аналог БД
 
Цитата
govorun: А если мимо Access-а пройти?
Цитата
Jack Famous: можно и на листах Excel'я хранить, и в текстовых файлах
Реквизиты для благодарностей — в профиле
Поячеечное сравнение двух таблиц
 
Цитата
Михаил Лебедев: Мамонты - вымерли, крысы - нет
лучше умереть мамонтом, чем жить крысой  8)
Реквизиты для благодарностей — в профиле
В функции Replace ошибка при указании заменяемого текста
 
Cells(j, 1) = Replace(Cells(j, 1), "data-live", "")
текст, заключается в кавычки - по ОДНОЙ с двух сторон

если вы хотите ЗАМЕНИТЬ кавычки, то можно (чтобы не путаться) писать через функцию СИМВОЛ - 34 для кавычки
Cells(j, 1) = Replace(Cells(j, 1), Chr(34) & " data-live", "") - эта команда удалит такое сочетание символов — " data-live
Изменено: Jack Famous - 3 Июл 2020 09:58:16
Реквизиты для благодарностей — в профиле
Поячеечное сравнение двух таблиц
 
Цитата
Михаил Лебедев: ТС всё равно что-то молчит, видать - не судьба...
у нас тут на форуме крысы перехватчики есть - за копейки делают херню. Может и этот ТС попался на удочку "быстро/дёшево/отлично"  :D
Реквизиты для благодарностей — в профиле
Аналог БД
 
govorun, зависит от объёма - можно и на листах Excel'я хранить, и в текстовых файлах, и в более традиционных местах типа Access
Реквизиты для благодарностей — в профиле
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 164 След.
Наверх