How to export a selected range of WinForms GridControl to Excel?

private void button1_Click(object sender, System.EventArgs e)
{
     Syncfusion.GridExcelConverter.GridExcelConverterControl gecc = new Syncfusion.GridExcelConverter.GridExcelConverterControl();
     SaveFileDialog saveFileDialog = new SaveFileDialog();
     saveFileDialog.Filter = "Files(*.xls)|*.xls";
     saveFileDialog.DefaultExt = ".xls";
     GridRangeInfoList list = this.gridControl1.Model.SelectedRanges;
     if (saveFileDialog.ShowDialog() == DialogResult.OK)
     {
        foreach (GridRangeInfo range in list)
        {
          gecc.ExportRange(range, this.gridControl1.Model, saveFileDialog.FileName,
                         Syncfusion.GridExcelConverter.ConverterOptions.RowHeaders);
        }
        if (MessageBox.Show("Do you wish to open the xls file now?", "Export to Excel", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
        {
           Process proc = new Process();
           proc.StartInfo.FileName = saveFileDialog.FileName;
           proc.Start();
        }
     }
}

Private Sub button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
  Dim gecc As New Syncfusion.GridExcelConverter.GridExcelConverterControl()
  Dim saveFileDialog As New SaveFileDialog()
  saveFileDialog.Filter = "Files(*.xls)|*.xls"
  saveFileDialog.DefaultExt = ".xls"
  Dim list As GridRangeInfoList = Me.gridControl1.Model.SelectedRanges
  If saveFileDialog.ShowDialog() = DialogResult.OK Then
  For Each range As GridRangeInfo In list
    gecc.ExportRange(range, Me.gridControl1.Model, saveFileDialog.FileName, Syncfusion.GridExcelConverter.ConverterOptions.RowHeaders)
  Next range
  If MessageBox.Show("Do you wish to open the xls file now?", "Export to Excel", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
     Dim proc As New Process()
     proc.StartInfo.FileName = saveFileDialog.FileName
     proc.Start()
  End If
  End If
End Sub