Verwendung von Excel zum Erstellen einer Warteschlange

Mit dem Microsoft Office Excel-Programm können Sie nicht nur Tabellenkalkulationen erstellen. Sie können darin erweiterte mathematische Berechnungen und Transformationen durchführen, die auf Informationen basieren, die in verschiedenen Datenzellen enthalten sind. Darüber hinaus können Sie grundlegende Datenstrukturen, z. B. Warteschlangen, in Excel mithilfe von Visual Basic-Makros erstellen. Die Verwendung einer Warteschlange für das Produktmanagement oder die Aufbewahrung von Aufzeichnungen, wenn Sie ein "First In, First Out" -Modell benötigen, kann für den Kleinunternehmer das Leben erheblich erleichtern. Mit etwas einfachem Code können Sie eine Warteschlange in Excel verwenden, ohne fortgeschrittene Programmierung oder Software für Informatiker zu lernen.

1

Zeigen Sie die Registerkarte "Entwickler" im Excel-Menüband an. Klicken Sie auf die Office-Schaltfläche | "Excel-Optionen" | "Beliebt" | "Registerkarte" Entwickler "in der Multifunktionsleiste anzeigen."

2

Klicken Sie auf die Zelle "A1" und geben Sie das Wort "Titel" ein.

3.

Klicken Sie auf die Zelle B1 und klicken Sie auf "Gewicht".

4

Fügen Sie Ihrem Excel-Arbeitsblatt eine Schaltfläche hinzu, um der Warteschlange Elemente hinzuzufügen. Wählen Sie "Entwickler" | "Einfügen" | "Formularsteuerelemente." Wählen Sie das Symbol "Schaltfläche". Nennen Sie es "Einfügen" im Feld Makroname. Das VB-Codefenster wird angezeigt.

5

Geben Sie den folgenden VB-Code in das Codierungsfenster ein. Dabei werden ein in Zelle C1 eingegebener Name und ein Gewicht in C2 eingegeben und in die Warteschlange gestellt:

Zeilen ("2: 2"). Einfügen shift: = xlDown Range ("C1"). Copy Range ("A2"). PasteSpecial Range ("C2"). Copy Range ("B2"). PasteSpecial ActiveCell.Offset ( 0, 1) = Now Range ("A: B"). Sortierschlüssel1: = Range ("B1"), order1: = xlAscending, Header: = xlYes

6

Fügen Sie eine weitere Schaltfläche hinzu und nennen Sie "Entfernen". Fügen Sie dem VB-Codefenster den folgenden Code hinzu. Jetzt können Sie das letzte Element in der Warteschlange mit einem Klick auf die Schaltfläche entfernen:

Bereich ("A1"). Ende (xldown). Löschbereich ("B1"). End (xldown) .Delete