如何快速將任務(wù)從Project導(dǎo)出到Excel中并保持分級顯示
作為計劃工程師或計劃管理人員,經(jīng)常需要將任務(wù)從Project導(dǎo)出到Excel中。這是因為Excel是一種通用軟件,可被任何人打開和編輯。此外,Excel還具有強(qiáng)大的數(shù)據(jù)處理能力,可以解決Project
作為計劃工程師或計劃管理人員,經(jīng)常需要將任務(wù)從Project導(dǎo)出到Excel中。這是因為Excel是一種通用軟件,可被任何人打開和編輯。此外,Excel還具有強(qiáng)大的數(shù)據(jù)處理能力,可以解決Project無法處理的問題,如生成S-Curve和進(jìn)行進(jìn)度計算。然而,當(dāng)將任務(wù)復(fù)制到Excel中時,分級顯示往往會丟失,我們只能手動進(jìn)行任務(wù)分組。而對于任務(wù)數(shù)目較多的情況下,手動分組將變得非常繁瑣。所以,我們是否有更簡單的方法呢?
具體操作步驟
以下是將任務(wù)從Project導(dǎo)出到Excel并保持分級顯示的具體做法:
1. 在Project中,任務(wù)列表如下圖所示。
2. 在“任務(wù)名稱”列前面增加一列,命名為“大綱級別”,如下圖所示。
3. 將“大綱級別”和“任務(wù)名稱”兩列復(fù)制到Excel中,如下圖所示。
4. 在Excel中按下ALT F11,進(jìn)入VBA編輯器,插入一個新模塊,并輸入以下代碼:
```
Sub GroupTasks()
Dim i As Integer
Dim level As Integer
For i 2 To Cells(, "A").End(xlUp).Row
level Cells(i, 1).Value
If level > 1 Then
Cells(i, 2).IndentLevel level - 1
Else
Cells(i, 2).IndentLevel 0
End If
Next i
End Sub
```
5. 運行代碼,結(jié)果如下圖所示。
6. 在Excel中點擊“數(shù)據(jù)”菜單,在“分組顯示”面板中找到右下角的箭頭,點擊后會出現(xiàn)設(shè)置對話框。勾選取消“明細(xì)數(shù)”的復(fù)選框,如下圖所示。
7. 最后的結(jié)果如下圖所示,它與Project中的任務(wù)是否一致呢?
總結(jié)
通過以上步驟,我們可以快速將任務(wù)從Project導(dǎo)出到Excel中并保持分級顯示。這樣,我們就能夠更方便地進(jìn)行任務(wù)管理和數(shù)據(jù)處理,提高工作效率。希望這個方法能給計劃工程師和計劃管理人員帶來幫助。