tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトル他.XLSのSheet上のイベント
記事No8245
投稿日: 2008/09/30(Tue) 10:00
投稿者Why
お世話になります。

任意の.XLSファイルを表示し。特定の項目が表示されているセルをマウスでクリックして
そのセル位置を取得するという事を実現したいのですが。

Sheet上でのイベントって
VBプログラムまたは他のExcelVBAから取得する事って出来ませんでしょうか?

とにかく既存の.XLSを(コントロール上でも可)表示し、
それをクリックし、クリックされたセル位置を取得したいの
ですが(SelectionChangeイベントでも可)。

何か良い知恵をお持ちの方は居ませんでしょうか。
御指導下さいますよう、よろしくお願いいたします。

[ツリー表示へ]
タイトルRe: 他.XLSのSheet上のイベント
記事No8246
投稿日: 2008/09/30(Tue) 10:20
投稿者もょもと
ExcelVBAですが…


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Dim lg_Row As Long
  Dim int_Col As Integer

    lg_Row = Target.Row
    int_Col = Target.Column

    a$ = "行 " & Str(lg_Row) & ",列 " & Str(int_Col)
    MsgBox a$, vbOKOnly
End Sub


こういうことですか?

[ツリー表示へ]
タイトルRe^2: 他.XLSのSheet上のイベント
記事No8248
投稿日: 2008/09/30(Tue) 10:28
投稿者Why
もょもと様
いつも有難うございます。

> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
>   Dim lg_Row As Long
>   Dim int_Col As Integer
>
>     lg_Row = Target.Row
>     int_Col = Target.Column
>
>     a$ = "行 " & Str(lg_Row) & ",列 " & Str(int_Col)
>     MsgBox a$, vbOKOnly
> End Sub
これですと自.XLSの自Sheetのイベント取得時ですよね(他からも取得出来るのかな?)。
VBAプログラムの組み込まれていない既存資産の.XLSが対象なものですから。
思案しております、どなたか良い知恵がございましたら御指導下さい。

[ツリー表示へ]
タイトルRe: 他.XLSのSheet上のイベント
記事No8247
投稿日: 2008/09/30(Tue) 10:26
投稿者花ちゃん
この掲示板のワード検索で WithEvents Excel をキーに検索して見て下さい。

[ツリー表示へ]
タイトルRe^2: 他.XLSのSheet上のイベント
記事No8254
投稿日: 2008/09/30(Tue) 23:40
投稿者Why
花ちゃん様
御指導有難う御座います。

過去の例に倣って以下の様に記述してみましたが
2行目で「オブジェクト参照がオブジェクトインスタンスに設定されていません」
と出てしまいます。何がいけないのでしょうか。
何方かご指導下さいますよう。よろしくお願いいたします。

Dim oBook As Microsoft.Office.Interop.Excel.Workbook = DirectCast(WebBrowser1.Document, Microsoft.Office.Interop.Excel.Workbook)
Dim oSheets As Microsoft.Office.Interop.Excel.Sheets = oBook.Worksheets
oSheet1 = DirectCast(oSheets(1), Microsoft.Office.Interop.Excel.Worksheet)

[ツリー表示へ]
タイトルRe^3: 他.XLSのSheet上のイベント
記事No8255
投稿日: 2008/09/30(Tue) 23:54
投稿者花ちゃん
質問するなら、5W1H を入れる様にしないと相手に伝わりませんよ。
WebBrowserに.xlsを表示したい - Why 08/09/29-15:01 No.8233 New  との関連は?

VB からExcel の操作の仕方から解らないのなら、ここの Tips 集の Excel 関係の
所のサンプルをよく読んで試す事から初めて下さい。
Excel 関係については、この掲示板の過去のログに十分過ぎる位情報があります。

又、肝心の Excel のバージョン や 参照設定をどのようにしているのか等状況を
詳しく書いて下さい。

>2行目で「オブジェクト参照がオブジェクトインスタンスに設定されていません」
>と出てしまいます。何がいけないのでしょうか。
エラーメッセージが原因を教えてくれています。
エラーメッセージの意味が解らないのなら、エラーメッセージをキーに検索して
調べる様にして下さい。

エラーメッセージをキーに一般用掲示板で紹介している自作ツールでの検索結果
  ヒット件数    検索対象サイト名
         15,900 件  ■ウェブ全体から検索                    
         10,700 件  ●msdn.microsoft.com/                  
            254 件  DOBON.NET                              
            218 件  わんくま同盟                            
             53 件  Programing Library                      
             51 件  アットマーク・アイティ                  
             39 件  ★VBレスキュー(花ちゃん)                
             11 件  Visual Basic 中学校                    
              4 件  C# と VB.NET の入門サイト              
              1 件  pin's Laboratory                        
              1 件  Visual Basic Station                    

[ツリー表示へ]