Всем привет) Помогите разобраться в чем ошибка.    
Код писал не я, но мне нужно его исправить.  
Собственно,runtime error 424 object required  
ошибка указывает на 2ую строку.Когда наводишь курсор пишет: Set rCol.EntireColumn.Hidden = Falce  
 
Sub HideCol(rCol As Range)  
 Set rCol.EntireColumn.Hidden = True  
End Sub  
 
iCol = 1  
Do Until agR.Cells(1, iCol + 1) <> ""  
  iCol = iCol + 1  
Loop  
 
If agR.Cells(2, iCol).Formula = "Ïëàí" Then Call HideCol(agR.Cells(1, iCol).EntireColumn)

Подскажите пожалуйста , какие параметры в методе FIND нужно задать, чтобы выбиралось точное совпадение один в один?

Всем привет. Подскажите, с помощью какой формулы сделать в ячейке смещение даты на один день.   пример   13.03.2012  , в соседней ячейке нужно сделать 14.03.2012

Помогите придумать логику макроса и, по возможности, помочь написать.Сверху развертка дней с текущего по последний день месяца. Только для  текущего дня оставить набор столбцов:, факт, прогноз,отклонение(плана нет). Для остальных дней оставить только план. Столбцы можно либо скрыть, либо удалить. Спасибо.  
 
13.08.2012````````````````14.08.2012```````````15.08.2012````````31.08.2012  
|Факт|Прогноз|Отклон````|`````План````````|````````План``````|````````План````` |