求助：PowerShell实现移除CSV全零列的解决方案

需求说明 #

• 读取指定CSV文件
• 在第一列中定位标记为Total的行
• 在第一行中定位标记为Total的列
• 读取Total行中从首列到Total列之间的所有值
• 记录所有值为0的列索引
• 删除这些全零列
• 将处理后的内容导出为新CSV文件（可覆盖原文件）

额外说明 #

CSV文件的行和列都包含总计值，列数不固定：

• 第一列为行标签列
• 最后一列为行总计列
• 全零列可能出现在中间任意位置
• 要求脚本避免硬编码，可自适应处理不同行数和列数
• 处理后需保留非零列及总计列

原Bash实现脚本 #

declare -i first=0;
for i in {2..26}
do
    a=$(awk -F',' 'NR == 6 { print $'$i' }' $original)
    if [[ $a == '"0"' && $first -eq 0 ]]
    then
        b+="$i"
        first=1
    elif [[ $a == '"0"' && $first!=0 ]] 
    then 
        b+="$i"
    fi
done
cut -d, -f$b --complement $original > $edited;

PowerShell解决方案 #

# 定义文件路径，可根据实际修改
$originalCsv = "input.csv"
$outputCsv = "output.csv"

# 读取CSV内容，保留原始表头信息
$csvData = Import-Csv -Path $originalCsv

# 获取表头列表
$headers = $csvData[0].PSObject.Properties.Name

# 定位Total行：筛选第一列值为Total的行（第一列对应表头第一个元素）
$totalRow = $csvData | Where-Object { $_."$($headers[0])" -eq 'Total' }

# 定位Total列的索引
$totalColIndex = $headers.IndexOf('Total')

# 收集需要保留的列：先保留行标签列
$columnsToKeep = @($headers[0])

# 遍历Total列之前的所有列，筛选非零列
for ($i = 1; $i -lt $totalColIndex; $i++) {
    $colName = $headers[$i]
    # 转换为数值类型判断是否为0
    if ([int]$totalRow."$colName" -ne 0) {
        $columnsToKeep += $colName
    }
}

# 添加Total列到保留列表
$columnsToKeep += 'Total'

# 筛选列并导出CSV，-Force可直接覆盖原文件
$csvData | Select-Object $columnsToKeep | Export-Csv -Path $outputCsv -NoTypeInformation -Force

脚本说明 #

1. 读取CSV：用Import-Csv自动处理表头和行数据，无需手动解析分隔符
2. 定位目标行/列：通过表头列表和筛选逻辑找到Total行和列，完全自适应，不依赖硬编码位置
3. 筛选非零列：遍历Total行中Total列之前的所有列，只保留值不为0的列
4. 导出结果：用Select-Object选择需要保留的列，Export-Csv完成导出，-Force参数支持直接覆盖原文件

内容的提问来源于stack exchange，提问作者jw-smc