Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » qweewert
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Считать с Input диапазон и вставить значения на лист
 
#
12.04.2018 10:49:15
Доброго времени суток!

Пишу через VBA лог изменений в txt файл формата Названия листа | $AO$461 | значение. Потом я эти текстовые данные копирую в другой файл ексель, мне нужно прочитать эти данные с помощью VBA и перенести в соответствующие ячейки на новом листе,-указание выше
+ Как можно применить те же  действие но только по выделеной области в листе  Input?

Большое спасибо!
Изменено: qweewert - 12.04.2018 13:43:42
qweewert
 
Перейти    
ListBox поиск на по мере набирания текста, - Источник CONCATENATE ячейка, Можно как-то сделать как в динамическом фильтре ячейке L10 файла .
 
#
31.12.2017 20:50:29
Спасибо за идею Дмитрию Тарковскому тиц[/P]

Поиск через фильтр ячейка L10 ищет как угодно, что продемонстрировал на видео (видео по 25 сек).  Фишка в том, что ищет как угодно и со второго слова и даже с куска слова со средины….  https://photos.app.goo.gl/y963eU91zMKO2l913

А как такой поиск реализовать через форму. На данном примере настроил по нажатию на 1 столбец ячейке (красн.яч.). У меня получилось сделать только поиск по одному столбцу и только если набирать с первой буквы ((((
Можно как-то сделать как в динамическом фильтре на примере ячейки L10?
Изменено: qweewert - 01.01.2018 19:03:53
qweewert
 
Перейти    
Макрос для записи ЛОГ изменений ячеек в txt файл по всей книге не работает в ThisWorkbook, Если вставить, как есть то ничего не происходит.
 
#
27.12.2017 14:51:19

Доброго времени суток.

Макрос создает файл LOG.txt в корне где пишет изменения.

Для того чтоб работал нужно прописывать в каждый лист, а можно ли сделать чтоб работал для всех листов. Если вставить, как есть то ничего не происходит.

Очень благодарен

Код
Private Sub Worksheet_Change(ByVal Target As Range)

    ActiveSheet.Calculate
  Close #1
    filepath = ThisWorkbook.Path & "\"
    'Filename = Left(ThisWorkbook.Name, InStr(ThisWorkbook.Name, ".") - 1) & "_log.txt"
    Filename = "LOG_EXCEL.txt"
    Open filepath & Filename For Append As #1

  
    On Error Resume Next
    Print #1, Application.UserName; " " & Date & " " & Time & " "; ThisWorkbook.Name & " "; ActiveSheet.Name & "   " & " cell " & Target.Address & " : ;ñòàðå = ;[" & original & "], íîâå = ;[" & Target.Value & "]"
    On Error Resume Next
    Close #1
    original = Target.Text
End Sub

Изменено: qweewert - 27.12.2017 14:53:46
qweewert
 
Перейти    
UserForm проблема с выборкой даты из ячейки до 9 числа .
 
#
23.12.2017 17:13:25
Прошу помощи

Видео проблемы
https://www.dropbox.com/s/zp7vvnaqxbkjdko/screencast%202017-12-23%2015-50-08.mp4squeeze.mp4?dl=0
UserForm. Проблема с выборкой даты из ячейки до 9 числа , каждый раз когда загружает значение из ячейки: меняет местами дни и месяц.
Не знаю, как обойти.

Очень благодарю заранее.
qweewert
 
Перейти    
Как в UserForm вводить значение все сразу
 
#
19.12.2017 19:28:47
Здравствуйте

Имеется форма ввода каждый параметр вводиться поочередно по умолчанию, а у меня таблица очень большая и это занимает секунд 5 (каждый пункт вводиться в ячейку и идет небольшой перечет.
manual calculate не могу применить
На листе ввода вшиты макросы которые делают изменение только ячеек на 3 столбце вверх и вниз от курсора потому менять параметр manual calculate не могу нужно чтоб вводило все сразу если это возможно конечно….

Как сделать так чтоб вводилось за один заход?
пример. как есть
1. вводит CDate
2. вводит exp
3. вводит inc
Код
Cells(myRow, 2) = CDate(Me.MyDate)
Cells(myRow, 3) = exp.Value
Cells(myRow, 4) = inc.Value

Как нужно:
1. вводит CDate,exp,inc
Код
Cells(myRow, 2) = CDate(Me.MyDate), Cells(myRow, 3) = exp.Value, Cells(myRow, 4) = inc.Value

Заранее очень благодарен!
Изменено: qweewert - 19.12.2017 19:41:00
qweewert
 
Перейти    
VBA автосохранение каждые н минут + автовыход если ничего не происходит через н минут, В примере файл постоянно открывается заново, прописал stop Ontime, но все равно открывается после закрытия
 
#
23.06.2017 16:21:50
Добрий день уважаемие гуру екселя!!!!!!
Прошу помощи

Как только прописываю  ActiveWorkbook или ThisWorkbook  .Close файл начинает заново открываться.
Вроде в BeforeClose все прописал

Что нужно добиться:
Если открывать несколько файлов где прописан данный макрос, когда вносишь изменения, файл автоматически сохранєтса каждые 5 мин, если файл изменился.
Єсли нет изменений в файле, то он закрывается через н минут, сохранив при этом изменения, если они есть.
Хочу сократить количество автосохранения переменной “Если файл изменился”
Планирую использовать эти макросы одновременно в нескольких открытых файлах. Ели будут конфликтовать Ontime как можно обойти?
Буду очень благодарен за помощь не владею языком программирования уже всю голову сломал методом тыка)))


Очень важно чтоб работала функция If ThisWorkbook.Saved = False Then, чтоб сохранялся только если есть изменения.

Рабочий пример прикрепляю
Вот где брал идею

http://www.cpearson.com/excel/OnTime.aspx

Изменено: qweewert - 23.06.2017 16:46:46
qweewert
 
Перейти    
Макрос для нескольких (определенных) листов книги
 
#
27.01.2013 17:50:16
Прошу помощи

Как изменить созданий макрос, который можно легко применить сразу к нескольким листам. А то каждый раз когда создаю макрос нужно вручную активировать на каждый лист. Поискал здесь, но применить не могу
Вкратце
Нужен шаблон (шапка) на определение листи куда будут вставлятса макрос записаний автоматом.

Заранее большое спасибо
Изменено: qweewert - 23.09.2015 00:28:56 (Уточнение)
qweewert
 
Перейти    
Автоматическое добавления строк на определенных листах.
 
#
21.07.2012 17:35:36
1. Нужно  добавить или удалить  строку в листе "ЦЕНА" так чтоб автоматически  происходило в тех же местах в листах "Заг" и Ан", но лист "ВАП" не задействувалса.  
 
2. Н ужно, чтобы при заполнении строк всегда ниже оставалась одна непрописанная, чтобы при необходимости внести туда данные и после этого опять появлялась бы ниже одна не прописанная.
qweewert
 
Перейти    
Как записать SUMPRODUCT если в диапаз..формул. есть текст или символ
 
#
02.01.2012 19:26:06
SUMPRODUCT((АЗ!$B142=ЦУМ!$A$4:$A$296)*(ЦУМ!R$4:R$296)  
 
Проблема,- если в диапазоне случайно поставить запятую или букву при заполнении, конечная формула вылетает с ошибкой, и найти ошибку бывает оч. тяжело,как можно ето обойти?  
 
В примере в листе ЦУМ есть намеренной символ в диапазоне которой не дает считать формулу.
qweewert
 
Перейти    
Как зделать,чтоб sumproduct работал только с видимыми ячейками? (sumproduct+subtotal)
 
#
30.11.2011 20:09:33
Зарание благодарен.
qweewert
 
Перейти    
Сумма (в тексте и числах) "если значение на 100% совпадает"
 
#
02.10.2011 15:29:09
Небольшой пример.  
Если есть (код 0000_ 0333ррр0456а) и (код 0456).    
 
Если в запросе код 0456а  
формула почитает только его тоесть 1-ий код пропустит.  
 
См. вложение.
qweewert
 
Перейти    
Сума значений по коду товара єсли вводить его не полностью
 
#
02.10.2011 02:48:06
Хотелось бьі решить єто с минимальным размером файла, если таких формул в листе много может есть смысл делать как то по другому,поскольку буду делать много зависимостей например: есть артикул-один, и несколько вариантов под артикулов, на последнх цена разная, которую в свою очередь и должна считает формула......  
 
 
Вот такая проблемка.  
 
 
 
 
 
Прикрепляю файл
qweewert
 
Перейти    
ВПР поиск + неточное совпадение Microsoft Office Excel
 
#
02.10.2011 00:19:56
Помогите пожалуйста, часто приходится пользоваться функцией ВПР, но возникает проблема что искомая ячейка не полностью совпадает с забитой. С текстом мне удальсь управитца но когда нужно нвйти число то не работает.  
Креплю файл.
qweewert
 
Перейти    
Страницы: 1
Наверх