ДГ = ЭлементыФормы.ДГ; // Установить заголовок диаграммы. ДГ.ОбластьЗаголовка.Текст = "График дежурств"; // Интервал будем определять самостоятельно. ДГ.АвтоОпределениеПолногоИнтервала...
Запрос = Новый Запрос( "ВЫБРАТЬ | ТоварыНаСкладахОстаткиИОбороты.Склад КАК Склад, | ТоварыНаСкладахОстаткиИОбороты.Склад.Представление, | ТоварыНаСкладахОстаткиИОбороты.Номенклатура КАК Номенклатура, | ТоварыНаСкладахОстаткиИОбороты.Номенклатура.Представление,...
// Настроить свойства диаграммы. Диаграмма = ЭлементыФормы.ДиаграммаПродажи; Диаграмма.ТипДиаграммы = ТипДиаграммы.Измерительная; Диаграмма.АвтоМаксимальноеЗначение = Ложь; Диаграмма.МаксимальноеЗначение = 20000; Диаграмма.АвтоМинимальноеЗначение...
Диаграмма = ЭлементыФормы.Диаграмма; // Очистить диаграмму, возможно ранее в нее уже выводились данные. Диаграмма.КоличествоСерий = 0; Диаграмма.КоличествоТочек...
// объединяем ячейки, ПРИ ИСПОЛЬЗОВАНИИ уберите символ _ в S_elect excel.Range(("B"+Строка(стр))+":"+("c"+строка(стр))).S_elect(); excel.S_election.Merge();
Отчет = РабочиеКниги.Open(Каталог+Названиефайла); ОтЛевогоКрая=550; ОтВерха=80; Длина=100; Высота=50; кн = Отчет.Sheets(1).OLEObjects.Add("Forms.CommandButton.1",,,,,,,ОтЛевогоКрая, ОтВерха, Длина,Высота); st = "Private Sub CommandButton1_Click()"...
Ячейка = Лист.Cells(1,8); Ячейка.Formula="=SUM(R11C:R[-1]C)"; Процедура Сформировать() Перем Кат,Шаб; Ехсел=СоздатьОбъект("Excel.Application"); Книга=Ехсел.Workbooks; Если ФС.ВыбратьФайл(0,Кат,Шаб,"Выбери файл Еxcel",,"*.xls",)=1 Тогда Книга.Open(Шаб+Кат); Ехсел.Range("C1").FormulaR1C1...
В ниже указанном коде нужно убрать символ _ //Группировка строк по уровню 2 Worksheet.Range("7:8").Rows.Group(); Worksheet.Range("10:11").Rows.Group(); Worksheet.Range("14:15").Rows.Group(); Worksheet.Range("17:18").Rows.Group();...
Узнать последнюю строку можно следующими примерами: 1. Сообщить(appExcel.WorkSheets(1).UsedRange.Row); 2. метод определяет, когда закончились данные на листе: SpecialCells(11)...
Процедура ФормДиаграммы() Траб=Новый ТаблицаЗначений; Траб.Очистить(); Траб.Колонки.Добавить("ххх"); Траб.Колонки.Добавить("Норм"); Траб.Колонки.Добавить("Факт"); НовСтр=Траб.Добавить(); НовСтр.ххх="а1"; НовСтр.Норм=5; НовСтр.Факт=10; НовСтр=Траб.Добавить(); НовСтр.ххх="а2"; НовСтр.Норм=2; НовСтр.Факт=15; НовСтр=Траб.Добавить();...
// Показать период времени (затраченного на обработку) в формате hh:mm:ss ВремяСтарта = ТекущаяДата(); // ... Далее выполняется...
Командировка должна быть проведена не только как кадровый документ, на основании кадрового нужно еще сформировать расчетный документ....
В справочнике Сотрудники откройте вашего сотрудника и загляните на вкладку Кадровые данные. В таблице Место работы отображаются...
Достаточно скорректировать дату окончания в документах на отпуск и перерассчитать.
Для сторнирования в Бухгалтерии 8 используется документ «Корректировка записей регистров» (меню Операции). На закладке «Заполнение движений» поставьте...
Создать нового сотрудника в справочнике «Сотрудники» необходимо, а вот вводить данные о нем не понадобится – они...
Файл для загрузки содержит данные вида(КодФизЛица, ФизЛицо, Сумма): 000000513~Петров Юрий Викторович~150 000000184~Иванов Александр Юрьевич~50 //Выбор файла Режим...
ВидУдерж=Неопределено; МассивТипов = Новый Массив; МассивТипов.Добавить(Тип("ПланВидовРасчетаСсылка.УдержанияОрганизаций")); ОписаниеВозможныхТипов = Новый ОписаниеТипов(МассивТипов); Если ВвестиЗначение(ВидУдерж,"Выберите вид удержания", ОписаниеВозможныхТипов) Тогда Сообщить(ВидУдерж);...
Функция ПересчетСуммыПоКурсу(ВалютнаяСумма, Валюта, Дата) Экспорт Запись = РегистрыСведений.КурсыВалют.ПолучитьПоследнее(Дата, Новый Структура("Валюта", Валюта)); Сумма = ВалютнаяСумма * Запись.Курс; Если...
Режим = РежимДиалогаВыбораФайла.Сохранение; ДиалогСохраненияФайла = Новый ДиалогВыбораФайла(Режим); ДиалогСохраненияФайла.ПолноеИмяФайла = "Выгрузка_"+Формат(ПериодРегистрации,"ДФ=M_yy"); Фильтр = "Текст(*.txt)|*.txt"; ДиалогСохраненияФайла.Фильтр = Фильтр; ДиалогСохраненияФайла.МножественныйВыбор...