こんばんは
以下の、プログラムでエクセルVBAからノーツメールを起動させることができメールは送れました。
その後、それぞれの変数にどんな値が格納されているのか確認したところ、
ノーツが起動しWknSesのなかみを確認したところ、Emptyと表示されておりました。
なぜ、そのなかにはいっている値など確認するこができないのでしょうか?
でも、ノーツが起動し動作しております。
CreateObject("Notes.NotesSession")は、wknsesになにを格納しているのでしょうか?
Set wkNSes = CreateObject("Notes.NotesSession")
たとえば、
'IE(InternetExplorer)のオブジェクトを作成する
Set objIE = CreateObject("InternetExplorer.Application")
だどすると Objieという変数をウオッチリストで確認するとpathの情報などがはいっていることを確認できました。
以上 よろしくおねがいたします。
-------------------
Const EMBED_ATTACHMENT As Integer = 1454
Public Sub SendNotesMail()
Dim wkNSes As Object ' lotus.NOTESSESSION
Dim wkNDB As Object ' lotus.NOTESDATABASE
Dim wkNDoc As Object ' lotus.NOTESDOCUMENT
Dim wkNRtItem As Object ' lotus.NOTESRICHTEXTITEM
Dim wkNAtt As Object ' lotus.NOTESEMBEDDEDOBJECT
Dim AttFName As String ' 添付ファイル名(フルパス)
' Notesのセッションを起動する
Set wkNSes = CreateObject("Notes.NotesSession")
' NotesDatabaseオブジェクトを作成し、そのデータベースを開く
Set wkNDB = wkNSes.GETDATABASE("", "")
' NotesDBをユーザーのメールDBに割り当てた後に開く
wkNDB.OpenMail
' NotesDBに文書を作成し、新規文書をオブジェクト変数にセットする
Set wkNDoc = wkNDB.CREATEDOCUMENT()
' 件名をセットする
wkNDoc.Subject = "テスト(タイトル)"
' 宛先をセットする
wkNDoc.SendTo = Array("belie.kondo@mbh.nifty.com")
'wkNDoc.CopyTo = Array("xxx@xxx")
'wkNDoc.blindCopyTo = Array("xxx@xxx")
' 文書にリッチテキストアイテムを作成する
Set wkNRtItem = wkNDoc.CreateRichTextItem("BODY")
' 本文をセットする
With wkNRtItem
.APPENDTEXT "本文(1行目)"
.ADDNEWLINE 1
.APPENDTEXT "本文(2行目)"
.ADDNEWLINE 2
' 添付ファイル名をセットする
AttFName = "D:\TEST\Book1.xls"
' ファイルを添付する
Set wkNAtt = .EmbedObject(EMBED_ATTACHMENT ,"" ,AttFName)
.ADDTAB 1
.ADDNEWLINE 1
End With
' メールを送信する
wkNDoc.Send False
' オブジェクト変数を解放する
Set wkNAtt = Nothing
Set wkNRtItem = Nothing
Set wkNDoc = Nothing
Set wkNDB = Nothing
Set wkNSes = Nothing
MsgBox "メール発信", vbOKOnly + vbInformation
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) IBM Notes9のメールをExcelVBAにて送信するコードについての質問です。 以下のコードを 3 2023/06/21 17:58
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
- Visual Basic(VBA) VBAが止まります。 3 2022/08/31 14:09
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) outlook マクロが終了しません。 1 2022/09/02 11:14
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excelからnotesメールを自動で送信出来るマクロを見つけました。 下記、URL先のマクロを使わ
Excel(エクセル)
-
NotesのビューをEXCELシートに展開したい
グループウェア
-
エクセルVBAからNotesでメール送信
その他(プログラミング・Web制作)
-
-
4
LocalのNotesメールDBをVBAで参照出来ない
Visual Basic(VBA)
-
5
Excel2000でハイパーリンクをクリックするとノーツが起動するようにできますか?
Excel(エクセル)
-
6
ORA-01013のエラーについて経験のある方お願いします。
Oracle
-
7
Excel VBA で Richtextboxを使うことは出来ますか?
Visual Basic(VBA)
-
8
ノーツのデータをVBScriptで取得したい
その他(プログラミング・Web制作)
-
9
Lotus Scriptで、件名、本文、文書リンクをメールで送信
グループウェア
-
10
LotusNotes添付ファイル名取得書き出し
グループウェア
-
11
ExcelVBA実行後に時々落ちる
Visual Basic(VBA)
-
12
IBM Notes9のメールをExcelVBAにて送信するコードについての質問です。 以下のコードを
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
LISTBOXの内容が更新されま...
-
C#でフォームのオブジェクト名...
-
Object型からDouble型へのキャスト
-
COMコンポーネントって何?
-
ワイルドカード<?>と型パラメー...
-
Excelで =EMBED("Acrobat Docu...
-
エプソンVP-930のESC/Pの操作に...
-
VBAからノーツを起動
-
複数のドキュメントテンプレー...
-
0 == False はいいけど
-
オブジェクトとは、わかりやす...
-
AccessからMSペイントを起動さ...
-
java.util.Listのヒープサイズ...
-
TextFieldの文字の折り返し
-
戻り値がクラスオブジェクト
-
VBAのWindowオブジェクトとWork...
-
VBA 同じ名前のオブジェクトを...
-
C++で*thisは何を指しているの...
-
Accessの連結・非連結オブジェ...
-
エクセルVBAで、条件に一致する...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
0 == False はいいけど
-
パワーポイントのVBAでテキスト...
-
C#でフォームのオブジェクト名...
-
Excelで =EMBED("Acrobat Docu...
-
VBAのWindowオブジェクトとWork...
-
JAVAからHTMLへ値を返す方法
-
EXCEL VBAにて動的にCheckBOXを...
-
ワイルドカード<?>と型パラメー...
-
COMコンポーネントって何?
-
VBA 同じ名前のオブジェクトを...
-
Object型からDouble型へのキャスト
-
ビジュアルC++でボタンの有...
-
error C2712: オブジェクト ア...
-
オブジェクト名をforループ内で...
-
bmp画像をjpegやpng画像に圧縮...
-
戻り値がクラスオブジェクト
-
Vbで通常使用するプリンターを...
-
時間帯判定をする。
-
Webアプリケーションのエラーメ...
-
LISTBOXの内容が更新されま...
おすすめ情報
早速のご回答ありがとうございます。
具体的にどういうことでしょうか?
実際にそこにはいっている値をみることはできないのでしょうか?
こんばんは。
値 変数なし 型 Objectとなっておりました。
EMPTYではありませんでした。
すみません。