ну то есть логика в том, чтобы сначала проверилось условие в скобках, затем только все остальные AND

Коллеги, подскажите будет ли у меня работать вот такая проверка Ключевой вопрос вот здесь: (zzz=yyy or hhh=qqq)

Я попробывал, но что-то не получается у меня со step в цикле указать ему корректно...

Окей, с половиной разобрался.  
Вот остаточный вопрос:  
В примере ниже массив со значениями времени от 00:00 до 23:00  
Как посчитать кол-во значений по одному часу  
 
Пример:

{quote}{login=nilem}{date=18.11.2011 11:02}{thema=}{post}Вот для примера. Зел. стрелка.{/post}{/quote}  
 
Круто...  
А что означает символ ":" в данном коде?  
например вот тут ReDim y(1 To UBound(x), 1 To 2): k = 1

Иногда кажется что сюда пишут абсолютно бездумно, не попробывав элементарного:  
попробуйте просто воспользоваться Данные -> Проверка  
Чем именно должен по вашему мнению помоч макрос?  
 
ps: диАпазон

Пример в студию.  
Скорее всего проблема с форматом из 1с

Подниму..

{quote}{login=slaska}{date=16.11.2011 01:55}{thema=Re: }{post}Юрий, я новичок, поэтому прошу прощения за возможно легкий вопрос....{/post}{/quote}  
Позволю себе ответить:  
 
Sub qqq()  
For i = 3 To 55  
If Cells(i, 1) <> "" Then Cells(i, 1).Copy  
Cells(i, 2).PasteSpecial xlPasteFormulas  
Next  
End Sub

{quote}{login=Niky}{date=16.11.2011 01:20}{thema=}{post}Все верно, впринципе сам хотел изначально через суммпроизв сделать.  
Но хотелось бы через массив внутри макроса, чтобы не создавать формул (лист и так очень загружен)  
Спасибо!  
 
Сейчас думаю как сделать это через переменные внутри цикла{/post}{/quote}  
 
Но чето ничего ен получается... :(

Все верно, впринципе сам хотел изначально через суммпроизв сделать.  
Но хотелось бы через массив внутри макроса, чтобы не создавать формул (лист и так очень загружен)  
Спасибо!  
 
Сейчас думаю как сделать это через переменные внутри цикла

Делаю сейчас тоже самое, но в моем примере есть контрольный столбец с уникальной записью (в оригинальном файле и в сравниваемом). Соответственно порядок строк может быть разным.  
Действительно каждый раз нужно подстраиваться под конкретный пример

Коллеги,    
 
Задача следующая...  
В заданном массиве необходимо из всех ячеек со временем выделить те, которые имеют не РОВНЫЕ ЧАСЫ. Например 22:59 или 21:25  
Затем эти ячейки огруглить до ближайшего часа, НО.  
Округлить их нужно в ту сторону, где кол-во ячеек не превышает 4 штуки на один ровный час.  
Если для ячейки со значением 22:59 на 23:00 свободного места нет и на 22:00 тоже свободного места нет (везде стоит уже по 4 ячейки), то просто округлить в большую сторону

Igor67  
У формулы ПРОМЕЖУТОЧНЫЕ.ИТОГИ нет функции суммы произведения  
 
тухачевский  
формула работает! Пока нет времени разбираться как на это влияет "смещ", но спасибо ;) было бы куда - поставил бы плюсик!

Добрый день!  
 
Подскажите плиз, есть ли написанные ранее функции, которые могли бы считать средневзвешенное значение, но только по установленному автофильтру.  
Вот что смог найти:  
 
Function dhAverageWithWeight(rgWeights As Range, rgValues As Range) _  
As Double  
  If (rgWeights.Count <> rgValues.Count) Then  
     ' Количество весов не соответствует количеству аргументов  
     dhAverageWithWeight = 0  
     Exit Function  
  End If  
 
  Dim i As Integer  
  Dim dblSum As Double        ' Сумма значений  
  Dim dblSumWeight As Double  ' Взвешенная сумма значений  
 
  ' Вычисление...  
  For i = 1 To rgWeights.Count  
     ' Взвешенной суммы значений  
     dblSumWeight = dblSumWeight + rgWeights(i) * rgValues(i)  
     ' Суммы значений  
     dblSum = dblSum + rgWeights(i)  
  Next  
 
  ' Возвращение средневзвешенного значения  
  dhAverageWithWeight = dblSumWeight / dblSum  
End Function  
 
Спасибо!

Добрый день,  
 
прошу помощи, пытаюсь настроить отправку писем через лотус, нашел в инете часть кода, но к сожалению никак не могу понять как он будет работать в том случае если в ячейке получателя стоят несколько адресов, разделенных запятой (или другим символом)  
 
Что имеем:  
recipient = planning.Worksheets("Управление отправкой").Cells(number + 3, 7).Value  
В этой ячейке стоят три адреса разделенных запятой.  
 
Затем:  
Call MailDoc.ReplaceItemValue("SendTo", recipient)  
Оператор проставляющий в процесс лотуса значение КОМУ  
 
Что и где мне нужно поменять? По определенным соображениям прикрепить пример не смогу :(

{quote}{login=Sh_Alex}{date=06.02.2009 03:20}{thema=}{post}Посмотрите, может быть Вас устроит?  
С уважением, Александр.{/post}{/quote}  
 
К сожалению нет, сам способ не подойдет, потому что должна быть сводная (обычная) таблица с неповторяющимися данными из Листа 1, напротив которой стояли бы доля каждого ИП от всего направления (москва-Волгоград)...

Т.е. для 2003 такого нет? (

Z помогай, не молчи )

Сорри, не подумал его урезать... Доля работает только от общей суммы по столбцам/строкам  
 
ЗЫ а инет у меня безлимитный )

Сам файл:

Всем привет!  
 
Коллеги, мне очень нужно чтобы в сводной таблице отображалось процентное отношение кол-ва по полю к промежуточному итогу…  
 
Все описание в приложенном файле... Ковыряюсь уже второй день, никак не могу додумать как это сделать с помощью сводной.

Ап плиззз

up!

При обновлении сводной таблицы форматы во всех сводных диаграммах сбрасываются на первоначальные...  
 
Как бороться? Автоформат в параметрах таблицы не спасает...

{quote}{login=VikNik}{date=23.01.2009 02:38}{thema=}{post}Сервис - Параметры - Цвет - Сброс  
 
Попробуйте.{/post}{/quote}  
 
Спасибо :)

Огромный недостаток: эта фунция не возвращает текстовые значения, только числовые... :(  
 
Сейчас думаю как обойти...

Очень не хочется поднимать старую тему, но я перечитал 25 страниц поиска по этой проблеме, поймите правильно - очень нужно разобраться.    
 
Z, как работает формула СУММПРОИЗВ в данном случае? Из всех возможных вариантов я никогда бы не подумал именно на эту...