Skip to content

Instantly share code, notes, and snippets.

@deerainw
Created January 31, 2018 15:22
Show Gist options
  • Save deerainw/74d4e5af9c2f636181a8145d079965da to your computer and use it in GitHub Desktop.
Save deerainw/74d4e5af9c2f636181a8145d079965da to your computer and use it in GitHub Desktop.
有意思的 PowerShell 脚本
# 打开Excel并填充数据,然后画出占用内存前十的程序的饼状图
# create new excel instance
$objExcel = New-Object -comobject Excel.Application
$objExcel.Visible = $True
$objWorkbook = $objExcel.Workbooks.Add()
$objWorksheet = $objWorkbook.Worksheets.Item(1)
# write information to the excel file
$i = 0
$first10 = (ps | sort ws -Descending | select -first 10)
$first10 | foreach -Process {$i++; $objWorksheet.Cells.Item($i,1) = $_.name; $objWorksheet.Cells.Item($i,2) = $_.ws}
$otherMem = (ps | measure ws -s).Sum - ($first10 | measure ws -s).Sum
$objWorksheet.Cells.Item(11,1) = "Others"; $objWorksheet.Cells.Item(11,2) = $otherMem
# draw the pie chart
$objCharts = $objWorksheet.ChartObjects()
$objChart = $objCharts.Add(0, 0, 500, 300)
$objChart.Chart.SetSourceData($objWorksheet.range("A1:B11"), 2)
$objChart.Chart.ChartType = 70
$objChart.Chart.ApplyDataLabels(5)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment