コードを変更するときは、古いコードをコメントアウトして変更し、しばらくの間古いコードを保持するのが好きです。
CodeRushプラグインを作成して、古いコードをコメントアウトし、前後(日付を含む)にハイフンでつながれた行を追加し、元のコードをコピーすることは可能ですか(行全体、行全体が選択されているかどうかに関係なく)、その後、変更の終わりを示すために線を引きますか?
次の例を参照してください。
'----------
'Build the Data Table.
''Add the PDF File Names to the Data Table.
'rowPDF = dtPDF.NewRow
'rowPDF("PDFDocument") = arPDFFiles(1)
'dtPDF.Rows.Add(rowPDF)
'rowPDF = dtPDF.NewRow
'rowPDF("PDFDocument") = arPDFFiles(2)
'dtPDF.Rows.Add(rowPDF)
'rowPDF = dtPDF.NewRow
'rowPDF("PDFDocument") = arPDFFiles(3)
'dtPDF.Rows.Add(rowPDF)
'rowPDF = dtPDF.NewRow
'rowPDF("PDFDocument") = arPDFFiles(4)
'dtPDF.Rows.Add(rowPDF)
'rowPDF = dtPDF.NewRow
'rowPDF("PDFDocument") = arPDFFiles(5)
'dtPDF.Rows.Add(rowPDF)
'------ 07/04/2011
'Loop through the Array and Build the Data Table.
For narCounter = 0 To UBound(arPDFFiles)
'Add the PDF File Names to the Data Table.
rowPDF = dtPDF.NewRow
rowPDF("PDFDocument") = arPDFFiles(narCounter)
dtPDF.Rows.Add(rowPDF)
Next
'----------