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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 731 След.
Округление целого числа до большего
 
Разделить, округлить, умножить.
Выполнить поиск по значению InputBox в другой книге
 
Цитата
VVS_001 написал:
как можно решить проблему в случае если это так
- никак. Открывайте в дном приложении.
Цитата
VVS_001 написал:
Не понял о каких строках идет речь, но везде, где есть какие то ссылки для переменной или данных прописал полный путь.
- я говорил о первом коде, где нет номеров строк т.к. он так и не оформлен, а в этой версии это 13 и 14. Но этот код уже сильно другой...
Вообще если ликвидировать все селекты и активации - код будет намного прозрачнее, и может быть его можно будет читать и так с листинга, без наличия файла...
Поиск значений и вывод их в отдельный список
 
Цитата
tanfen написал:
Возможно ли провернуть без макросов?
- если устраивает видеть в том же столбце - то это стандартный функционал фильтра. В соседний столбец можно вручную скопировать отфильтрованное.
Выполнить поиск по значению InputBox в другой книге
 
Цитата
VVS_001 написал:
если 1 книга была ранее открыта  пишет object required.
- возможно книги открыты в разных экземплярах приложениях.
Ну а по оформлению - если код оформлен, то там есть номера строк, и никому их считать не нужно, чтоб указать где возможна ошибка.
Вот в этих двух строках - ну совершенно по коду не понятно в какой книге берёте эти значения.
Изменено: Hugo - 27 Янв 2020 19:04:25
Почему ВПР не находит данные, которые есть в таблице?
 
Проверить не могу, но думаю как всегда виноват последний параметр.
При копировании ячейки без заливки из эксель в ворд появляется цветной фон
 
Я копирую без всякой заливки.
Вывод уникальных значений по условию в одну ячейку.
 
Есть в копилке тоже уже написанное, работает "из коробки":
Код
=VLOOKUPCOUPLE(B:F;1;K4;5;"
")
Изменено: Hugo - 25 Янв 2020 14:06:36
Сравнение значений в двух таблицах и выделение несовпадающих значений
 
Если что - пример файла есть на кибере, хотя у них в правилах кажется этого нет :)
Выполнить поиск по значению InputBox в другой книге
 
Нужно явно указывать ячейки какой книги подразумеваете в строках там в середине кода (считать лень, код не оформлен...)
Выдача значений через запятые, Выдача по ID значений через запятую.
 
Вот. Но без кода, он у меня в надстройке, а Ваш - в копилке :)
Изменено: Hugo - 23 Янв 2020 16:27:26
Выдача значений через запятые, Выдача по ID значений через запятую.
 
Для таких задач давно написаны UDF, например вот такая:
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=2&TID=10&TITLE_SEO=10
Если результат нужен точно как в примере, с повторами, - то так:
Код
=VLOOKUPCOUPLE(Исходная!A:B;1;A2;2;",";0)

Но можно выводить и без повторов.
Изменено: Hugo - 23 Янв 2020 15:59:42
Ошибка в вычитании переменных Double
 
Обычно округляют, но можно и так:
Код
If CDec(A - B) <= CDec(C) Then MsgBox ("условие выполняется") Else MsgBox ("условие НЕ выполняется")

If --Trim(A - B) <= --Trim(C) Then MsgBox ("условие выполняется") Else MsgBox ("условие НЕ выполняется")

Изменено: Hugo - 23 Янв 2020 15:01:22
Как загнать значение с сайта в ячейку (vba)
 
Есть замечание по первому коду, по строке
Код
lastrow = tblsheet.UsedRange.Rows.Count

когда-нибудь нарвётесь на то, что usedrange будет начинаться не с первой строки, и кстати последствия этой ошибки можете вообще и не заметить...
Синтаксис оператора цикла For/Next
 
Код
For n = 1 To n = 5
- это не правильно, сверьтесь с справочником.
сохранение массива vba в несколько файлов по условию
 
За минуту уже проверили? :)
сохранение массива vba в несколько файлов по условию
 
Вот скрипт (практически макрос). Исходный файл положить как в нём прописано в "c:\Downloads\table.csv", результаты будут рядом. Запускать просто стандартно дабкликом по файлу. Если конечно работаете под Виндой и выпонение скриптов разрешено.
Для предыдущей темы этот скрипт не годится, тут работа только с такими csv!!!
Код
    Const ForReading = 1
    Const ForWriting = 2

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFile = objFSO.OpenTextFile("c:\Downloads\table.csv", ForReading)

    strText = objFile.ReadAll
    objFile.Close
    a = Split(strText, vbNewLine)

    Set d = CreateObject("Scripting.Dictionary"): d.comparemode = 1
    For i = 1 To UBound(a)
        If Len(a(i)) Then
            t = Trim(Split(a(i), ";")(5))
            d.Item(t) = d.Item(t) & "|" & i
        End If
    Next

    For Each k In d.keys
        strText = a(0) & vbNewLine
        For Each el In Split(Mid(d.Item(k), 2), "|")
            strText = strText & a(el) & vbNewLine
        Next
        Set objFile = objFSO.CreateTextFile("c:\Downloads\" & k & ".csv", ForWriting)
        objFile.Write strText
        objFile.Close
    Next

Файл запаковал, незапакованный форум не принимает.
Изменено: Hugo - 21 Янв 2020 13:52:44
сохранение массива vba в несколько файлов по условию
 
Если нужно из одного csv сделать несколько - можно обойтись без Экселя, можно скриптом. Просто переложить нужные строки. Чуть позже найду время.
Объединение значений в столбцах по условию
 
Можно с помощью UDF из копилки форума.
Записать csv из массива vba по условиям
 
Пожалуйста.
Будут примеры csv - пишите.
Изменено: Hugo - 21 Янв 2020 02:17:13
Записать csv из массива vba по условиям
 
Цитата
Hugo написал:
Теперь покажите какие файлы из этого нужно получить
Записать csv из массива vba по условиям
 
Это три большие разницы, правда xls и xlsx внешне левым верхним углом похожи :)
А csv - это совершенно другое, это по сути обычный текстовый файл.
Выбирайте то, что Вам нужно - потому что для csv и xls/xlsx нужно писать совершенно разные макросы в части генерации файлов.
Записать csv из массива vba по условиям
 
Речь о том что непонятно что Вам нужно - csv или xlsx.
Записать csv из массива vba по условиям
 
Цитата
Антон написал:
Как сохранить данные в csv файлы
- я просил эти файлы.
Записать csv из массива vba по условиям
 
Теперь покажите какие файлы из этого нужно получить (нет там никаких Название=>Арт1...)
Записать csv из массива vba по условиям
 
Можно иначе:
1. сперва создать объект с данными
2. затем открывать файлы для записи и их наполнять из объекта.

А вот что там да как, что из чего должно получиться - информации нет...
Присвоить значение переменной
 
Как по мне - нечего там суммировать...
Через VBA вставить формулу в ячейку таблицы
 
anmendel,  это не так как сказал Дмитрий! Он говорил ведь про стиль ссылок? В первой строке поста!
VLOOKUP3 на всех листах
 
Цитата
SSL написал:
все найденные значения вносил в одну ячейку с разделителем пробел или знаком /символом
- для этого написана VLOOKUPCOUPLE(), см. в копилке:
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=2&TID=10&TITLE_SEO=10
Изменено: Hugo - 17 Янв 2020 19:47:23
Макрос сохранения в csv UTF-8
 
Пошукал по форуму, нашёл своё же древнее (вернее не моё, но пост мой), проверяйте.
Изменено: Hugo - 17 Янв 2020 13:54:19
Копирование конкретных ячеек из закрытой книги
 
Создайте ДВА массива, перебирайте одновременно оба по индексу х.
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 731 След.
Наверх