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

Страницы: 1
VBA при удалении\добавлении вычисляемого поля в какой-то момент он перестает его удалять
 
#
07.02.2022 09:42:09
Коллеги, доброго дня.
Есть простой скрипт, идея которого по нажатию кнопки удалять вычисляемое поле, если оно удалено - добавлять.
Таких кнопок у меня две
Я заметил, что в какой-то момент он перестает удалять вычисляемое поле, хотя должен. Кажется это связано с позицией, если вычисляемое поле последнее он удалить не может(Вроде как)
Помогите пофиксить, или возможно есть элегантный вариант моего кода, я к сожалению как работать с вычисляемыми полями в VBA не нашел.
Код
On Error GoTo test
       ActiveSheet.PivotTables("PivotTable1").PivotFields( _
       "Sum of %approval").LabelRange.Cells(1, 1).Delete

Exit Sub
test:
           With ActiveSheet.PivotTables("PivotTable1").PivotFields("%approval")
            .Orientation = xlDataField
            .Name = "Sum of %approval"
            .NumberFormat = "0.00%"
            .Position = 5
        End With
Изменено: Александр - 07.02.2022 09:42:32
 
Перейти    
Ограничение выбора в срезе или хайд определенных параетров
 
#
03.06.2020 14:04:51
Добрый день. Имеется в срез, в нем нужно убрать 3 пункта, спрятать или заблокировать чтобы не было возможности выбора

Не трогая исходник, как можно это сделать?)
 
Перейти    
При копировании среза, оба среза привязаны к одной и той же таблице и изменения копируются. Как отвязать 1 срез от 2?
 
#
29.04.2020 15:16:33
Коллеги, добрый день.

Собственно вопрос такой, не нашел ответа в интернетах :)

Имеется 1 лист с 1 срезом, я копирую этот срез на другой лист и он полностью дублирует подключение к сводной. И если я на 2 срезе меняю подключение, то он его изменяет и на срезе 1.
Как отвязать эти срезы друг от друга?)  
 
Перейти    
VBA Поиск в строке ссылки на ячейку и замена значения из этой ссылки
 
#
18.02.2020 16:59:04
Коллеги, добрый день.
Подскажите, как сделать такую вещь:
Есть ячейки с значениями:
H15
G15 / F10
(G15 + 10) / I5

Мне нужно понять в каждой ячейке где ссылка и забрать по этой ссылке значение и вставить в формулу

Предположим G15 хранит значение 10, а I5 хранит 2

По последнему варианту мне надо выдать 10
(10 + 10) / 2
 
Перейти    
Если разрыв >24 часов, то нумерацию начать с единицы
 
#
01.10.2019 14:42:27
Всем добрый день. Не могу сообразить как сделать такую вещь:
Имеется список номеров с датой и временем.

Нужно пронумировать их по группе "Номера" и по условию. Если от 1 номера у последующих номеров прошло менее 24 часов, то нумирация идет в обычном режиме 1, 2, 3, 4 и тд. Но если более 24 часов, первый же номер после этой отметки будет так же первым и последющие будут сравниваться уже с ним.
79999999999 18.09.2019 16:07 1
79999999999 18.09.2019 17:10 2
79999999999 18.09.2019 17:17 3
79999999999 20.09.2019 17:18 1
79999999999 20.09.2019 17:19 2
79999999999 22.09.2019 17:21 1
79999999999 25.09.2019 17:21 1
Своими силами сделать не выходит, надеюсь смог более менее понятно описать. Файл во прилагаю
Изменено: Александр - 02.10.2019 08:08:04
 
Перейти    
Проверка значения по маске
 
#
14.06.2019 14:03:00
Господа, добрый день.

Подскажите как можно сделать. Есть список масок номеров
Пример:
999FFA3211Категория 2
999FFACCG2Категория 3
Есть список номеров:
9993340012
9991143211
Мне нужно по номеру понять к какой категории он относится исходя из тех масок, что есть
т.е. первый номер это категория 3
Второй номер это категория 2

Есть ли решение без VBA?
 
Перейти    
Проверка двух столбцов со смещением и вставка данных при соответствии
 
#
06.06.2019 12:57:55
Доброго времени суток.

Появилась такая задача: Имеется два столбца, бывает так, что в одном столбце значения не на одном уровне(К примеру в первом столбце отсутствует значение), тогда во втором столбце мы пропускаем строку со спуском вниз
Если делать формулой как сделал я, нужно прописать очень маштабно, так как с каждым спуском диапазон увеличивается. Я пытался сделать пока один столбец, но по условию значение может отсутвовать как в первом так и во втором столбце и исходя из этого, необходимо делать спуск чтобы их уровнять.

Придумать как оптимизировать подход - я не смог.

Описание водянистое, надеюсь как примере будет более понятно.

И да, задачу хочу сделать без VBA :) Подскажите возможное решение, заранее благодарен
 
Перейти    
Среди не уникальных номеров найти самую позднюю дату из соседнего столбца и вставить ее в новый столбец
 
#
23.01.2019 15:00:51
Господа, добрый день.
Помогите решить задачу с которой сам я справиться пока не могу.

К примеру:
В первом столбце есть список номеров(Не уникальный), во втором даты.
В третий столбец нужно вставить последнюю найденную дату(Если таковая имеется) по данному номеру.

Пример во вложении чтобы было наглядно
Изменено: Александр - 23.01.2019 15:08:05
 
Перейти    
Поиск слова в тексте и по этому слову подтягивать значение(Если имеется)
 
#
05.12.2018 00:36:58
Господа, добрый вечер.

Не могу сообразить как можно сделать такую вещь
Есть лист с ячейками такого плана:
Цитата
GiGwi игрушка для   кошек Мышка с электронным чипом
игрушка для кошек Мышка гигви с   электронным чипом
На втором листе есть таблица со словами такого плана:
Цитата
ГиГвиGiGwiГиГви (GiGwi)
Нужно в ячейке на листе1 найти слово из листа2(А1 или B1) и если оно найдется, то в ячейку где формула вставить в таком формате как на листе2 в ячейке C1(ГиГви (GiGwi))

Т.е. условно просто найти слово в ячейке и если оно есть сВПРить. Сам прийти к решению не могу, поиск тоже не дал результатов. VBA не знаю.
 
Перейти    
Как найти те ячейки, которая не нашла функция СЧЁТЕСЛИМН
 
#
10.05.2018 10:33:26
Господа, добрый день. У меня есть таблица в которую с помощью функции СЧЁТЕСЛИМН происходит сбор информации. Бывает такое, что оператор исходные данные закрывает с другими условиями и нужно находить эти условия и добавлять в формулу.

Как это можно сделать кроме ручного поиска?) Т.е. Мне нужно найти все ячейки, которые не были посчитаны с помощью формулы СЧЁТЕСЛИМН

Надеюсь понятно описал вопрос :)
 
Перейти    
Страницы: 1
Наверх