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

Страницы: 1 2 След.
Автоподсчет в строке формул при выделении, Удобная проверка формулы при выделении части формулы
 
#
03.08.2018 15:37:40
Да именно то что нужно! Спасибо!
БМВ, К сожалению БМВ было уже занято ))
 
Перейти    
Автоподсчет в строке формул при выделении, Удобная проверка формулы при выделении части формулы
 
#
03.08.2018 14:37:38
Уважаемые форумчане!
Не помню где это я видел, и как это настраивать, но где то точно встречал. В интернете ничего не нашел, или не нашел как правильно спросить у поисковика.
В строке формул при выделении части формулы появлялась подсказка с расчетами именно выделенной части, т.е. если в формуле =ЕСЛИ выделить условия, то в подсказке было написано "Истина" или "Ложь", если выделить формулу типа "=5-3", то отображалось "2"
Подскажите пожалуйста возможно ли такое в excel, и если да, то как это включить?
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 22:57:09
RAN
Код
With Me

кажется работает, excel зависает, как только пытаюсь сдвинуть ползунок. Хотя цикличных пересчетов нигде нету
Изменено: bmw323f - 31.07.2018 22:58:20
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 22:46:16
Цитата
надо понять что нужно сделать
Вот в этом виде код работает
Код
    
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 2 And Target.Column <> 3 Then Exit Sub
     With Target.Parent
        .Shapes("Scroll Bar. 12").DrawingObject.Max = Range("C2")
        .Shapes("Scroll Bar. 12").DrawingObject.Min = Range("B2")
        .Shapes("Scroll Bar. 15").DrawingObject.Max = Range("C3")
        .Shapes("Scroll Bar. 15").DrawingObject.Min = Range("B3")
        .Shapes("Scroll Bar. 16").DrawingObject.Max = Range("C4")
        .Shapes("Scroll Bar. 16").DrawingObject.Min = Range("B4")
        .Shapes("Scroll Bar. 17").DrawingObject.Max = Range("C5")
        .Shapes("Scroll Bar. 17").DrawingObject.Min = Range("B5")
        .Shapes("Scroll Bar. 19").DrawingObject.Max = Range("C6")
        .Shapes("Scroll Bar. 19").DrawingObject.Min = Range("B6")
        .Shapes("Scroll Bar. 21").DrawingObject.Max = Range("C7")
        .Shapes("Scroll Bar. 21").DrawingObject.Min = Range("B7")
        .Shapes("Scroll Bar. 23").DrawingObject.Max = Range("C8")
        .Shapes("Scroll Bar. 23").DrawingObject.Min = Range("B8")
    End With
End Sub


И все бы хорошо, вот только он не срабатывает при изменении значения в ячейке формулой
надо что бы он работал с событием Worksheet_Calculate.
Если знаете как помочь, буду примного благодарен.
Изменено: bmw323f - 31.07.2018 22:47:01
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 22:33:32
Цитата
Если это разные лист
Это один лист
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 22:32:25
Нет, не работает
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 22:21:43
тогда не понятно как заставить эту строчку работать без Target. Получается я с событием Worksheet_Change могу изменить данные максимум и минимум, а с Worksheet_Calculate не могу
Изменено: bmw323f - 31.07.2018 22:24:18
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 21:58:13
Код
With Target.Parent

Очевидно вот эта стройка здесь лишняя, но без нее не работает
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 21:54:52
Код
Private Sub Worksheet_Calculate()
    With Target.Parent
        .Shapes("Scroll Bar. 12").DrawingObject.Max = Range("C2")
        .Shapes("Scroll Bar. 12").DrawingObject.Min = Range("B2")
        .Shapes("Scroll Bar. 15").DrawingObject.Max = Range("C3")
        .Shapes("Scroll Bar. 15").DrawingObject.Min = Range("B3")
        .Shapes("Scroll Bar. 16").DrawingObject.Max = Range("C4")
        .Shapes("Scroll Bar. 16").DrawingObject.Min = Range("B4")
        .Shapes("Scroll Bar. 17").DrawingObject.Max = Range("C5")
        .Shapes("Scroll Bar. 17").DrawingObject.Min = Range("B5")
        .Shapes("Scroll Bar. 19").DrawingObject.Max = Range("C6")
        .Shapes("Scroll Bar. 19").DrawingObject.Min = Range("B6")
        .Shapes("Scroll Bar. 21").DrawingObject.Max = Range("C7")
        .Shapes("Scroll Bar. 21").DrawingObject.Min = Range("B7")
        .Shapes("Scroll Bar. 23").DrawingObject.Max = Range("C8")
        .Shapes("Scroll Bar. 23").DrawingObject.Min = Range("B8")
    End With
End Sub
Изменено: bmw323f - 31.07.2018 21:56:43
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 21:23:22
Цитата
ну тогда на Calculate вешать.
Уже! какую то ошибку выдает
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 21:11:07
Цитата
математику никто не отменял
Тоже была такая мысль, но одно очень полезное свойство полосы прокрутки теряется, когда нажимаешь на кнопки, результат не меняется.
С макросом вроде справился, вот только я обнаружил, что событие Worksheet_Change не реагирует на изменение значения ячейки формулой, вот опять голову ломаю.
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 15:44:08
Это работает! Спасибо, буду пользоваться!
Жалко, что без макроса не получится
 
Перейти    
Максимум и минимум полосы прокрутки и счетчика
 
#
31.07.2018 15:01:09
Добрый день, уважаемые форумчане!
Дело в том, что в настройках полосы прокрутки и счетчика можно указать только цифры, нельзя привязать к ячейке или вставить туда формулу. Искал как в элементах управления формы, так и в элементах ActiveX.
Подскажите пожалуйста, можно ли как то привязать эти значения (максимум и минимум) к ячейкам, например A1 и A2 соответственно.
Заранее благодарен!
 
Перейти    
При внесении изменений в любую из двух ячеек изменяется и вторая
 
#
28.05.2018 09:09:28
Работает, Спасибо!
 
Перейти    
При внесении изменений в любую из двух ячеек изменяется и вторая
 
#
28.05.2018 08:49:02
Здравствуйте!
Простой вопрос, но нигде не могу найти простое решение.
Есть две ячейки A1 и A2=2*A1
Как сделать что бы при изменении ячейки A2 изменялось значение ячейки A1 и при изменении ячейки A1 изменялось значение ячейки A2 в пропорции 1:2
Заранее спасибо!
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 21:57:12
tolstak, спасибо вам огромное, это лучшее решение на которое я мог рассчитывать!
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 14:29:18
дело в том что в оригинальном файле в таблице есть еще столбцы, которые не входят сводную, или тоже можно выбрать только нужные столбцы?
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 14:04:28
Получается он каждый раз будет создавать новый файл CSV? Или обновлять старый?
Хорошая идея сделать запуск макроса как только обновляется сводная. Только у меня стоит макрос на Лист1 который автоматически обновляет сводную при добавлении новых значений в таблице. Не получится так, что из-за этого макроса на лист1, макрос на лист2 будет постоянно работать?
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 13:23:14
Макрос нужно писать в писать в исходном файле, верно?
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 12:58:38
Правильно я понимаю, технически можно написать такой макрос, который будет копировать данные на другой файл и сохранять его автоматически?
 
Перейти    
Автоматически обновляемый csv файл, В файл csv вставляю данные из другого excel файла, после сохранения все формулы пропадают
 
#
23.05.2018 12:03:09
Здравствуйте знатоки!
Надеюсь мой вопрос имеет какое ни будь решение.
Есть excel файл в нем много данных и много страниц
Есть другой файл (csv) в него я вставляю денные с одной из страниц первого excel файла путем добавление формулы в я чейку A1 (=A1) и т.д. во все ячейки.
Далее я сохраняю csv файл и все формулы заменяются на текст.
В последствии, csv файл я загружаю на сайт, что бы данные встали на сайт.
Вопрос. Как сделать что бы данные в csv файле обновлялись автоматически если изменяются данные в excel файле.
Заранее спасибо!
 
Перейти    
Добавление значения в столбец при сравнении таблиц
 
#
17.05.2018 14:20:03
Многоразовый ВПР идеально подходит, не подумал бы так сформулировать свою задачу.
Спасибо огромное!
 
Перейти    
Добавление значения в столбец при сравнении таблиц
 
#
17.05.2018 13:36:53
Здравствуйте знатоки!
Помогите пожалуйста решить задачу.
Есть таблица со значениями, нужно сделать что то вроде сводной, что бы значения из второго столбца подставлялись во вторую таблицу в правильный столбец автоматически при добавлении новой строки в первую таблицу.
Проще показать чем описать суть, по вложении пример.

PS: желательно обойтись формулами без макросов
Заранее спасибо
 
Перейти    
Автоматическое смещение таблицы вниз при заполнении строчки
 
#
29.11.2017 18:13:53
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:H1")) Is Nothing Then
        If Application.CountA(Range("A1:H1")) > 0 Then Rows("1:1").Insert Shift:=xlDown
    End If
End Sub

Подошел! Спасибо большое!
Изменено: bmw323f - 29.11.2017 18:14:42
 
Перейти    
Автоматическое смещение таблицы вниз при заполнении строчки
 
#
29.11.2017 14:03:19
Цитата
Юрий М написал:
попробуйте нажать клавишу Delete в ячейке первой строки.
Юрий, не совсем понял где именно надо нажать клавишу, если ее нажать, то я просто удалю содержимое ячейки верно?
 
Перейти    
Автоматическое смещение таблицы вниз при заполнении строчки
 
#
29.11.2017 13:54:42
Извините что долго отвечаю, по пути читаю как макрос добавить.
Как попробую предложенные варианты обязательно сообщу.
 
Перейти    
Автоматическое смещение таблицы вниз при заполнении строчки
 
#
29.11.2017 12:28:42
Всем привет!
Вопрос такой, есть таблица которая заполняется каждый день, то есть, каждый день в таблице появляется новая строчка.
Как сделать что бы первая строка в таблице всегда была пустой, при заполнении любой ячейки в этой строке, (например дата) вся таблица смещалась на строчку ниже, и первая строка опять окажется пустой.
Заранее спасибо!
 
Перейти    
Автоматическая заливка по значению из другого столбца
 
#
15.06.2017 16:25:06
Просто не вероятно! То как быстро ответили!
Все работает, спасибо!
 
Перейти    
Автоматическая заливка по значению из другого столбца
 
#
15.06.2017 15:54:51
Здравствуйте!
у меня вот какой вопрос. В столбце С есть много текстовых значений, которые нужно закрасить красным цветом если в тексте есть слово из столбца А и закрасить синим цветом если там есть слова из столбца В.
Как можно прописать условие, что бы при добавлении нового слова, например в столбец А, в столбце С закрашивались ячейки в которых есть это слово?
Прикрепляю пример.
Заранее спасибо!
 
Перейти    
Обход ошибки, если поисковой запрос отсутствует в ячейке
 
#
14.12.2016 10:31:27
Спасибо! ЕСЛИОШИБКА помогло
 
Перейти    
Страницы: 1 2 След.
Наверх