文書ロック中

この文書は、他のユーザーが編集中のためロックされています。編集が完了するか、ロックの期限が切れるまでお待ち下さい。

文書をロックしているユーザー： 192.168.28.1,10.3.55.112
ロック期限： 2025/07/18 06:15 (11 min)

この文書は読取専用です。文書のソースを閲覧することは可能ですが、変更はできません。もし変更したい場合は管理者に連絡してください。

  * TEST.xlsxのバックアップを取得し、"YYYYMMDD_TEST.xlsx"という名前で保存する。
  * シート「履歴」AB2セルには、日付が記載されています。
  * シート「オブジェクト」とCSVファイル「Object.csv」、シート「ポリシ」とCSVファイル「Polisy.csv」を比較し、差分があるシートを削除し、新しいシートを追加します。更新したシート名を変数$UpdateSheetSummaryに格納します。
  * シート「履歴」AB2セルに、日付を"YYYY/MM/DD"のフォーマットで入力します。W2セルの値を1増やし、小数点がある場合は切り捨てます。
  * 履歴が記載されているC列を確認し、最後に数字が記載されている行を前回の更新行とし、その3行下を今回の更新行とします。
  * 更新行のC列にW2セルの値をコピーし、H列にAB2セルの値をコピーします。M列に$UpdateSheetSummaryを記載し、R列に"日付 $UpdateSheetSummary (LF)(LF)"を記載します。
  * 最後に、TEST.xlsxを保存します。
  * 注意事項:
  * 
  * シートとCSVの比較はA列からH列を比較してください。
  * PowerShellスクリプトには、シートとCSVファイルの比較および更新に関するコードと、最後の数値が記載されている行を見つけるコードが不足しているため、適切なコードに置き換える必要があります。
  * 
<code>
# Excelモジュールを読み込む
Import-Module ImportExcel

# ファイルパスを定義
$excelFilePath = "TEST.xlsx"
$backupDate = (Get-Content $excelFilePath | Select-Object -ExpandProperty 'AB2').ToString("yyyyMMdd")
$backupFilePath = $backupDate + "_TEST.xlsx"

# 元のファイルのバックアップを作成
Copy-Item $excelFilePath $backupFilePath

# Excelファイルを開く
$excel = Open-ExcelPackage -Path $excelFilePath

# シートとCSVを取得
$sheetHistory = $excel.Workbook.Worksheets['履歴']
$sheetObject = $excel.Workbook.Worksheets['オブジェクト']
$sheetPolicy = $excel.Workbook.Worksheets['ポリシ']
$csvObject = Import-Csv "Object.csv"
$csvPolicy = Import-Csv "Polisy.csv"

# シートとCSVを比較して更新
$UpdateSheetSummary = # A列からH列までのシートとCSVファイルを比較して更新するコード

# 「履歴」シートを更新
$sheetHistory.AB2.Value = (Get-Date).ToString("yyyy/MM/dd")
$sheetHistory.W2.Value = [math]::Floor($sheetHistory.W2.Value) + 1

# C列にRevision、H列にUpdateDate、M列にUpdateSheet、R列にUpdateDetailsがあります
$lastUpdateRow = ($sheetHistory.Cells["C:C"].Where({$_.Value -ne $null}) | Select-Object -Last 1).Start.Row
$updateRow = $lastUpdateRow + 3

$sheetHistory.Cells["C$updateRow"].Value = $sheetHistory.W2.Value
$sheetHistory.Cells["H$updateRow"].Value = $sheetHistory.AB2.Value
$sheetHistory.Cells["M$updateRow"].Value = $UpdateSheetSummary
$sheetHistory.Cells["R$updateRow"].Value = (Get-Date).ToString("yyyy/MM/dd") + " $UpdateSheetSummary (LF)(LF)"

# Excelファイルを保存して閉じる
Close-ExcelPackage $excel -Show
</code>
シートとCSVファイルの比較および更新に関するコードの例
<code>
</code>

最後の数値が記載されている行を見つけるコードの例
<code>
$lastUpdateRow = ($sheetHistory.Cells["C:C"].Where({$_.Value -ne $null}) | Select-Object -Last 1).Start.Row
</code>

<code>
# 開始行を設定（この例ではC10000セルから開始）
$startingRow = 10000
$column = "C"
$lastNumberCell = $null

# C10000セルから逆順に検索を開始
for ($i = $startingRow; $i -gt 0; $i--) {
    # セルの値を取得
    $cell = $sheetHistory.Cells["$column$i"]
    
    # セルの値が数値である場合、検索を終了
    if ($null -ne $cell.Value -and $cell.Value -is [int]) {
        $lastNumberCell = $cell
        break
    }
}

# 最後に数値が記載されているセルの3行下を更新行とする
$updateRow = $lastNumberCell.Start.Row + 3
</code>