/ / Az Excel VBA program ütemezése

Az Excel VBA ütemezésével kapcsolatos feladatok

Az alábbiakban egy programot nézünk be Excel VBA amely a háttérszínét állítja be ütemezett feladatok zölden, és a feladatok háttérszínét vörösre állítja.

Helyzet:

Az 1. lapon három feladatunk van (X, Y, Z). A "1" azt jelzi, hogy egy feladat befejeződött. Egy feladat ütemezett, ha minden oszlopban létezik "1" a mai dátumig és ma, ma pedig 6-jun. Az X és az Y feladat ütemezett. A Z feladat mögött van a menetrend (nincs "1" az E8 cellában).

Az Excel VBA ütemezésével kapcsolatos feladatok

Munkafüzet-változási esemény létrehozása. A Munkalap változás eseményhez hozzáadott kódot az Excel VBA hajtja végre, amikor egy munkalapon lévő cellát módosít.

1. Nyissa meg a Visual Basic Editor alkalmazást.

2. Kattintson duplán a Sheet1 (Sheet1) lapra a Project Explorerben.

3. A bal oldali legördülő listából válassza ki a Munkalapot. Válassza a Módosítás lehetőséget a megfelelő legördülő listából.

Munkalap Változás esemény Excel VBA-ban

Adja hozzá a következő kódsorokat a Munkalap változás eseményhez:

4. Nyilatkozzon két változóról az Integer típusról.

Dim i As Integer, j As Integer

5. Adjon egy Do While Loop-ot.

Do While Cells(6 + i, 1).Value <> ""


    i = i + 1
Loop

Magyarázat: i = 0 esetén az Excel VBA ellenőrzi az X feladatot, i = 1, Y feladat stb. Az Excel VBA kilép a Do While ciklusból, amikor cellák (6 + i, 1) .Value jelentése üres (nincs több feladat ellenőrizni).

Adja hozzá a következő kódsorokat (6, 7 és 8) a Do While Loop-hoz.

6. Inicializálja a j változót 0 értékkel.

j = 0

7. Állítsa be a feladat háttérszínét zöldre, feltételezve, hogy egy feladat ütemezett (ez természetesen nem feltétlenül igaz).

Cells(6 + i, 1).Interior.ColorIndex = 4

8. Adjon másik Do While Loop-t.

Do While Cells(4, 2 + j).Value <= Date
    If Cells(6 + i, 2 + j).Value = 0 Then Cells(6 + i, 1).Interior.ColorIndex = 3
    j = j + 1
Loop

Megjegyzés: a Dátum funkció visszatér a mai dátumhoz.

Magyarázat: Az i = 0, j = 0 esetén az Excel VBA ellenőrzi a B6 cellát. Az i = 0, j = 1, az Excel VBA ellenőrzi a C6 cellát, stb. A feladat ütemezett, ha minden oszlopban "1" létezik a mai dátumig és a mai dátumig. a feladat háttérszínét vörösre állítja.

9. Vizsgálja meg a programot. Például, jelezze, hogy a Z-ra a 6-jun-nál végzett feladat befejeződött. Ennek eredményeképpen a Z feladat automatikusan zöldre vált.

Az ütemezési eredmény feladatai

Szintén olvasható: