Уважаемые знатоки, прошу вашей помощи в следующей проблеме:
При добавлении УФ (с с формулой ниже) в ячейку H8 с помощью VBA-макроса оно не срабатывает до тех пор, пока не зайдешь в редактирование условия УФ и нажмешь ОК (при этом само условие не изменяя)
Sub UF()
Cells.FormatConditions.Delete
With Range("H8")
.FormatConditions.Add Type:=xlExpression, Formula1:="=СУММ(($C$3:$CB$3>=СЕГОДНЯ())*($C$3:$CB$3<СЕГОДНЯ()+21)*(($C$5:$CB$5-$C$4:$CB$4)>0))"
With .FormatConditions(1)
.Interior.Color = vbRed
.StopIfTrue = True
End With
End With
End Sub
В чем может быть причина? Заранее спасибо за помощь!
Уважаемые знатоки! Прошу Вашей помощи в следующей проблеме: при использовании функции СТРОКА, внутри функции СУММПРОИЗВ, формула выдает значение #ЗНАЧ!. При явном указании номера строки - все считается корректно (см. пример).
Задача следующая: проверить, случается ли превышение дневных расходов над дневными доходами в течение следующих 21 дней (от текущей даты).
P.S. Дополнительные строки добавить нельзя, формулы массива также просьба не предлагать, так как данная формула будет использоваться в условном форматировании. За пояснения, почему функция СТРОКА не желает работать - буду отдельно благодарен Заранее огромное спасибо!
Поступают данные по продажам нескольких товаров в таком виде, как в примере (изменить формат, увы, возможности нет никакой), причем один и тот же товар может продаваться по разной цене. Необходимо посчитать выручку (цена*количество продаж) по каждому товару за определенную дату (для примера по товару Good 2 за 01.08.2012).
Уважаемые знатоки, заранее приношу извинения, что на форуме Excel задаю вопрос по Outlook 2003, но вся надежда только на вас. Необходимо программно изменить используемый редактор сообщений с встроенного на Word, а затем обратно. Ручками это делается в настройках (скрин во вложении), можно ли это осуществить программно кодом на VBA. Копаю сейчас в сторону .EditorType = olEditorWord, но пока что-то не получается.
Уважаемые знатоки, может вопрос и простой, но как передать значение переменной из процедуры Excel процедуру Outlook?
То есть необходимо следующее: выполняется код в Excel, в ходе выполнения присваивается значение переменной, далее запускается код в Outlook, в который передается значение переменной, вычисленной в Excel.
Уважаемые знатоки, прошу помощи. К сожалению поиском не нашел похожей темы. Задача следующая: скопировать в буфер обмена одномерный массив, для того, чтобы его можно было вставить в виде таблицы в совершенно другое приложение.
Уважаемые знатоки, помогите решить проблему, уже сломал себе мозг. Задача: отфильтровать в сводной таблице данные с датой менее 15.12.2011
Использую код:
Dim j As Integer Sheets(1).Select With ActiveSheet.PivotTables("summary").PivotFields("дата") For j = 1 To .PivotItems.Count If .PivotItems(j).Value < #12/15/2011# Then .PivotItems(j).Visible = False Else .PivotItems(j).Visible = True End If Next j End With
Вылетает с ошибкой 1004: "Нельзя установить свойство Visible для класса PivotItem"
Причем этот же код нормально срабатывает на других сводных таблицах. Подскажите, в чем дело, и в какую сторону копать?
Уважаемые знатоки, столкнулся со следующей проблемой: При операции вычитания некоторых чисел, Excel выдает неверный результат. Пример: Вводим в ячейку выражение =42655,66-33256,06 Увеличиваем количества отображаемых знаков после запятой (например до 30, формат ячейки - числовой) Получаем результат - 9 399,600000000010000000000000000000
Вопрос, откуда взялась единица в одиннадцатом знаке после запятой? Это глюк Excel или я просто чего-то не знаю? Вроде и мелочь, а создает кучу проблем с условным форматированием и т.п.
P.S. Проверено в Excel 2007 и Excel 2010, замечено на некоторых разных парах чисел.
Уважаемые знатоки, снова прошу Вашей помощи. Задача следующая: необходимо, чтобы при открытии книги, автоматически открывалось окно VBE с кодом определенного модуля данной книги (в примере модуль "Code_sample").
Для автоматического вызова окна VBE использую процедуру:
Private Sub Auto_open() Application.VBE.MainWindow.Visible = True End Sub
А вот как сделать, чтобы сразу отображался код определенного модуля? Заранее спасибо за любую помощь!
Уважаемые знатоки, вопрос следующий: как средствами VBA выделить первую ячейку отфильтрованного диапазона (в данном примере A130). Фильтров может быть одновременно несколько на разных столбцах. Пока обхожусь таким костылем
Range ("A1").Select SendKeys "{Down}", True
Может кто-нибудь подскажет более красивое решение без посыла нажатия клавиши? Заранее спасибо за помощь!
Уважаемые знатоки, подскажите пожалуйста, возможно ли использовать функцию СУММЕСЛИ, если диапазон суммирования - весь столбец и известен лишь его номер (определяется с помощью ПОИСКПОЗ). Если подобная тема уже была - просто ткните носом. Заранее спасибо.
Уважаемые знатоки VBA, прошу вашей помощи. Задача следующая: 1. На диске имеется папка с кучей разнообразных файлов. 2. Среди этих файлов встречаются файлы с именем specification_dd.mm.yyyy.xls (где dd.mm.yyyy - произвольная дата). 3. Необходимо с помощью VBA открыть файл specification_dd.mm.yyyy.xls с максимальной датой в имени файла.
Задача следующая: имеется книга, состоящая из двух листов с данными (см. прикрепленный файл). Необходим VBA-макрос, который бы сравнивал значения в столбцах A на Листе1 и Листе2 и автоматически делал бы цветную заливку (любым цветом) в столбце А Листа2 уникальных значений (т.е. отсутствующих в столбце A Листа1).
Уважаемые знатоки VBA, необходима ваша помощь. Нужен макрос, вставляющий формулу суммы в столбце B, напротив каждой записи "Всего". Вся проблема в том, что количество показателей в каждой группе не является фиксированным, а постоянно меняется. Надеюсь на вашу помощь.