Помогите перенести код с vb на C#
Код vb
Private Structure StructExcelNamedRangeAddress
Public Sheet As Microsoft.Office.Interop.Excel.Worksheet
Public Column As Integer
Public Row As Integer
Public Cell As Object
End Structure
Private Function ExcelNamedRangeAddress(ByRef book As Microsoft.Office.Interop.Excel.Workbook, Name As String) As StructExcelNamedRangeAddress
ExcelNamedRangeAddress = New StructExcelNamedRangeAddress
For Each RangeSearch In book.Names
If RangeSearch.Name = Name Then
Try
ExcelNamedRangeAddress.Sheet = RangeSearch.RefersToRange.cells(0).WorkSheet
ExcelNamedRangeAddress.Column = RangeSearch.RefersToRange.cells(0).Column
ExcelNamedRangeAddress.Row = RangeSearch.RefersToRange.cells(0).Row + 1
ExcelNamedRangeAddress.Cell = ExcelNamedRangeAddress.Sheet.Cells(ExcelNamedRangeAddress.Row, RangeSearch.RefersToRange.cells(0).Column)
Exit For
Catch ex As Exception
End Try
End If
Next
End Function
Код c# (что сделал)
private struct StructExcelNamedRangeAddress
{
public Worksheet Sheet;
public int Column;
public int Row;
public Object Cell;
}
private StructExcelNamedRangeAddress ExcelNamedRangeAddress(Workbook book, string Name)
{
StructExcelNamedRangeAddress ExcelNamedRangeAddress;
foreach (Workbook RangeSearch in book.Names)
{
if (RangeSearch.Name == Name)
{
ExcelNamedRangeAddress.Sheet = RangeSearch.RefersToRange.cells(0).WorkSheet;
ExcelNamedRangeAddress.Column = RangeSearch.RefersToRange.cells(0).Column;
ExcelNamedRangeAddress.Row = RangeSearch.RefersToRange.cells(0).Row + 1;
ExcelNamedRangeAddress.Cell = ExcelNamedRangeAddress.Sheet.Cells(ExcelNamedRangeAddress.Row, RangeSearch.RefersToRange.cells(0).Column);
}
}
}
ошибка которые я не могу устранить "Workbook" не содержит определения для "RefersToRange" Невызываемый член "_Worksheet.Cells" не может использоваться как метод
Ошибка
Ошибка CS1061 "Workbook" не содержит определения для "RefersToRange", и не удалось найти доступный метод расширения "RefersToRange", принимающий тип "Workbook" в качестве первого аргумента (возможно, пропущена директива using или ссылка на сборку). ConsoleReport \ConsoleReport\Program.cs 168 Активный
Cells
- это свойство, поэтому к его элементам надо обращаться через[]
:RefersToRange.cells(0)
->RefersToRange.Cells[0]
– Grundy 2 апр в 7:01RefersToRange
находится в интерфейсеName
, замените вforeach (Workbook RangeSearch in book.Names)
Workbook
наName
– Cost 2 апр в 8:35