Добрый день.
Пример упрощенный, но суть та же...
Столкнулся с необъяснимым. Не могу понять почему не выполняется условие:

По моим ожиданиям 1,1 - 0,9 = 0,2, что меньше (нет) или равно (да) 0,2. Стало быть условие выполняется... А нет!

Всем привет) Помогите с реализацией задания. Есть диапазон от $A$1 до С1000 (например). Начало диапазона всегда постоянно! Часть ячеек в нем пустые, часть заполнены... Надо все значения непустых ячеек собрать через запятую (или иной разделитель) в ячейку, например, $D$1.  
Через простое "=сцепить..." можно было-бы, но кто его знает сколько там строк придется вставить... поэтому уж лучше сразу до 1000 диапазон установить, чтобы наверняка, и прописать через макрос. Как это сделать? Или есть способ проще?

Всем привет) Пытаюсь написать макрос, но не совсем выходит... Есть некая книга, в этой книге много листов с множеством страниц на листе. Их постоянно прокручивают и меняют масштаб при работе. В конце, определенные листы (например с ячейкой А1=qwerty) надо привести к единому виду (например масштаб 90, строки и столбцы прокрутить на начало).  
 
Вариант1:  
 
Sub test()  
For Each sh In ThisWorkbook.Worksheets  
If sh.Range("A1") = "QWERTY" Then  
   ActiveWindow.Zoom = 90  
   ActiveWindow.ScrollRow = 1  
   ActiveWindow.ScrollColumn = 1  
End If  
Next sh  
End Sub  
 
Не выходит (выделяет именно АктивноеОкно, а не все выделеные)...  
 
Вариант2:  
 
Sub test()  
For Each sh In ThisWorkbook.Worksheets  
If sh.Range("A1") = "QWERTY" Then  
   ActiveWindow.Zoom = 90  
   ActiveWindow.ScrollRow = 1  
   ActiveWindow.ScrollColumn = 1  
End If  
Next sh  
End Sub  
 
Попробовал через цикл (чтоб последовательно), всеравно не выходит...  
 
Если что-то сделано по глупому, сорри - токо учусь, все собирал из примеров...))  
 
Заранее спасибо!

Всем доброго дня) Помогите решить задачу - есть некая таблица с данными, есть форма специального бланка. Нужно данные из таблицы перенести в форму со вставкой строк. Строк вставлять необходимо столько, сколько заполненых строк в таблице.    
 
Как вставлять строки нашел, как переносить данные знаю, не понятно, как вставлять то необходимое число строк исходя из заполненности таблицы...  
 
Заранее спасибо)))

Всем доброго вечера) Нужна помощь в следующем деле - нужно менять цвет кнопки на листе в зависимости от содержания ячейки...  
 
Например: кнопке присвоен простой макрос копирования    
 
Sub КОПИРОВАНИЕ()  
   Range("A1").Select  
   Selection.Copy  
   Range("A2").Select  
   Selection.PasteSpecial Paste:=xlPasteValues  
   Application.CutCopyMode = False  
End Sub  
 
Если значение А1=0 - цвет кнопки серый (например)  
если А1=1 - красный  
если А1=2 - зеленый  
 
Както это можно реализовать?

Всем доброго времени суток! Подскажите пожалуйста, можно ли проставлять в нижнем колонтитуле слева всех листов книги данные из одной ячейки, например, А1 первого листа?  
 
Если знаете способ через макросы, то изложите его более подробно - я в них не силен... ))  
 
Заранее спасибо

Всем доброй ночи. Не могу избавиться от ошибки, которая выскакивает, например в таком случае:  
 
ячейка A1 содержит дату 01.01.2011  
формула в другой ячейке <=сцепить("сегодня";А1)> выдает не <сегодня 01.01.2011>, а <сегодня 40544>.... Как сделать, чтобы все работало правильно?  
 
P.S. - перед датой ставить апостроф не получится, т.к. есть другие формулы, работающие именно с форматом ячейки "дата", а не "текстовый"...

Всем привет) Помогите решить задачу с макросом - в книге есть определенное число страниц. Нужно заполнить таблицу (допустим, на последнем листе, назовем его общий итог), в которой в одном столбце будут отражаться имена существующих листов, а в другом столбце данные из определенной ячейки каждого листа

Всем доброго времени суток) Осваиваю EXCEL, но наткнулся на необходимость следующего: есть определенная таблица:  
  1а обьект1  
  2а обьект2  
  3а обьект3  
  ...  
 
Необходимо чтобы в книге строились листы с именем 1а, 2а, 3а.... Я так понимаю, что в помощь надо брать макрос? Если да, то хотябы натолкните на мысль, как реализовать))) Заранее благодарен.