下記のようなコードを書くと

「指定されたキャストは有効ではありません」
という例外が発生してしまいます。

http://d.hatena.ne.jp/akio0911/20070518/1179467416

これを回避するための修正案を示してください。

環境
・VB.NET2003
・Excel2000

回答の条件
  • 1人1回まで
  • 登録:2007/05/18 14:53:14
  • 終了:2007/05/18 15:51:14

回答(1件)

id:F-15X No.1

F-15X回答回数111ベストアンサー獲得回数132007/05/18 15:35:05

ポイント60pt

xlSelection.Borders(xxx)

と指定した場合は、Borderオブジェクトを返します。


xlSelection.Borders()

と指定しない場合は、Bordersコレクションを返します。


なので、

Dim xlBorders As Excel.Borders

xlBorders = xlSelection.Borders()

とするか、

Dim xlBorder As Excel.Border

xlBorder = xlSelection.Borders(Excel.XlBordersIndex.xlEdgeTop)

とします。

以降は、所望の操作をすれば良いでしょう!

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません