Как обновить страницу эксель
в моём файле идёт обратный отсчёт до определённой даты в формате ЧЧ : ММ , при нажатии на кнопку хотелось бы чтобы обновлялось оставшееся время
в моём файле идёт обратный отсчёт до определённой даты в формате ЧЧ : ММ , при нажатии на кнопку хотелось бы чтобы обновлялось оставшееся время TanyaZorina
в моём файле идёт обратный отсчёт до определённой даты в формате ЧЧ : ММ , при нажатии на кнопку хотелось бы чтобы обновлялось оставшееся время Автор - TanyaZorina
Дата добавления - 16.03.2016 в 19:41
дело в том что надо именно кнопочку))
дело в том что надо именно кнопочку)) TanyaZorina
дело в том что надо именно кнопочку)) Автор - TanyaZorina
Дата добавления - 16.03.2016 в 19:53
[offtop]А у меня время прямо на кнопке[/offtop]
1. Жмете Альт + F11 - окошко ВБАПрождект - там модуль1 - там код, запускающий пересчет.
2. Кнопку создают на вкладке Разработчик - Вставить - Элементы управления формы - самая первая - ткните туда мышой и ткните потом на листе - кнопка вставится. Потом она сама спросит про макрос - Вы выбираете тот, который в п.1
2а. Я в этом файле сделал не кнопкой, а просто вставил автофигуру и также повесил на нее макрос. А время там показывает из ячейки А1 (я туда перенес Вашу формулу). Как? Просто - ткнулся в фигуру мышой и в строке формул написал =A1
[offtop]А у меня время прямо на кнопке[/offtop]
1. Жмете Альт + F11 - окошко ВБАПрождект - там модуль1 - там код, запускающий пересчет.
2. Кнопку создают на вкладке Разработчик - Вставить - Элементы управления формы - самая первая - ткните туда мышой и ткните потом на листе - кнопка вставится. Потом она сама спросит про макрос - Вы выбираете тот, который в п.1
2а. Я в этом файле сделал не кнопкой, а просто вставил автофигуру и также повесил на нее макрос. А время там показывает из ячейки А1 (я туда перенес Вашу формулу). Как? Просто - ткнулся в фигуру мышой и в строке формул написал =A1 _Boroda_
1. Жмете Альт + F11 - окошко ВБАПрождект - там модуль1 - там код, запускающий пересчет.
2. Кнопку создают на вкладке Разработчик - Вставить - Элементы управления формы - самая первая - ткните туда мышой и ткните потом на листе - кнопка вставится. Потом она сама спросит про макрос - Вы выбираете тот, который в п.1
2а. Я в этом файле сделал не кнопкой, а просто вставил автофигуру и также повесил на нее макрос. А время там показывает из ячейки А1 (я туда перенес Вашу формулу). Как? Просто - ткнулся в фигуру мышой и в строке формул написал =A1 Автор - _Boroda_
Дата добавления - 16.03.2016 в 20:17
Вы можете в любой момент нажать кнопку Обновить, чтобы обновить данные в сводных таблицах в книге. Можно обновлять значения в сводных таблицах, подключенных к внешним данным, таким как базы данных (SQL Server, Oracle, Access и другие), куб служб Analysis Services, веб-каналы данных и многие другие источники. Вы также можете обновлять данные из исходной таблицы в той же или другой книге. Кроме того, можно настроить автоматическое обновление данных сводной таблицы при открытии книги.
По умолчанию с помощью этой ссылки вы можете указать, что при ее автоматическом обновлении в книге, которая содержит ее, с помощью стеблицы.
Обновление вручную
Щелкните любое место сводной таблицы. На ленте появится вкладка Работа со сводными таблицами.
На вкладке Анализ выберите команду Обновить или нажмите ALT+F5.
Совет: Чтобы одновременно обновить все стебли в книге, нажмите кнопку Анализ > Обновить все.
Если таблица обновляется слишком долго, на вкладке Анализ нажмите стрелку рядом с кнопкой Обновить и выберите пункт Состояние обновления. Так вы сможете проверить состояние обновления.
Чтобы отменить обновление, нажмите Отменить обновление.
Блокировка изменения ширины столбцов и форматирования ячеек
Если при обновлении сводной таблицы изменяется ширина столбцов и форматирование данных, но вы не хотите, чтобы это происходило, установите вот эти флажки.
На вкладке Анализ нажмите кнопку Параметры.
На вкладке Макет и формат установите флажки Автоматически изменять ширину столбцов при обновлении и Сохранять форматирование ячеек при обновлении.
Автоматическое обновление данных при открытии книги
Щелкните любое место сводной таблицы. На ленте появится вкладка Работа со сводными таблицами.
На вкладке Анализ нажмите кнопку Параметры.
На вкладке Данные проверьте поле Обновлять данные при открытии файла.
Обновление вручную
Щелкните в любом месте сводной таблицы.
Отобразит вкладку "Параметры" и "Конструктор" в области "Инструменты для работы со таблицами".
На вкладке Параметры в группе Данные сделайте следующее:
Чтобы обновить данные в соответствие с источником данных, нажмите кнопку Обновить или нажмите клавиши ALT+F5.
Вы также можете щелкнуть правой кнопкой мыши и нажать кнопку Обновить.
Чтобы обновить все стебли в книге, нажмите кнопку Обновить и выберите обновить все.
Если обновление занимает больше времени, чем вы ожидаете, щелкните Параметры > обновить > Состояние обновления, чтобы проверить состояние обновления.
Чтобы отменить обновление, нажмите Отменить обновление.
Блокировка изменения ширины столбцов и форматирования ячеек
Если при обновлении сводной таблицы изменяется ширина столбцов и форматирование данных, но вы не хотите, чтобы это происходило, установите вот эти флажки.
Щелкните Параметры > параметры.
На вкладке Макет и формат установите флажки Автоматически изменять ширину столбцов при обновлении и Сохранять форматирование ячеек при обновлении.
Автоматическое обновление данных в pivottable при открытии книги
Щелкните в любом месте сводной таблицы.
На вкладке Параметры в группе Сводная таблица нажмите кнопку Параметры.
В диалоговом окне Параметры таблицы на вкладке Данные выберите параметр Обновлять данные при открытии файла.
При добавлении новых данных в источник необходимо обновить все основанные на нем сводные таблицы. Чтобы обновить сводную таблицу, можно щелкнуть правой кнопкой мыши в любом месте ее диапазона и выбрать команду Обновить
Дополнительные сведения
Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.
Большой диапазон данных в таблице Excel рационально представить в виде сводного отчета. Структура данного инструмента позволяет получить быстрый доступ к итогам, информации по определенному параметру. Рассмотрим создание и обновление сводных таблиц.
О целесообразности и возможности сводных таблиц
Оптимально формировать сводный отчет на основе исходной таблицы, если она отвечает следующим параметрам:
- содержится несколько сотен строк;
- пользователю нужно представлять одни и те же данные в разных разрезах, выбирать информацию по заданному условию, группировать, а встроенный фильтр и группировка справляются плохо.
Требования к исходной таблице:
- у каждого столбца есть заголовок (первый вариант – неправильный; второй – правильный);
- значения в одном столбце имеют одинаковый формат (число, дата, текст);
- все ячейки в строках и столбцах заполнены значениями;
- данные из одной ячейки нельзя разнести в разные столбцы (без объединения ячеек).
Нерациональная организация информации:
Нельзя будет вывести итоги, например, только по городу.
Лучше значения ввести следующим таким образом.
Как сделать сводную таблицу в Excel
Чтобы создать сводную таблицу в качестве исходного диапазона возьмем каталог учебной литературы:
Подразумевается, что данная таблица состоит из сотен строк. Создадим сводный отчет для выведения списка книг из конкретной категории или определенного года. Задача сформулирована – перейдем к реализации.
- Активизируем любую ячейку в исходном диапазоне – щелкаем мышкой. Переходим на вкладку «Вставка» - «Таблица». Нажимаем кнопку «Сводная таблица».
- Автоматически выделяется весь диапазон. Открывается диалоговое окно инструмента. Необходимо проверить правильность параметров для отчета (диапазон, куда выводить сводную таблицу).
- Открывается окно для построения отчета, список полей. В правой нижней части страницы – области для размещения данных из исходного диапазона.
- Области позволяют сформировать структуру сводного отчета.
- Сначала заполним «Названия строк». Так как нужно вывести список книг по годам, то в этом разделе должен быть перечень названий книг. В списке полей ставим птичку напротив поля «Название». Данные столбца имеют текстовый формат – автоматически попадают в область «Названия строк». К значениям сразу применяется сортировка по алфавиту.
- Теперь ставим птичку напротив поля «Год выпуска».
Сводная таблица сделана. С помощью нескольких кликов. Такой способ представления информации удобен для финансовых отчетов.
Как обновить сводную таблицу в Excel
От сводной таблицы больше пользы, если она динамическая. То есть при внесении новых данных в исходный диапазон поля отчета можно обновить. Как это сделать?
- Когда данные внесены в исходную таблицу, переходим на лист со сводным отчетом и щелкаем в любом его месте правой кнопкой мыши. В открывшемся меню выбираем «Обновить».
- Активизируем нужное поле сводного отчета – становится доступен инструмент «Работа со сводными таблицами». Открываем вкладку «Параметры». В группе «Данные» нажимаем кнопку «Обновить».
- Выделить сводную таблицу или отдельное поле, нажать сочетание клавиш Alt + F5.
Как настроить автоматическое обновление сводной таблицы в Excel:
- Открыть лист со сводным отчетом. Щелкнуть в любом месте таблицы левой кнопкой мыши. Это нужно для того, чтобы активизировалась «Работа со сводными таблицами».
- На вкладке «Параметры» находим группу «Сводная таблица». Нажимаем – открывается меню кнопки. Выбираем пункт «Параметры».
- В открывшемся меню «Параметры сводной таблицы» нажать кнопку «Разметка и формат». Поставить галочки напротив следующих пунктов:
Здравствуйте!
Подскажите пожалуйста как можно автоматически обновить лист при поступлении новых данных
и в чем у меня возможная ошибка. Описание на скриншоте.
Сам код, не знаю в чем ошибка. Спец. я довольно слабый пока.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer, j As Integer
'Application.Calculate
'If Not Intersect(Target, Range("C2:C21")) Is Nothing Then
'Application.EnableEvents = False
For j = 1 To Cells(2, 12).Value
For i = 1 To 20
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 1).Value <> 0 Then
Cells(1 + j, 5).Value = Cells(1 + j, 5).Value + Cells(1 + i, 1).Value
Cells(1 + i, 1).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
' If Not Intersect(Target, Range("A2:A21")) Is Nothing Then
' Application.EnableEvents = False
For i = 1 To 20
For j = 1 To Cells(2, 12).Value
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 3).Value <> 0 Then
Cells(1 + j, 7).Value = Cells(1 + j, 7).Value + Cells(1 + i, 3).Value
Cells(1 + i, 3).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
End Sub
Здравствуйте!
Подскажите пожалуйста как можно автоматически обновить лист при поступлении новых данных
и в чем у меня возможная ошибка. Описание на скриншоте.
Сам код, не знаю в чем ошибка. Спец. я довольно слабый пока.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer, j As Integer
'Application.Calculate
'If Not Intersect(Target, Range("C2:C21")) Is Nothing Then
'Application.EnableEvents = False
For j = 1 To Cells(2, 12).Value
For i = 1 To 20
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 1).Value <> 0 Then
Cells(1 + j, 5).Value = Cells(1 + j, 5).Value + Cells(1 + i, 1).Value
Cells(1 + i, 1).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
' If Not Intersect(Target, Range("A2:A21")) Is Nothing Then
' Application.EnableEvents = False
For i = 1 To 20
For j = 1 To Cells(2, 12).Value
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 3).Value <> 0 Then
Cells(1 + j, 7).Value = Cells(1 + j, 7).Value + Cells(1 + i, 3).Value
Cells(1 + i, 3).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
End Sub
Сам код, не знаю в чем ошибка. Спец. я довольно слабый пока.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer, j As Integer
'Application.Calculate
'If Not Intersect(Target, Range("C2:C21")) Is Nothing Then
'Application.EnableEvents = False
For j = 1 To Cells(2, 12).Value
For i = 1 To 20
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 1).Value <> 0 Then
Cells(1 + j, 5).Value = Cells(1 + j, 5).Value + Cells(1 + i, 1).Value
Cells(1 + i, 1).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
' If Not Intersect(Target, Range("A2:A21")) Is Nothing Then
' Application.EnableEvents = False
For i = 1 To 20
For j = 1 To Cells(2, 12).Value
If Cells(1 + j, 6).Value = Cells(1 + i, 2).Value Then
If Cells(1 + i, 3).Value <> 0 Then
Cells(1 + j, 7).Value = Cells(1 + j, 7).Value + Cells(1 + i, 3).Value
Cells(1 + i, 3).Value = 0
End If
End If
Next
Next
'Application.EnableEvents = True
'End If
End Sub
И сам файл. Автор - foxrm
Дата добавления - 23.09.2013 в 20:18
Есть рабочий макрос на обновление данных в книге каждую секунду,
много ячеек с показателями времени, которые нужно видеть и понимать,что процесс идет
[vba]
Когда у Вас появится personal.xls* - то это файл вообще не сможете закрыть (если нет запроса разрешить макросы). Этот макрос времени нужно дорабатывать.
shurikus также обращал внимание на проблему файла с этим макросом
ВОПРОС: каким другим методом можно нормально пересчитать активный лист (обновить данные)
Есть рабочий макрос на обновление данных в книге каждую секунду,
много ячеек с показателями времени, которые нужно видеть и понимать,что процесс идет
[vba]
Когда у Вас появится personal.xls* - то это файл вообще не сможете закрыть (если нет запроса разрешить макросы). Этот макрос времени нужно дорабатывать.
shurikus также обращал внимание на проблему файла с этим макросом
ВОПРОС: каким другим методом можно нормально пересчитать активный лист (обновить данные) VN
Есть рабочий макрос на обновление данных в книге каждую секунду,
много ячеек с показателями времени, которые нужно видеть и понимать,что процесс идет
[vba]
Когда у Вас появится personal.xls* - то это файл вообще не сможете закрыть (если нет запроса разрешить макросы). Этот макрос времени нужно дорабатывать.
shurikus также обращал внимание на проблему файла с этим макросом
ВОПРОС: каким другим методом можно нормально пересчитать активный лист (обновить данные) Автор - VN
Дата добавления - 21.03.2014 в 18:17
А чем не устраивает нынешний метод и зачем пересчитывать весь файл , а не только нужные ячейки? Stormy
Stormy,
Этот метод отлично выполняет свою задачу - но при открытии второго файла их уже не закрыть простым способом,
Нужные ячейки указать можно, но проблема не в этом
Stormy,
Этот метод отлично выполняет свою задачу - но при открытии второго файла их уже не закрыть простым способом,
Нужные ячейки указать можно, но проблема не в этом VN
VN, а почему Вы начали новую тему вместо того чтобы продолжить в той, где Вам начинали пытаться помочь?
Как мы здесь, не зная предыстории, можем догадаться, почему Вам обязательно нужно принудительно обновлять лист, а автоматическое обновление Вас не устраивает?
Да и цитаты Вы оформляете так, что не понятно, когда и по какому поводу они были сказаны (без ссылки, даты, времени)…
Ну неужели так трудно в нужном посте выделить цитируемый фрагмент и просто нажать там же "Цитата", а потом уже скопипастить автоматически созданную и корректно оформленную цитату туда, куда Вам нужно?
VN, а почему Вы начали новую тему вместо того чтобы продолжить в той, где Вам начинали пытаться помочь?
Как мы здесь, не зная предыстории, можем догадаться, почему Вам обязательно нужно принудительно обновлять лист, а автоматическое обновление Вас не устраивает?
Да и цитаты Вы оформляете так, что не понятно, когда и по какому поводу они были сказаны (без ссылки, даты, времени)…
Ну неужели так трудно в нужном посте выделить цитируемый фрагмент и просто нажать там же "Цитата", а потом уже скопипастить автоматически созданную и корректно оформленную цитату туда, куда Вам нужно? Alex_ST
С уважением,
Алексей
MS Excel 2003 - the best.
Alex_ST,
Извините, старался следовать правилам - одна тема - один ВОПРОС
к томуже замечание HUGO вообще в теме о формулах
а коректное пользование ФОРУМОМ - простите новичка, исправлюсь,
предистории нет, а были замечания по некоректной работе приложенного файла с ЭТИМ макросом в другой теме
Также была тема с ЭТИМ макросом НО другим вопросом
Alex_ST,
Извините, старался следовать правилам - одна тема - один ВОПРОС
к томуже замечание HUGO вообще в теме о формулах
а коректное пользование ФОРУМОМ - простите новичка, исправлюсь,
предистории нет, а были замечания по некоректной работе приложенного файла с ЭТИМ макросом в другой теме
Также была тема с ЭТИМ макросом НО другим вопросом
а коректное пользование ФОРУМОМ - простите новичка, исправлюсь,
предистории нет, а были замечания по некоректной работе приложенного файла с ЭТИМ макросом в другой теме
Также была тема с ЭТИМ макросом НО другим вопросом
ну вот, цитаты научился вставлять
С уважением к жителям любимого форума Автор - VN
Дата добавления - 22.03.2014 в 00:44
Можно доработать этот ontime - просто время старта нужно заносить через переменную, а при закрытии файла этот таймер отключать.
Вот пример:
[vba]
Можно доработать этот ontime - просто время старта нужно заносить через переменную, а при закрытии файла этот таймер отключать.
Вот пример:
[vba]
[/vba]
StopScript вызывать когда нужно остановить таймер. Автор - Hugo
Дата добавления - 22.03.2014 в 00:53
Читайте также: