Предлагаем воспользоваться купоном - cvkyp05r1n1jrdwvefclqwkz6lwx28db - на 10% скидку при покупке GOLD-аккаунта DepositFiles с периодом действия 6 месяцев или 1 год. Купон действителен до 2010-10-19.
Золотой Клон, часть 6. В качестве примера давайте попробуем устроиться на работу в Каменоломню. Для этого первым делом заходим в Магазины/Меняла, и покупаем один Рабочий кафтан за 0,5 золотых. Его нам хватит на 30 дней. Далее заходим в Предприятия/Каменоломня, щелкаем по ссылке Трудоустройство/увольнение, после чего щелкаем по ссылке Устроиться напротив должности Подсобный рабочий. Вот и все, вы устроились, и больше от вас ничего не требуется - изо дня в день вам будут идти денежки за работу. Единственное, не забывайте вовремя покупать новый Рабочий кафтан. А также, очень желательно каждый день заходить в раздел Предприятия/Каменоломня, переходить по ссылке Статистическая информация/Знание горного дела, и щелкать по ссылке Пройти обучение у мастера. За каждое прохождение обучения начисляется 1 опыт. А чем больше у вас опыта, тем больше вам будут платить за работу: нет опыта - 0,02 золотых; 1 опыт - 0,0203 золотых; 2 опыта - 0,0206 золотых; 3 опыта - 0,021 золотых; 4 опыта - 0,0213 золотых... Все публикации по данной теме
Голая правда Интернет-заработка: Яндекс.Директ.http://e-customer.ru - это партнер Яндекс.Директ, так что зарабатывая у e-customer.ru, вы на самом деле размещаете у себя контекстную рекламу Яндекс.Директ. А следовательно, любые нарекания по поводу невыплаты заработанных денег попросту исключены. Все происходит вовремя и с улыбками. Выплаты производятся практически любым способом и в любой валюте. При этом для всех способов вывода денег, кроме перевода на карту ПриватБанка (для Украины), минимальная сумма выплаты - 1 рубль в любом денежном эквиваленте. А для вывода средств на карту ПриватБанка минимальная сумма вывода - 500 рублей. Цена за один клик может варьироваться от 1 рубля до 56 рублей (может и больше, но мне такие клики не попадались). Единственное что огорчает - сайты с посещаемостью менее 300 уникальных посетителей в день сюда не принимаются. Все публикации по данной теме
Как изменить масштаб документа с помощью комбинаций клавиш
Теги: Word
Есть ли какие-нибудь способы изменения масштаба документа с помощью комбинаций клавиш? А то лезть постоянно на ленту Вид не очень удобно.
Ну, лезть на ленту Вид для изменения масштаба не обязательно. Разве вы не заметили в правом нижнем углу окна программы ползунок, который как раз и позволяет изменять масштаб документов?
Но если, вы все-таки решили изменять масштаб документов
именно c помощью клавиатуры, тогда придется вас огорчить. Специально для данных целей никаких комбинаций клавиш не предусмотрено. Хотя, никто не мешает создать нужные действия самостоятельно.
Самый простой способ решить вашу проблему — создать макрос, который будет применять для документа вид по ширине экрана. Для этого достаточно включить запись макроса на основе своих действий, назвав его, например, MyMacro100p. После этого нажмите кнопку 100%, расположенную в разделе Масштаб
ленты Вид, чтобы вручную установить нужный масштаб. И самое последнее действие — завершить запись макроса. Вот и все, макрос создан и вам осталось назначить комбинацию клавиш для запуска макроса с именем MyMacro100p.
Более сложный вариант решения вашей проблемы — создание макроса для последовательного увеличения/уменьшения масштаба страницы. Точнее, нужно создать два макроса: один для увеличения, а другой для уменьшения масштаба. Эти макросы придется создавать в среде
Microsoft Visual Basic. Для этого отобразите диалог Макросы (комбинация клавиш Alt+F8), введите имя нового макроса, например UpZ для макроса, увеличивающего масштаб. И нажмите кнопку Создать.
Перед вами появится окно, в котором нужно ввести код макроса. При этом курсор мыши уже будет находиться в том месте, куда код нужно вводить (будет автоматически создана процедура UpZ, и нам останется только вести ее код).
Сам код макроса UpZ представлен
ниже:
Dim CurZoom As Integer CurZoom = ActiveWindow.ActivePane.View.Zoom.Percentage If CurZoom > 400 Then Exit Sub ActiveWindow.ActivePane.View.Zoom.Percentage = CurZoom + 5
Сразу же можете ввести и код второго макроса, например, выбрав для него название DownZ. Обратите внимание, что сейчас мы сами создаем новую процедуру DownZ. Если же вы воспользовались диалогом Макросы для создания макроса DownZ, обрамления новой процедуры уже будут
созданы. А значит, первую и последнюю строчку кода, представленного ниже, необходимо будет опустить
Sub DownZ() Dim CurZoom As Integer CurZoom = ActiveWindow.ActivePane.View.Zoom.Percentage If CurZoom < 20 Then Exit Sub ActiveWindow.ActivePane.View.Zoom.Percentage = CurZoom - 5 End Sub