function DeleteListItem(){
$inputfile = Get-FileName "c:\"
if($inputfile -ne "")
{
$objExcel=New-Object -ComObject Excel.Application
$objExcel.Visible=$false
$WorkBook=$objExcel.Workbooks.Open($inputfile)
$worksheet = $WorkBook.sheets.Item(1)
##########################
$listName = "PnPList"
$intRowMax = ($worksheet.UsedRange.Rows).count
for($intRow = 2 ; $intRow -le $intRowMax ; $intRow++)
{
$ID = $worksheet.cells.item($intRow,1).value2
Remove-PnPListItem -List $listName -Identity $ID -Force # -Force will delete without confirm
}
$WorkBook.close()
$objexcel.quit()
##########################
}
}
Function Get-FileName($initialDirectory)
{
[System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms") | Out-Null
$OpenFileDialog = New-Object System.Windows.Forms.OpenFileDialog
$OpenFileDialog.initialDirectory = $initialDirectory
$OpenFileDialog.filter = "xlsx (*.xlsx)| *.xlsx"
$OpenFileDialog.ShowDialog() | Out-Null
$OpenFileDialog.filename
}
DeleteListItem # Call Function