Hanki projektiaikataulun mittatiedot VBA: n avulla

Aikuiset projektinhallintaorganisaatiot, kokeneet projektipäälliköt ja PMO: t tietävät projektien hallinnan arvon mittareiden mukaan. Metrikokoelma sisältää yleensä mallin täyttämisen projektitietoihin perustuen, joka sisältää aikataulutiedot.

Microsoft Project 2010 sisältää paljon raakatietoja aikataulutiedoista, joita voidaan käyttää merkityksellisiin projektimittareihin. Tämän lähestymistavan haasteena on projektitietojen kerääminen usein edellyttämällä tehtävädatan vientiä Exceliin, kääntötaulukoiden kehittämistä ja muutaman kaavan kirjoittamista. Tässä Microsoft Project- ja VBA-opetusohjelmassa esittelen sinulle, kuinka Visual Basic -sovellusta voidaan käyttää kehittämään nopea metrinen tilannekuva projekti-aikataulustasi ( kuva A ). Kuvio A

Projektitilastot (Napsauta kuvaa suurentaaksesi.)

Nopeat projektimittaukset

Projektin tilaa arvioitaessa on otettava huomioon useita keskeisiä aikataulun mittareita, kuten kokonaistehtävien lukumäärä, suoritettujen tehtävien lukumäärä, puutteelliset tehtävät myöhäisillä aloituksilla, puutteelliset tehtävät myöhäisillä loppuilla ja jäljellä olevat tehtävät loppuun. Kaikki nämä mittarit auttavat kvantifioimaan projektin etenemistä sen sijaan, että selittäisivät subjektiivisesti projektin tilaa. Jos organisaatiosi ei ole ottanut käyttöön ansaittua arvonhallintaa projektinhallintatekniikana, työmäärät ovat helppo ensimmäinen askel metripohjaiseen hallintaan.

Microsoft Projectissä on sisäänrakennettu tilasto-ominaisuus, johon pääsee valitsemalla Projekti | Hankkeen tiedot | Tilastot. Toimitettu tilastotoiminto tarjoaa korkean tason mittareita, vaikka pidän parempana tietää yksityiskohtaisempia tehtävien lukumääriä. Tämän oppaan suorittamisen jälkeen voit muokata ja parantaa koodia sisällyttämällä siihen lisätietoja omiin mukautettujen tietojen raportointiin.

Prosessi sisältää seuraavat vaiheet:

  1. Selaa jokainen tehtävä projektin aikataulussa ja arvioi tehtävän tiedot projektin tilan päivämäärän perusteella.
  2. Laske kaikki suoritetut tehtävät.
  3. Epätäydellisten tehtävien osalta selvitä, ovatko tehtävät tulevaisuudessa vai myöhässä.
  4. Myöhäisissä tehtävissä lasketaan myöhäisestä aloituksesta ja myöhäisestä maalista.
  5. Alusta tiedot.
  6. Näytä viestiruutu.
Vaihe 1: Lisää valikkokohta navigointipalkkiin

Katso edellisestä opetusohjelmassani kuinka lisätä uusi esine mukautettuun navigointipalkkiin. Tämä on koodinpätkä, jonka avulla displayProjectMetrics-aliohjelma lisätään AddCustomNavigation-aliohjelmaan.

 ribbonXml = ribbonXml + " 
 ribbonXml = ribbonXml + "imageMso =" "DiagramTargetInsertClassic" "onAction =" "displayProjectMetrics" "/>" 
Vaihe 2: Luo VBA-aliohjelma

Luo Visual Basic -editorissa uusi aliohjelma nimeltään displayProjectMetrics ja liitä seuraava koodi.

 AlikäyttöProjektMetrics () 
 Dim tsks as Tasks 
 Dim t as Task 
 Himmennä lateFinishCt, lateStartCt, futureCt, completeCt kokonaislukuna 
 Dim myStats As Variant 
 Dim statString kielenä 
 Aseta tsks = ActiveProject.Tasks 
 lateFinishCt = 0 
 lateStartCt = 0 
 futureCt = 0 
 täydellinenCt = 0 
 Jokaista t tsks 
 Jos (Ei t ole mitään) ja (ei t.Summary) Sitten 
 'Suoritetut tehtävät 
 Jos t.PercentComplete = 100 Sitten 
 completeCt = completeCt + 1 
 muu 
 'laskea tulevat tehtävät 
 Jos t.BaselineFinish> ActiveProject.StatusDate ja t.BaselineStart> ActiveProject.StatusDate Sitten 
 futureCt = futureCt + 1 
 muu 
 'Loppuvaiheessa olevat puutteelliset tehtävät 
 Jos t.BaselineFinish <= ActiveProject.StatusDate Sitten 
 lateFinishCt = lateFinishCt + 1 
 Loppu Jos 
 Jos t.BaselineStart <= ActiveProject.StatusDate Sitten 
 'Loppuun alkavat puutteelliset tehtävät 
 lateStartCt = lateStartCt + 1 
 Loppu Jos 
 Loppu Jos 
 Loppu Jos 
 Loppu Jos 
 Seuraava t 
 statString = "Projektin tilan päivämäärästä lukien:" & ActiveProject.StatusDate & "projektin tehtävien määrä on:" & vbCrLf & vbCrLf 
 statString = statString & "Tehtävät yhteensä:" & vbTab & vbTab & tsks.Count & vbCrLf 
 statString = statString & "Valmiit tehtävät:" & vbTab & vbTab & completeCt & vbCrLf & vbCrLf 
 statString = statString & "epätäydellinen tehtävämetriikka:" & vbCrLf 
 statString = statString & "Myöhäisen aloituksen tehtävät:" & vbTab & vbTab & lateStartCt & vbCrLf 
 statString = statString & "Late Finish Task:" & vbTab & vbTab & lateFinishCt & vbCrLf 
 statString = statString & "Tulevat tehtävät:" & vbTab & vbTab & futureCt & vbCrLf 
 MsgBox statString 
 End Sub 
Vaihe 3: Tallenna tiedosto ja testaa se. Tallenna tiedosto, sulje Microsoft Project ja avaa se uudelleen testataksesi projektimittausominaisuutta. Napsauta Apuohjelmat-välilehden Projektitiedot-painiketta ja tilastot tulevat näkyviin ( kuva B ). Kuvio B

Projektin mittatiedot (napsauta kuvaa suurentaaksesi.)

Lisälaskelmat voidaan tehdä muuttamalla statString-muuttujaa. Koodissa jatkoin uusien laskelmien lisäämistä muuttujaan sisällyttääksesi asianmukaiset projektimitat. MessageBox-toiminto näyttää lopullisen laskelman. Käytin myös vbTab (Tab) ja vbCrLf (Carriage Return Line Feed) -muuttujia muotoillaksesi merkkijonon ja sisältäen oikeat rivinvaihdot.

johtopäätös

Tämä on vain yksi esimerkki datanalyysin tyypistä, joka on mahdollista Visual Basicilla; koko projektin kojetaulun voitaisiin luoda VBA for Microsoft Project -ohjelmalla. Nopeaan projektin tilan arviointiin käytän tätä koodiohjelmaa, joka käyttää objektiivisia mittareita subjektiivisen projektiarvioinnin lisäksi.

Kannustan sinua kehittämään näitä Visual Basic-esimerkkejä ja laajentamaan Microsoft Projectia omalla VBA-pohjaisella kekseliäisyydelläsi. Lataa mallin koodi tälle opetusohjelmalle.

Lue lisää erät VBA-sarjasta

  • Aloita Microsoft Project- ja Visual Basic-ohjelmointi
  • Korosta puuttuvat lähtöajan päättymispäivät VBA: n avulla Microsoft Project 2010: ssä
  • Käytä VBA: ta löytääksesi myöhäiset lopetuspäivät Microsoft Project 2010: ssä

© Copyright 2020 | mobilegn.com