Як спілкуватися в чаті в Outlook Web App
Досліджуйте, як ефективно спілкуватися в чаті з колегами в Outlook Web App. Дізнайтеся про покрокову інструкцію та нові можливості для підвищення продуктивності.
Як використовувати If-Then в Excel 2016 VBA
Якщо-Тоді є найважливішою структурою керування VBA. Ймовірно, ви будете використовувати цю команду щодня. Використовуйте структуру If-Then, коли ви хочете виконати один або кілька операторів умовно. Необов’язкове речення Else, якщо воно включене, дозволяє виконувати один або кілька операторів, якщо умова, яку ви тестуєте, не відповідає дійсності. Ось проста процедура CheckUser, перекодована для використання структури If-Then-Else:
Sub CheckUser2()
Ім'я користувача = InputBox ("Введіть своє ім'я: ")
Якщо Ім’я користувача = «Сатья Наделла», Тоді
MsgBox («Ласкаво просимо, Сатья…»)
' …[Більше коду тут] …
Інакше
MsgBox «Вибачте. Тільки Сатья Наделла може керувати цим».
Кінець Якщо
Кінець суб
Приклади Якщо-Тоді
Наступна підпрограма демонструє структуру If-Then без необов’язкового речення Else:
Sub GreetMe() Якщо час < 0,5, то MsgBox «Доброго ранку» Кінець суб
Процедура GreetMe використовує функцію Time VBA для отримання системного часу. Якщо поточний час менший за 0,5, програма відображає дружнє привітання. Якщо Time більше або дорівнює 0,5, програма закінчується, і нічого не відбувається.
Щоб відобразити інше привітання, якщо Time більше або дорівнює .5, ви можете додати інший оператор If-Then після першого:
Підприємство GreetMe2() Якщо час < 0,5, то MsgBox «Доброго ранку» Якщо час >= 0,5, то MsgBox «Добрий день» Кінець суб
Зверніть увагу, що >= (більше або дорівнює) використовується для другого оператора If-Then. Це гарантує охоплення всього дня. Якби було використано > (більше ніж), повідомлення не з’являлося б, якби ця процедура була виконана рівно о 12:00. Це малоймовірно, але з такою важливою програмою, як ця, ви не хочете ризикувати.
Приклад If-Then-Else
Інший підхід до попередньої проблеми використовує речення Else. Ось та сама процедура, перекодована для використання структури If-Then-Else:
Підприємство GreetMe3()
Якщо час < 0,5, то MsgBox «Добрий ранок» Інше _
MsgBox «Добрий день»
Кінець суб
Зверніть увагу, що в попередньому прикладі використовується символ продовження рядка (підчерки). Оператор If-Then-Else насправді є одним оператором. VBA надає дещо інший спосіб кодування конструкцій If-Then-Else, які використовують оператор End If. Тому процедуру GreetMe можна переписати як
Підприємство GreetMe4()
Якщо Час < 0,5 Тоді
MsgBox «Доброго ранку»
Інакше
MsgBox «Добрий день»
Кінець Якщо
Кінець суб
Фактично, ви можете вставити будь-яку кількість операторів у частину If і будь-яку кількість операторів у частину Else. Цей синтаксис легше читати і робить інструкції коротшими.
Що робити, якщо вам потрібно розширити процедуру GreetMe, щоб обробити три умови: вранці, вдень та ввечері? У вас є два варіанти: використовувати три оператори If-Then або використовувати вкладену структуру If-Then-Else. Вкладеність означає розміщення структури If-Then-Else в іншій структурі If-Then-Else. Перший підхід з використанням трьох операторів If-Then є простішим:
Підприємство GreetMe5() Приглушити повідомлення як рядок Якщо час < 0,5, тоді повідомлення = «Ранок» Якщо час >= 0,5 і час < 0,75, тоді повідомлення = «Південь» Якщо час >= 0,75, тоді повідомлення = «Вечір» MsgBox «Добре» і повідомлення Кінець суб
З використанням змінної було додано новий поворот. Змінна Msg отримує різне текстове значення залежно від часу доби. Оператор MsgBox відображає привітання: Доброго ранку, Доброго дня або Доброго вечора.
Наступна програма виконує ту саму дію, але використовує структуру If-Then-End If:
Підприємство GreetMe6()
Приглушити повідомлення як рядок
Якщо Час < 0,5 Тоді
Повідомлення = «Ранок»
Кінець Якщо
Якщо час >= 0,5 і час < 0,75, то
Повідомлення = «День»
Кінець Якщо
Якщо Час >= 0,75 Тоді
Повідомлення = «Вечір»
Кінець Якщо
MsgBox «Добре» і повідомлення
Кінець суб
Використання ElseIf
У попередніх прикладах виконується кожен оператор підпрограми. Трохи ефективніша структура вийде з підпрограми, щойно умова виявиться істинною. Вранці, наприклад, процедура має відобразити повідомлення «Доброго ранку», а потім вийти — без оцінки інших зайвих умов.
Завдяки такій крихітній рутині вам не доведеться турбуватися про швидкість виконання. Але для більших додатків, у яких швидкість є критичною, вам слід знати про інший синтаксис для структури If-Then.
Ось як ви можете переписати процедуру GreetMe за допомогою цього синтаксису:
Підприємство GreetMe7() Приглушити повідомлення як рядок Якщо Час < 0,5 Тоді Повідомлення = «Ранок» Інакше Якщо Час >= 0,5 І Час < 0,75 Тоді Повідомлення = «День» Інакше Повідомлення = «Вечір» Кінець Якщо MsgBox «Добре» і повідомлення Кінець суб
Коли умова істинна, VBA виконує умовні оператори, і структура If закінчується. Іншими словами, ця процедура є трохи ефективнішою, ніж попередні приклади. Компроміс у тому, що код важче зрозуміти.
Інший приклад Якщо-Тоді
Ось ще один приклад, який використовує просту форму структури If-Then. Ця процедура пропонує користувачеві ввести кількість, а потім відображає відповідну знижку на основі кількості, яку вводить користувач:
Sub ShowDiscount()
Приглушена кількість, як довго
Димна знижка як подвійна
Кількість = InputBox ("Введіть кількість:")
Якщо кількість > 0, то знижка = 0,1
Якщо кількість >= 25, то знижка = 0,15
Якщо кількість >= 50, то знижка = 0,2
Якщо кількість >= 75, то знижка = 0,25
MsgBox “Знижка: “ & знижка
Кінець суб
Зверніть увагу, що кожен оператор If-Then у цій підпрограмі виконується, і значення для Discount може змінюватися під час виконання операторів. Однак програма зрештою відображає правильне значення для Discount, оскільки оператори If-Then розташовані в порядку зростання значень Discount.
Наступна процедура виконує ті самі завдання, використовуючи альтернативний синтаксис ElseIf. У цьому випадку програма закінчується відразу після виконання операторів для істинної умови:
Sub ShowDiscount2()
Приглушена кількість, як довго
Димна знижка як подвійна
Кількість = InputBox ("Введіть кількість: ")
Якщо кількість > 0 і кількість < 25, то
Знижка = 0,1
ІнакшеЯкщо кількість >= 25 і кількість < 50 Тоді
Знижка = 0,15
ІнакшеЯкщо кількість >= 50 і кількість < 75 Тоді
Знижка = 0,2
ElseIf Кількість >= 75 Тоді
Знижка = 0,25
Кінець Якщо
MsgBox “Знижка: “ & знижка
Кінець суб
Ці численні структури If-Then є досить громіздкими. Ви можете використовувати структуру If-Then лише для простих бінарних рішень.
Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows
Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows. Microsoft Word відкриває файли в режимі лише для читання, що робить неможливим їх редагування? Не хвилюйтеся, методи наведено нижче
Як виправити неправильний друк документів Microsoft Word
Як виправити помилки під час друку неправильних документів Microsoft Word Помилки під час друку документів Word зі зміненими шрифтами, безладними абзацами, відсутнім текстом або втраченим вмістом є досить поширеними. Однак не варто
Зітріть малюнки ручкою та маркером на слайдах PowerPoint
Якщо ви використовували перо або маркер для малювання на слайдах PowerPoint під час презентації, ви можете зберегти малюнки для наступної презентації або стерти їх, щоб наступного разу, коли ви показуватимете їх, розпочали з чистих слайдів PowerPoint. Дотримуйтесь цих інструкцій, щоб стерти малюнки пером і маркером: Стирання рядків на одній з […]
Вміст бібліотеки стилів у SharePoint 2010
Бібліотека стилів містить файли CSS, файли мови розширюваної мови таблиць стилів (XSL) та зображення, які використовуються попередньо визначеними основними сторінками, макетами сторінок та елементами керування в SharePoint 2010. Щоб знайти файли CSS у бібліотеці стилів сайту видавництва: виберіть «Дії сайту»→ «Перегляд». Весь вміст сайту. З’являється вміст сайту. Бібліотека Style знаходиться в […]
Форматуйте числа в тисячах і мільйонах у звітах Excel
Не перевантажуйте аудиторію гігантськими цифрами. У Microsoft Excel ви можете покращити читабельність своїх інформаційних панелей і звітів, відформатувавши числа, щоб вони відображалися в тисячах або мільйонах.
Як ділитися сайтами SharePoint і слідкувати за ними
Дізнайтеся, як використовувати інструменти соціальних мереж SharePoint, які дозволяють особам і групам спілкуватися, співпрацювати, обмінюватися інформацією та спілкуватися.
Як перетворити дати в юліанські формати в Excel
Юліанські дати часто використовуються у виробничих середовищах як мітка часу та швидкий довідник для номера партії. Цей тип кодування дати дозволяє роздрібним продавцям, споживачам та агентам з обслуговування визначити, коли був виготовлений продукт, а отже, і вік продукту. Юліанські дати також використовуються в програмуванні, військовій справі та астрономії. Інший […]
Як створити веб-програму Access
Ви можете створити веб-програму в Access 2016. Так що ж таке веб-програма? Ну, веб означає, що він онлайн, а додаток — це просто скорочення від «додаток». Користувацька веб-програма — це онлайн-додаток для баз даних, доступ до якого здійснюється з хмари за допомогою браузера. Ви створюєте та підтримуєте веб-програму у настільній версії […]
Панель швидкого запуску в SharePoint 2010
Більшість сторінок у SharePoint 2010 відображають список посилань навігації на панелі швидкого запуску ліворуч. Панель швидкого запуску відображає посилання на пропонований вміст сайту, наприклад списки, бібліотеки, сайти та сторінки публікації. Панель швидкого запуску містить два дуже важливі посилання: Посилання на весь вміст сайту: […]