• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Нестандартный отчёт без шаблона совсем

  • Автор темы Max_from_UA
  • Дата начала
Статус
Закрыто для дальнейших ответов.
M

Max_from_UA

Всем здравия и благополучия!
Возникла нереальная задача.
Следует без шаблона екселевского файла построить отчёт изображенный на рисунке report.JPG. Как организовать нормально циклы?
С шаблоном использовался бы метод Вакко
Открываешь Excel'евский шаблон, выдели полностью все ячейки, например пункта 1. своей формы, в меню выбери "Вставка\Имя\Присвоить..." и введи имя. Затем, в каждой ячейке, которую нужно заполнять, введи что-нить типа {A1}, {A2} и прочее. В общем обзови как-нибудь каждую. А затем, в LotusScript'е, чтобы в эту ячейку что-нибудь положить, нужно выполнять следующее:
Call SetValue(ws.Range("HEAD"), "{A1}", sTmp)
Где HEAD - это то, как ты обозвал область в Excel'е, а {A1} - это то что ты ввёл в ячейку определённую. А sTmp - это собственно значение, которое хочешь положить туда.
Функция SetValue выглядит так:
Код:
Sub SetValue(Range As Variant, CellName As String, Value) 
Dim CurCell 
With Range 
Set CurCell = .Find(CellName) 
If Not(CurCell Is Nothing) Then 
CurCell.Value = Value 
End If 
End With 
End Sub
Заранее всем спасибо!
 

Вложения

  • report.JPG
    report.JPG
    34 КБ · Просмотры: 565

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
4
А в чем проблемы?
Обычно делается. Открываешь хелп по VBA и смотришь методы и свойства.
Все реально делается.

Или, еще проще, записать макрос и спокойно перенести его в лотус.
 
M

Max_from_UA

<!--QuoteBegin-Medevic+12:07:2006, 11:31 -->
<span class="vbquote">(Medevic @ 12:07:2006, 11:31 )</span><!--QuoteEBegin-->А в чем проблемы?
Обычно делается. Открываешь хелп по VBA и смотришь методы и свойства.
Все реально делается.

Или, еще проще, записать макрос и спокойно перенести его в лотус.
[snapback]39991" rel="nofollow" target="_blank[/snapback]​
[/quote]
Просто, раньше мне приходилось делать отчёты генерацией в екселевскую таблицу, в которой были заполнены все ячейки таблицы, вклеивал сделанный отчёт в док ЛН, а тут как Вы видети не все ячейки ,однако, они чётко определённые.
Где проставлена литера ве, надо аполнять.
Уточнюсь о циклах: циклы для заполнения ячеек ексель-таблицы.
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!