Отчет о совместимости для Комплект.xls			
Дата отчета:  22 . 01 . 2010   14 : 21 			
			
Некоторые свойства данной книги не поддерживаются более ранними версиями Excel. Сохранение книги в формате более ранней версии приведет к потере или ограничению функциональности этих свойств.			
			
Существенная потеря функциональности			Число экземпляров
			
Число условных форматов в некоторых ячейках превышает поддерживаемое выбранным форматом файла. В более ранних версиях Excel будут отображаться только первые три условия.			 2 
			'Радуга'!S126:S129
			'Моддинг'!S145:S148
			
Некоторые ячейки относятся сразу к нескольким диапазонам условного форматирования. В более ранних версиях Excel к таким ячейкам будут применены не все правила условного форматирования. Для таких ячеек будет использоваться разное условное форматирование.			 51 
			'Радуга'!S126:S129
			'Моддинг'!S145:S148
			'Моддинг'!E49:E61
			'Моддинг'!D49
			'Моддинг'!D53
			'Моддинг'!D45:E45
			'Моддинг'!E46:E47
			'Моддинг'!E44
			'Моддинг'!D56:D57
			'Моддинг'!D60:D61
			'Моддинг'!D64:E65
			'Моддинг'!D68:E69
			'Моддинг'!E71
			'Заказ'!E16:E55
			
Некоторые ячейки содержат условное форматирование со снятым параметром "Остановить, если истина". Более ранним версиям Excel этот параметр не известен, поэтому выполнение будет остановлено после первого истинного условия.			 7 
			'Радуга'!AO4:AO209
			'Радуга'!AQ4:AQ209
			'Моддинг'!AO4:AO228
			'Моддинг'!AQ4:AQ228
			'Заказ'!E16:E55
			
			
Несущественная потеря точности			
			
Некоторые ячейки или стили в этой книге содержат форматирование, не поддерживаемое выбранным форматом файла. Эти форматы будут преобразованы в наиболее близкий из имеющихся форматов.			 182 

Private Sub Help_Click()

For x =  1  To  46 
ActiveSheet.Shapes("SpinButton" & x).Select
Next

    With Selection
        .Placement = xlMove
    End With

If Help.Value Then
Rows( 2 ).EntireRow.Hidden = False
Else
Rows( 2 ).EntireRow.Hidden = True
End If

    With Selection
        .Placement = xlFreeFloating
    End With

End Sub