Старый 28.10.2008, 23:14   #1
Информер 2006
 
Аватар для papik
 
Регистрация: 02.04.2005
Возраст: 68
Сообщений: 6,070
Вес репутации: 20 papik имеет захватывающую ауруpapik имеет захватывающую ауру


Отправить сообщение для papik с помощью ICQ Отправить сообщение для papik с помощью Skype™
По умолчанию Курсы по Excel

Желающие изучить Excel, научится программировать в VBA....

Курсы платные, цена зависит от количества курсантов.

Это предварительный опрос.

Еще над уговорить профессионала в этой области.
__________________
Если бы Молодость знала, если бы Старость могла....
papik вне форума   Ответить с цитированием
Старый 29.10.2008, 09:39   #2
Знаменитость
 
Аватар для voland
 
Мужчина
Регистрация: 18.12.2004
Возраст: 36
Сообщений: 2,361
Вес репутации: 0 voland кажется, это ваша репутацияvoland кажется, это ваша репутацияvoland кажется, это ваша репутацияvoland кажется, это ваша репутация

Отправить сообщение для voland с помощью ICQ Отправить сообщение для voland с помощью Skype™
По умолчанию Ответ: Курсы по Excel

Каким боком тема касается топика?
voland вне форума   Ответить с цитированием
Старый 29.10.2008, 18:56   #3
Информер 2006
 
Аватар для papik
 
Регистрация: 02.04.2005
Возраст: 68
Сообщений: 6,070
Вес репутации: 20 papik имеет захватывающую ауруpapik имеет захватывающую ауру


Отправить сообщение для papik с помощью ICQ Отправить сообщение для papik с помощью Skype™
По умолчанию Ответ: Курсы по Excel

Цитата:
Сообщение от voland Посмотреть сообщение
Каким боком тема касается топика?
vealokin!
Я думал форумчан заинтересует Excel(многие понятия не имеют, что это и зачем) и я бы показал примеры программ.... , а создав тему в "Поиск и предложение услуг", меня бы, так же, бы, обвинили...
Установка Масштаба под любой монитор
Код:
Private Sub Workbook_Open()
Dim i As Integer, xK As Long
i = 11: xK = 23
    With Application
        .ScreenUpdating = False
        .EnableEvents = False
            For L = 1 To 3
            Sheets(L).Select
    r = ActiveCell.Row
    c = ActiveCell.Column
    Range(Cells(1, 1), Cells(xK, i)).Select
    ActiveWindow.Zoom = True
    Cells(r, c).Select
    xK = 23
            Next
                Sheets("Лист1").Select
        .EnableEvents = True
        .ScreenUpdating = True
    End With
End Sub
voland!
Уже ни каким, тема закрыта.
__________________
Если бы Молодость знала, если бы Старость могла....

Последний раз редактировалось papik; 29.10.2008 в 19:22.
papik вне форума   Ответить с цитированием
Ответ

  HitForum - Форумы Мариупольской Городской Сети > Разное > Поиск и предложение услуг


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB code is Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Курсы массажа в Мариуполе. П-13 Мариуполь 10 20.10.2015 09:23
ВОДИТЕЛЬСКИЕ КУРСЫ *МИЛЕНА* Авто/Мото 143 11.04.2011 11:20

© 2003 - HitLine.
Часовой пояс GMT +3, время: 12:17.