actsuriname.org

Програма Microsoft Office Excel робить набагато більше, ніж створює електронні таблиці. У ній ви можете виконувати вдосконалені математичні обчислення та перетворення на основі інформації, що міститься в різних комірках даних. Крім того, ви можете створювати основні структури даних, такі як черги, в Excel за допомогою макросів Visual Basic. Використання черги для управління продуктами або ведення документації, коли вам потрібна модель «Перший, перший», може значно полегшити життя власнику малого бізнесу. За допомогою якогось простого коду ви можете використовувати чергу в Excel, не вивчаючи розширене програмування чи програмне забезпечення, орієнтоване на вчених-інформатиків.

1

Показати вкладку Розробник на стрічці Excel. Натисніть кнопку Office | "Параметри Excel" | "Популярний" | "Показати вкладку розробника на стрічці."

2

Клацніть на клітинку "A1" і введіть слово "Title".

3

Клацніть клітинку B1 і натисніть "Вага".

4

Додайте кнопку на робочий аркуш Excel, щоб додати елементи до черги. Виберіть "Розробник" | "Вставити" | "Елементи керування формою." Виберіть піктограму «кнопка». Назвіть його "Вставити" у вікні імені макросу. З'явиться вікно коду VB.

5

Введіть наступний код VB у вікно кодування. Для цього буде використано ім’я, введене в клітинку C1, і вагу, введене в C2, і розмістити їх у черзі:

Рядки ("2: 2"). Вставити зсув: = xlДіапазон зниження ("C1"). Діапазон копіювання ("A2"). PasteSpecial Range ("C2"). Діапазон копіювання ("B2"). PasteSpecial ActiveCell.Offset ( 0, 1) = Тепер Діапазон ("A: B"). Клавіша сортування1: = Діапазон ("B1"), order1: = xlЗростаючий, Заголовок: = xlТак

6

Додайте ще одну кнопку, назвавши її "Видалити". Додайте наступний код у вікно коду VB. Тепер ви можете видалити останній елемент у черзі, натиснувши кнопку:

Діапазон ("A1"). Кінець (xldown). Видалити діапазон ("B1"). Кінець (xldown). Видалити