'
Excel的自动化类
Private ExcelHWD As Excel.Application
' 行标记
Private fMrkRow As Integer = - 1
' 列标记
Private fMrkCol As Integer = - 1
fMrkRow = ExcelHWD.Selection.Rows.Row
fMrkCol = ExcelHWD.Selection.Columns.Column
GetCell = ExcelHWD.ActiveWorkbook.ActiveSheet.Cells(fMrkRow, fMrkCol).value.ToString()
Private ExcelHWD As Excel.Application
' 行标记
Private fMrkRow As Integer = - 1
' 列标记
Private fMrkCol As Integer = - 1
fMrkRow = ExcelHWD.Selection.Rows.Row
fMrkCol = ExcelHWD.Selection.Columns.Column
GetCell = ExcelHWD.ActiveWorkbook.ActiveSheet.Cells(fMrkRow, fMrkCol).value.ToString()