Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на Basic / VBA

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 1.823 RSS
←   Январь 2010   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
09.01.2010
02:07:12
13:11:54
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://prog.rusfaq.ru/basic
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

1.823 подписчиков
0 за неделю
←   Все выпуски   →

RFpro.ru: Программирование на Basic / VBA


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный платный хостинг на базе Windows 2008

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

Гаряка Асмик
Статус: Практикант
Рейтинг: 1522
∙ повысить рейтинг » 		Vasiliy83
Статус: Бакалавр
Рейтинг: 1145
∙ повысить рейтинг » 		Megaloman
Статус: Бакалавр
Рейтинг: 927
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Basic/VBA

Номер выпуска:980
Дата выхода:25.01.2010, 18:00
Администратор рассылки:Калашников О.А., Руководитель
Подписчиков / экспертов:371 / 99
Вопросов / ответов:2 / 2

Вопрос № 176139: Уважаемые эксперты подскажите в следующем, как сделать видимой, то есть выше всех окон открытую программу If Tasks.Exists(Name:="КУСП") = True Then ....... ‘сделать видимой Спасибо Эндрю ...

Вопрос № 176154: Уважаемые эксперты, подскажите, почему, когда я пошагово выполняю код макроса, изначально у меня текст был выделен, выполняю, эти строки кода, выделение пропадает, почему???? Самое интересное, выделение, может пропасть, может не пропасть, отче...
Вопрос № 176139:

Уважаемые эксперты подскажите в следующем, как сделать видимой, то есть выше всех окон открытую программу
If Tasks.Exists(Name:="КУСП") = True Then ....... ‘сделать видимой
Спасибо Эндрю

Отправлен: 19.01.2010, 21:01
Вопрос задал: Ципихович Эндрю, Посетитель
Всего ответов: 1
Страница вопроса »

Отвечает Гаряка Асмик, Практикант :
Здравствуйте, Ципихович Эндрю.

If Tasks.Exists(Name:="КУСП") = False Then
Shell "E:\MY_DOCS\rfpro\kp.exe", vbNormalFocus
Else
Tasks.item("КУСП").Activate
End If
-----
Я ни от чего, ни от кого не завишу.

Ответ отправил: Гаряка Асмик, Практикант
Ответ отправлен: 23.01.2010, 20:55

Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 258881 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Вопрос № 176154:


    Уважаемые эксперты, подскажите, почему, когда я пошагово выполняю код макроса, изначально у меня текст был выделен, выполняю, эти строки кода, выделение пропадает, почему????
    Самое интересное, выделение, может пропасть, может не пропасть, отчего так происходит????
    Номер_страницы_по_счёту_на_которой_располагается_начало_выделения = ActiveDocument.ActiveWindow.Panes(1).Selection.Range.Information(wdActiveEndPageNumber) - .ComputeStatistics(wdStatisticPages) + 1
    Номер_страницы_по_счёту_на_которой_располагается_конец_выделения = ActiveDocument.ActiveWindow.Panes(1).Selection.Range.Information(wdActiveEndPageNumber)
    Правильно, ли присвоены переменные??
    Спасибо Эндрю

    Отправлен: 20.01.2010, 04:11
    Вопрос задал: Ципихович Эндрю, Посетитель
    Всего ответов: 1
    Страница вопроса »

    Отвечает Гаряка Асмик, Практикант :
    Здравствуйте, Ципихович Эндрю.

    От выполнения этих строк выделение пропасть не может. Возможно, оно пропадает, потому что Вы сами кликаете в документе. Переменные присвоены правильно.
    -----
    Я ни от чего, ни от кого не завишу.

    Ответ отправил: Гаряка Асмик, Практикант
    Ответ отправлен: 23.01.2010, 22:02

    Оценка ответа: 5

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 258882 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Оценить выпуск »
    Нам очень важно Ваше мнение об этом выпуске рассылки!

    Задать вопрос экспертам этой рассылки »

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)
    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.

    © 2001-2010, Портал RFpro.ru, Россия
    Авторское право: ООО "Мастер-Эксперт Про"
    Автор: Калашников О.А. | Программирование: Гладенюк А.Г.
    Хостинг: Компания "Московский хостер"
    Версия системы: 2010.6.14 от 23.01.2010
    В избранное