Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.09.2012, 11:22   #11
KApSuL
Форумчанин
 
Регистрация: 04.09.2010
Сообщений: 119
По умолчанию

Код:
    'Set printstart = [A:A].Find("ϲÁ", LookIn:=xlValues).EntireRow
    'Set printend = [A:A].Find("", LookIn:=xlValues).EntireRow
    'ActiveSheet.PageSetup.PrintArea = Intersect(ActiveSheet.UsedRange, Range(nachalo, konec).EntireRow)
чёт не выходит
KApSuL вне форума Ответить с цитированием
Старый 25.09.2012, 11:25   #12
kuklp
Участник клуба
 
Регистрация: 02.05.2010
Сообщений: 1,390
По умолчанию

Intersect(ActiveSheet.UsedRange, Range(nachalo, konec).EntireRow).address
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728
kuklp вне форума Ответить с цитированием
Старый 25.09.2012, 11:33   #13
KApSuL
Форумчанин
 
Регистрация: 04.09.2010
Сообщений: 119
По умолчанию

не получается=(
Вложения
Тип файла: rar EKZAMEN_ANSWER.rar (82.3 Кб, 5 просмотров)
KApSuL вне форума Ответить с цитированием
Старый 25.09.2012, 11:39   #14
KApSuL
Форумчанин
 
Регистрация: 04.09.2010
Сообщений: 119
По умолчанию

а всё получилось спасибо
ненароком потёр
Код:
ActiveSheet.PageSetup.PrintArea =
KApSuL вне форума Ответить с цитированием
Старый 25.09.2012, 11:39   #15
kuklp
Участник клуба
 
Регистрация: 02.05.2010
Сообщений: 1,390
По умолчанию

Я Вам часть строки привел. Думал - разберетесь:
ActiveSheet.PageSetup.PrintArea = Intersect(ActiveSheet.UsedRange, Range(printstart, printend).EntireRow).Address
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728
kuklp вне форума Ответить с цитированием
Старый 25.09.2012, 12:08   #16
KApSuL
Форумчанин
 
Регистрация: 04.09.2010
Сообщений: 119
По умолчанию

ну в итоге разобрался=)спасибо
а вы мне книгу не посоветуете хорошую какую-нить?

Последний раз редактировалось KApSuL; 25.09.2012 в 12:29.
KApSuL вне форума Ответить с цитированием
Старый 25.09.2012, 13:32   #17
DiemonStar
Старожил
 
Регистрация: 08.02.2012
Сообщений: 2,173
По умолчанию

Цитата:
а вы мне книгу не посоветуете хорошую какую-нить?
я больше справкой пользуюсь + форум почитываю + гуглю когда что-то конкретное нужно...
Правильно поставленная задача - три четверти решения.
DiemonStar вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление строк и столбцов на C++ Orbit@L Помощь студентам 0 12.03.2012 15:59
удаление связи и столбцов zenner Microsoft Office Excel 3 17.11.2011 23:03
удаление столбцов delphi nikita33321 Помощь студентам 2 16.10.2009 18:25
Поиск и удаление столбцов mchip Microsoft Office Excel 4 17.05.2009 18:48
Удаление столбцов в DBGrid-e artemavd БД в Delphi 4 24.10.2008 14:30