Sub Test()
Dim wdObj As Word.Application
Set wdObj = New Word.Application
wdObj.Visible = True
Set wdObj = Nothing
End Sub
で、ワードの空のアプリケーションを開けますが、
Set wdObj = Nothingの意味が分かりません。
Dim wdObj As Word.Applicationは変数の宣言
Set wdObj = New Word.Applicationは、インスタンスの生成
wdObj.Visible = Trueは、見えるようにする
はわかるのですが、
Set wdObj = Nothingは何をしてるのですか？
調べたことろによると「オブジェクトの破棄」との事ですが
破棄されてる事を目で確認することはできないのでしょうか？
タスクマネージャーのプロセスを見ると、
Set wdObj = New Word.Applicationを実行後に、
WINWORD.EXEが表示されることを確認できますが、
Set wdObj = Nothingを通過しても
WINWORD.EXEは消えません。
そりゃアプリケーションが立ち上がってるからだと思いますが、
だったら何のために Set wdObj = Nothingはあるのでしょうか？
立ち上げたワードをバツボタンで閉じると
タスクマネージャーのWINWORD.EXEは消えました。
オフィス２００３です。
Sub サンプル1()
Dim strExcelPath As String
strExcelPath = "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE"
Shell strExcelPath, 1
End Sub
なら空のエクセルアプリケーションが開けます。
でも、
Sub サンプル2()
Dim strExcelPath As String
strExcelPath = "D:\ファイル.xls"
Shell strExcelPath, 1
End Sub
だと、
“プロシージャの呼び出し、または引数が不正です。“
と言うエラーになります。
Shell関数を使って、ファイル名を指定して開くことはできないのでしょうか？
わかる方がいたら教えてください！
配られたプリントでわからないとこがあるので、教えていただきたいです！
a. 天然に産出するウランの同位体には、ウラン234, 235, 238が存在するが、そのうち、そのままの形で低速中性子をぶつけることで核分裂が可能なウランは次のどれか？
1.ウラン２３４
2.ウラン２３５
3.ウラン２３８
b. 原子炉の中で核分裂可能核種であるウラン238は、高速中性子を吸収して最終的にはプルトニウム239となる。○か×か？
c. プルサーマル発電のプルサーマルとは、Plutonium use in Thermal Reactorの略である。○か×か？
現在開いているエクセルファイルをアクティブにしたいです。
バージョンは２００３です。
アクセスＶＢＡから
Sub test()
Dim rc As Long
rc = Shell("C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE", 1)
AppActivate "aaa.xls"
End Sub
を実行すると、
新規にアプリケーションが開いて、空のBOOK１が表示されます。
本当は、aaa.xlsをアクティブにしたいのですがうまく出来ません。
aaa.xlsは既に開いている状態です。
aaa.xlsはデスクトップにあります。
http://officetanaka.net/excel/vba/statement/AppActivate.htm
を見ながらやってみたのですがうまく出来ません。
新たなアプリケーションは立ち上げたくないけど
aaa.xlsはアクティブにしたいです。
