ソートした状態では、セル範囲指定で適切に印刷されない

文書番号 : 39007     文書種別 : 不具合     登録日 : 2015/07/10     最終更新日 : 2015/07/23
文書を印刷する
対象製品
SPREAD for Windows Forms 7.0J
状況
修正済み
詳細
ソートした状態では、セル範囲指定で適切に印刷されません。

【手順】
1.新規フォームにSPREADとButtonを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.Buttonをクリックします
   --2行目と3行目が印刷されます

【サンプルコード】
  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' データの設定
    FpSpread1.ActiveSheet.SetValue(0, 0, "S")
    FpSpread1.ActiveSheet.SetValue(0, 1, "E")
    FpSpread1.ActiveSheet.SetValue(0, 2, "A")
    FpSpread1.ActiveSheet.SetValue(0, 3, "K")
    FpSpread1.ActiveSheet.SetValue(1, 0, "W")
    FpSpread1.ActiveSheet.SetValue(1, 1, "G")
    FpSpread1.ActiveSheet.SetValue(1, 2, "P")
    FpSpread1.ActiveSheet.SetValue(1, 3, "V")
    FpSpread1.ActiveSheet.SetValue(2, 0, "O")
    FpSpread1.ActiveSheet.SetValue(2, 1, "L")
    FpSpread1.ActiveSheet.SetValue(2, 2, "Q")
    FpSpread1.ActiveSheet.SetValue(2, 3, "H")

    ' ソートの実行
    FpSpread1.ActiveSheet.SortRows(1, False, True, System.Collections.Comparer.Default)
  End Sub

  Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ' 印刷の実行
    Dim printset As New FarPoint.Win.Spread.PrintInfo()
    printset.PrintType = FarPoint.Win.Spread.PrintType.CellRange
    printset.RowStart = 1
    printset.RowEnd = 1
    printset.ColStart = 0
    printset.ColEnd = 3
    FpSpread1.Sheets(0).PrintInfo = printset
    FpSpread1.PrintSheet(0)
  End Sub
回避方法
Service Pack 5(v7.0.2018.2008)で修正済み。