- - PR -
【VB.NET】 EXCELソート制御について
1
投稿者 | 投稿内容 | ||||
---|---|---|---|---|---|
|
投稿日時: 2006-07-26 12:17
こんにちわ。
初心者ですが、よろしくお願いします。 VB.NETでExcelを読み込み項目でソート(昇順/降順)したいのですが、 記述方法が分かりません。 Excel VBAでは下記ソースのようにしたのですが、 VB.NETでは、どのようにしたら良いのでしょうか? すみませんが、よろしくお願いします。 '*--- Excel VBAのソース ---* Public Function PFSort(strSheetName As String, _ rngReadSheet As Range, _ lngRowEndNo As Long) As Boolean 'シートのソート Sheets(strSheetName).Select '項目定義のチェック Set rngReadSheet = ThisWorkbook.Sheets(strSheetName).Cells(1, 1).CurrentRegion If rngReadSheet.Rows.Count <= 1 Then Application.GoTo (ThisWorkbook.Sheets(strSheetName).Cells(2, 1)) '件数なし PFSort = False Exit Function End If '最終行セット lngRowEndNo = rngReadSheet.Rows.Count Worksheets(strSheetName).Range("A1:H" & CStr(lngRowEndNo)).Sort _ Key1:=Range("A2"), Order1:=xlAscending, _ Key2:=Range("B2"), Order2:=xlAscending, _ Header:=xlYes '件数あり PFSort = True Exit Function End Function '*--- Excel VBAのソース ---* | ||||
|
投稿日時: 2006-07-26 12:24
VBA のソースを提示しても (眺めていても)、問題解決にはなりません。(ヒントにはなることはありますが) まずは、Excel Workbook へのアクセス方法を決定すべきだと思います。 PIA を使うのか、VSTO を使うのかなど。 _________________ C# と VB.NET の入門サイト じゃんぬねっと日誌 |
1