Если ЗначениеЗаполнено(ИмяНомерЛиста.Имя) Тогда
		ИмяЛиста = ИмяНомерЛиста.Имя;
	Иначе
		
		ADOXCatalog = Новый COMОбъект("ADOX.Catalog");
		ADOXCatalog.ActiveConnection = ADODBConnection;
		
		ПереченьАдоТаблиц = ADOXCatalog.Tables;
		Номер = 1;
		Для Каждого АдоТаблица Из ПереченьАдоТаблиц Цикл
			ИмяЛиста = АдоТаблица.Name;
			Если Прав(ИмяЛиста, 1) = "$" Тогда //это правильная таблица. а бывает еще  ИмяЛиста$Область_печати
				Если Номер = ИмяНомерЛиста.Номер Тогда
					Прервать;
				КонецЕсли; 
				Номер = Номер+1;
			КонецЕсли; 
		КонецЦикла;
		
	КонецЕсли; 
	
    ТекстЗапроса = "SELECT * FROM [" + ИмяЛиста + "]";