Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


2026 / 13645 ツリー ←次へ | 前へ→

【70414】VBEからsheetの展開でDCOM モグラ 11/11/15(火) 9:40 質問[未読]
【70428】自己レス → Re:VBEからsheetの展開でDCOM モグラ 11/11/15(火) 21:46 回答[未読]
【70430】Re:自己レス → Re:VBEからsheetの展開でD... みそじのおじさん 11/11/15(火) 22:56 発言[未読]

【70414】VBEからsheetの展開でDCOM
質問  モグラ  - 11/11/15(火) 9:40 -

引用なし
パスワード
   はじめまして。
早速ですが、環境はWinXP、Excel2002です。
以下のようなプロシージャを作り、

Sub ShtTst()
  Dim ws As Worksheet

  Set ws = Worksheets("Sheet1")
  MsgBox TypeName(ws)
End Sub

MsgBoxにブレークポイントを張り、停止させてから、
プロパティウインドウより、wsを展開すると、
勝手に、使っても無いOutlookが走り出します。

どうもdcomcfgでCOMの有効を外したのですが効き目なく、
サービスより、DCOMサーバを止めると、
Outlookの起動はしなくなりました。
ただ、それじゃWindowsは使えないので...

あと、レジストリより
OLEEnableも止めてみたのですが効き目無しです。
デバッグで使うだけなので
MSも直してないのでしょうか?!

原因、解決策などご存知の方あれば教示下さい。

【70428】自己レス → Re:VBEからsheetの展開でDCOM
回答  モグラ  - 11/11/15(火) 21:46 -

引用なし
パスワード
   自己レスです。

>プロパティウインドウより、wsを展開すると、
>勝手に、使っても無いOutlookが走り出します。

これはWindowsの既定値の設定で、
Outlookが有効となっているとそうなるようです。
しかし、単にシートのプロパティを展開するだけで
Outlookが走るのは?な意味不明動作だろうと思います。

おまけに、dcomcfgでDCOMの有効のチェックを外しても
Outlookが走るのは不可解としか言いようありません...(^^;


▼モグラ さん:
>はじめまして。
>早速ですが、環境はWinXP、Excel2002です。
>以下のようなプロシージャを作り、
>
>Sub ShtTst()
>  Dim ws As Worksheet
>
>  Set ws = Worksheets("Sheet1")
>  MsgBox TypeName(ws)
>End Sub
>
>MsgBoxにブレークポイントを張り、停止させてから、
>プロパティウインドウより、wsを展開すると、
>勝手に、使っても無いOutlookが走り出します。
>
>どうもdcomcfgでCOMの有効を外したのですが効き目なく、
>サービスより、DCOMサーバを止めると、
>Outlookの起動はしなくなりました。
>ただ、それじゃWindowsは使えないので...
>
>あと、レジストリより
>OLEEnableも止めてみたのですが効き目無しです。
>デバッグで使うだけなので
>MSも直してないのでしょうか?!
>
>原因、解決策などご存知の方あれば教示下さい。

【70430】Re:自己レス → Re:VBEからsheetの展開で...
発言  みそじのおじさん  - 11/11/15(火) 22:56 -

引用なし
パスワード
   こんばんは。
お力にはなれませんが、3日ほど前に似た現象になりました。
私の方では、TypeNameではなくVarTypeでしたが。

Sub Test()
 Dim v
 Dim vtype As Long
 
  v = Array(112.1,"AAA",True)
  vtype = VarType(v) ←ここでブレーク
  
  Select Case vtype
    Case ・・・
    ・・・・
  End Select
End Sub

ブレーク後にローカルウインドウでvを展開したところ
オフィスのインストーラーが勝手に起動されました^^;
ブレークしなければ通常の処理でした。
(その後も3回ほどなりました。)

なんなんでしょうね(^^)
環境はXp,excel2003です。不可解ですね。。

2026 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free