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

Страницы: 1
Пр найденному номеру позиции прибавить или отнять значения именно в исходной таблице
 
#
02.04.2019 12:23:01
Dyroff, большое Вам спасибо! Сейчас буду испытывать, однозначно сократит расход времени !
Всё работает как и хотел.. Сейчас попробую вникнуть, как работает!)
Изменено: mike422 - 29.10.2019 17:54:01
 
Перейти    
Пр найденному номеру позиции прибавить или отнять значения именно в исходной таблице
 
#
29.03.2019 12:58:33
Совершенно верно )! Поиск по позиции, отображение сделал, а вот прибавить или вычесть значения из исх.табл. уже не осиливаю.

Подумал может этому есть реализация макросом, но банальная запись действий, естественно приводит к изменению значений всё в той же ячейке которая была в записи..
Вот макрос который делал ( ищет 22 позицию, смещается до столбца  "Кол-во" копирует данные в одну из ячеек следом суммирует / вычитает эти данные с количеством на которое они изменились, и вставляет новое значение в исходную таблицу)   но он разумеется выполняет действия именно по указанным на момент записи значениям, а значение 22 было взято из ячейки M14 которое естественно будет каждый раз разным..
Код
Sub Макрос3()
    Range("H4:J4").Select
    Selection.Copy
    Range("R1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("H5:J5").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("S1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("R2").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R[-1]C+RC[-2]-RC[-1]"
    Range("S1").Select
    Selection.Copy
    Cells.Find([B]What:="22"[/B], After:=ActiveCell, LookIn:=xlValues, LookAt:= _
        xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    Range("R2").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("D24").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("R1:S2").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("F8").Select
End Sub
Изменено: mike422 - 29.10.2019 17:54:33
 
Перейти    
Пр найденному номеру позиции прибавить или отнять значения именно в исходной таблице
 
#
29.03.2019 12:43:39
Те ячейки лишь показывают значения в реальных ячейках столба "кол-во", если делать просто +-  "реальные" значения в столбце останутся прежними.

В день вношу изменения порядка 3 раз в каждую таблицу. CTRL+F тоже казалось бы быстро,  но на практике этот вариант показал себя лучше и удобнее, выводить значения реальных ячеек я понял как, а вот как изменять ещё бы эти реальные значения пока не понял, пока только листаю к строке N вручную складываю и вычитаю.  
 
Перейти    
Пр найденному номеру позиции прибавить или отнять значения именно в исходной таблице
 
#
29.03.2019 11:40:45
Добрый день.
Есть таблица с запчастями, сделал вместо поиска ctrl+f рядом ячейки где ввожу артикул по нему сразу отображает количество на складе, и строка в которой сделана запись, а вот чтобы изменить (прибавить или убавить N количество хотел сделать рядом две ячейки + и - ( Например в плюс записал 183, нажал кнопку макроса, текущее значение было изменено с учётом нового, минус аналогично) чтобы по нажатию кнопки исполняло макрос добавления или вычитания из конкретной ячейки, но начал пробовать делать записи макроса, понял что не тяну.

Прошу помочь, заранее благодарю. (возможно конечно многого хочу, если такое сделать не особо то легко, напишите, буду вручную делать, просто таких файлов море, думал экономить время)
Изменено: mike422 - 29.03.2019 12:21:07
 
Перейти    
Прокрутить до указанной ячейки
 
#
12.05.2015 16:24:40
Вам огромное спасибо !! тема закрыта )
 
Перейти    
Прокрутить до указанной ячейки
 
#
12.05.2015 15:50:07
Добрый день .

Интересует очередной вопрос , к примеру в ячейки M8 указано значение (номер) строки . допустим 9851 . необходимо прокрутить экран до указанной строки (неважно какая ячейка при этом будет активна) .
Как это реализовать , чтоб человеку не приходилось каждый раз копировать и вставлять номер строки в левый верхний угол ?
Макрос при копировании разумеется запоминает значение которое было скопировано при записи самого макроса, поэтому будет всегда ссылать не на актуальную , указанную в ячейке строку .

Я надеюсь всё гениальное просто, и на самом деле это тоже решается быстро и просто . Подскажите пожалуйста , как:)
 
Перейти    
Долго грузится файл
 
#
01.05.2015 10:53:59
Как ссылки делать что-ли?
а посредством возможно отключения дп. функций или ещё чего-то у эксель нельзя это сделать ? так как 10000 деталей не вариант переделывать как ссылки)
 
Перейти    
Долго грузится файл
 
#
01.05.2015 10:08:11
Добрый день. Вопрос такого порядка.

Есть файл который содержит в себе 10 000 элементов, и к каждому из 10 000 эл. присвоено примечание в виде картинки , общий размер файла 300 мб. загружается он минут 5.
Возможно ли ускорить данный процесс?
Все данные находятся в двух столбцах 1 ID  детали , второй описание если есть

Excel 2012
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 15:24:54
Цитата
KuklP написал :...а Вы в новый модуль...
Возможно. Я не силен в этом, вставил код уже во все модули .после слова энд в каждом макросе и тд по прежнему ничего. Если кому-то не сложно "разжуйте как ребенку". По примеру выше зашел в редактирование там три модуля модуль 1 модуль 2 и модуль 3 и лист 1(лист2) и лист2 (лист3) вставил уже везде :)

Всё заработало ! Огромное спасибо "V"!! такой вариант устраивает
Изменено: mike422 - 07.04.2015 15:51:05
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 15:10:17
Цитата
V написал: просто становитесь в ячейку "Поиск по Коду" и срабатывает фильтр. Подойдет?
Создал новый модуль , вставил этот код. Ввожу значение кода в графе Поиск по коду..не работает. Видимо я упустил какой-то шаг?
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 14:20:24
сейчас ещё раз добавлю )zhc11_0.xlsm (43.38 КБ)
Там к каждой ячейке привязано ещё графическое описание ( в примечании) поэтому то и необходима прокрутка до места ее фактического расположения  
Изменено: mike422 - 07.04.2015 14:22:21 (add text)
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 14:15:08
Цитата
Пытливый написал: 1Application.Goto Reference:=Worksheets(1).Range("B154" ), scroll:=True
пытался по такому макару сделать макрос , но он запоминает введенное мною предыдущее значение а не то которое следует скопировать )
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 14:13:44
Вот пример . копировать вставлять под лентой - это всё лишние телодвижения.поэтому и хочется просто нажимать и ты там. макрос №3 пытался сделать с копированием порядкового номера из ячейки О15 там "белый текст" добавляет +1 к порядковому номеру(так как таблица смещена на 1 строку вниз и номера начинаются не первая строка первый номер а вторая строка первый номер. Вот пример того файла
 
Перейти    
Прокрутить до указанной ячейки, Отцентрировать экран к указанной ячейке
 
#
07.04.2015 13:29:28
Добрый день. Попытаюсь максимально кратко. Есть таблицы с тоннами информации,тысячами строк. справа сделал себе окошко поиска(вбиваю код продукта, выводит колво на складе и его порядковый номер) возможно ли сделать кнопочку чтоб помимо инфо в случае надобности можно было бы нажать на кнопку с макросом который перемещал бы (прокручивал вниз) экран до искомого объекта(допустим по порядковому номеру. потму как сейчас ну увидел я номер строки у себя а надо глянуть и картинку в примечании этого объекта и кручу себе вниз пока не остановлюсь например на 8751 строке ))
 
Перейти    
перечисление совпадений (формула), база данных, перечисление совпадений по критерию
 
#
14.05.2014 23:17:47
Всем спасибо за помощь!
 
Перейти    
перечисление совпадений (формула), база данных, перечисление совпадений по критерию
 
#
14.05.2014 00:05:29
Спасибо ! работает, но можно ли это реализовать стандартными формулами ? т.к. добавить функцию в источник нет возможности, доступ только к стандартным формулам excel. Флешки и тд. , как и доступ в интернет не возможен .   Заранее спасибо :)
 
Перейти    
перечисление совпадений (формула), база данных, перечисление совпадений по критерию
 
#
13.05.2014 23:22:19
excel1.xls (20 КБ)

вот сам файл примера
Изменено: mike422 - 13.05.2014 23:22:43
 
Перейти    
перечисление совпадений (формула), база данных, перечисление совпадений по критерию
 
#
13.05.2014 22:49:23
Добрый день ,вопрос такого характера ,база,в ней множество описаний того или иного типа,интересует конкретно два столбца,например
товарпродавец
персикиПродавец1
яблокоПродавец1
грушаПродавец1
помидорПродавец2
персикиПродавец2
капустаПродавец3
персикиПродавец3
хлебПродавец3
укропПродавец4
хлебПродавец5
а результат выглядит так :
товарпродавецреализовано продавцом
персикиПродавец1персики , яблоко ,груша
яблокоПродавец1яблоко , груша
грушаПродавец1груша
помидорПродавец2помидор , персики
персикиПродавец2персики
капустаПродавец3капуста , персики ,хлеб
персикиПродавец3персики , хлеб
хлебПродавец3хлеб
укропПродавец4укроп
хлебПродавец5хлеб
Подскажите как это было реализовано.  
знаю точно там была формула в графе "реализовано продавцом"

заранее спасибо ( и да, посмотреть какая там была формула не получится)  :)
 
Перейти    
Страницы: 1
Наверх