[openxml]行を削除して、上に詰めたい。

Question

##[openxml]行を削除して、上に詰めたい。

openxmlで以下の画像の様に1行を削除して下の行を上に詰めたいと思っています。

イメージ

調べてみましたが、1行の値を消す(行自体は残る)ものしか見つけられませんでした。

static void Main(string[] args)
{
	var fileName = "ファイル.xlsx";

	var byteArray = System.IO.File.ReadAllBytes(fileName);
	var fileSheetName = "sheet1";

	using (SpreadsheetDocument spreadSheet = SpreadsheetDocument.Open(fileName, true))
	{
		WorkbookPart workBookPart = spreadSheet.WorkbookPart;
		Sheet targetSheet = (Sheet)spreadSheet.WorkbookPart.Workbook.Sheets.Elements<Sheet>().Where(s => s.Name == fileSheetName).FirstOrDefault();
		if (targetSheet == null)
		{
			return;
		}

		WorksheetPart worksheetPart = (WorksheetPart)(workBookPart.GetPartById(targetSheet.Id));

		SheetData sheetData = worksheetPart.Worksheet.GetFirstChild<SheetData>();

		var rows = sheetData.Elements<Row>().Where(r => r.RowIndex >= 14 && r.RowIndex < 121).ToArray();

		foreach(var row in rows) {
			row.Remove();
		}
		worksheetPart.Worksheet.Save();
}

どのようにしたら実現できますでしょうか？
ご教授お願いします。

#ishi9様のアドバイス後

static void Main(string[] args)
{
	var templateName = "テスト.xlsx";

	var byteArray = System.IO.File.ReadAllBytes(templateName);
	var templateSheetName = "Sheet1";

	using (SpreadsheetDocument spreadSheet = SpreadsheetDocument.Open(templateName, true))
	{
		WorkbookPart workbookPart = spreadSheet.WorkbookPart;
		Sheet targetSheet = (Sheet)spreadSheet.WorkbookPart.Workbook.Sheets.Elements<Sheet>().Where(s => s.Name == templateSheetName).FirstOrDefault();
		if (targetSheet == null)
		{
			return;
		}

		WorksheetPart worksheetPart = (WorksheetPart)(workbookPart.GetPartById(targetSheet.Id));

		SheetData sheetData = worksheetPart.Worksheet.GetFirstChild<SheetData>();
		var refRowIndex = 4;
		var iEndRowIndex = 12;
		Row refRow = worksheetPart.Worksheet.Descendants<Row>().Where(r => r.RowIndex == refRowIndex).First();

		refRow.Remove();

		for (int index = refRowIndex + 1; index <= iEndRowIndex; index++)
		{
			Row refRow1 = worksheetPart.Worksheet.Descendants<Row>().Where(r => r.RowIndex == index).First();
			refRow1.RowIndex.Value--;
		}

		worksheetPart.Worksheet.Save();
	}
}

Answer 1

ここにあるように下の行を1行ずつ詰めるやり方しかなさそうです。（標準には無さそう)
Delete a row in Excel Sheet using OpenXML

Row refRow = ((WorksheetPart)(workbookPart.GetPartById(theSheet.Id))).Worksheet.Descendants<Row>().Where(r => r.RowIndex == refRowIndex).First();
            
// delete row
refRow.Remove();

for (int index = refRowIndex + 1; index <= iEndRowIndex; index++)
{
     Row refRow1 = workSheetPart.Worksheet.Descendants<Row>().Where(r => r.RowIndex == index).First();
     refRow1.RowIndex.Value--;
}

Comments

[shikasama]

ishi9様
回答ありがとうございます。
参考サイトのExcelCreator でやっているように行の削除を行いたいのですが、
ExcelCreator を用いらずにopenxml sdk ではどのようにやるのでしょうか？

[ishi9]

すいません、前の投稿のやり方は適切ではなかったので新しい方法を投稿しなおしました。

[shikasama]

提示していただいた方法を試したところ、
開くときにファイルが破損しているようでした。
コードを質問文に追記しましたので、ご確認いただけると幸いです。

[shikasama]

どうやら、rowのindexのみ変えているのが原因みたいでした。
cellのReferenceも変えてあげることでうまくいきました。
ありがとうございました。