@IT会議室は、ITエンジニアに特化した質問・回答コミュニティ「QA@IT」に生まれ変わりました。ぜひご利用ください。
- PR -

【VB.NET】 EXCELソート制御について

1
投稿者投稿内容
HIRO
会議室デビュー日: 2006/06/12
投稿数: 8
投稿日時: 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のソース ---*
じゃんぬねっと
ぬし
会議室デビュー日: 2004/12/22
投稿数: 7811
お住まい・勤務地: 愛知県名古屋市
投稿日時: 2006-07-26 12:24
引用:

HIROさんの書き込み (2006-07-26 12:17) より:

Excel VBAでは下記ソースのようにしたのですが、VB.NETでは、どのようにしたら良いのでしょうか?


VBA のソースを提示しても (眺めていても)、問題解決にはなりません。(ヒントにはなることはありますが)
まずは、Excel Workbook へのアクセス方法を決定すべきだと思います。

PIA を使うのか、VSTO を使うのかなど。

_________________
C# と VB.NET の入門サイト
じゃんぬねっと日誌
1

スキルアップ/キャリアアップ(JOB@IT)