Excel

Тема в разделе "Lotus - Программирование", создана пользователем Fugitive, 23 янв 2006.

Статус темы:
Закрыта.
  1. Fugitive

    Fugitive Гость

    В Excel можно сделать автоподбор ширины столбца (Формат -> Столбец -> Автоподбор ширины). Если посмотреть как это делается в макросе то вот :
    Sub macros1()
    Cells.Select
    Range("R13").Activate
    Selection.Columns.AutoFit
    End Sub

    Можно ли как-нибудь в лотусе сказать, чтобы у колонки был Autofit. Не пойму как обратиться....
    В лотусе я создаю лишь один обьект:
    Dim myExObj As Variant
    Set myExObj = CreateObject("Excel.application")
     
  2. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Да. Такими же методами, как и в VBA.
    Например:
    Код (Text):
    Dim myExObj As Variant
    Dim xlWbk As Variant
    Dim xlSheet As Variant
    Set myExObj = CreateObject( "Excel.Application" )
    myExObj.Visible = True
    Set xlWbk = myExObj.Workbooks.Add
    xlWbk.ActiveSheet.Cells(1, 1) = "adas"
    xlWbk.ActiveSheet.Range("A1").Columns.AutoFit
     
  3. Fugitive

    Fugitive Гость

    Спасибо большое !
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей