0
Outlook 15.0でCreateCSV()パブリックサブを使用していますが、下の2行目に「コンパイルエラー:ユーザー定義タイプが定義されていません」というエラーメッセージが表示されます。コンテキストの場合OutlookでExcelオブジェクトを処理するSubを使用する
Public Sub CreateCSV(dataWbFile As String, Optional InputDt As String)
Dim dataWb As Workbook
、私は、コードのこの部分内CreateCSVを使用しています:
私は、電子メールのファイルをソート添付ファイルを保存し、そうすることの後に電子メールを削除するために使用していますFor Each Item In SubFolder.Items
For Each Atmt In Item.Attachments
If LCase(Right(Atmt.filename, Len(ExtString))) = LCase(ExtString) Then
filename = DestFolder & Atmt.filename
Atmt.SaveAsFile filename
ReceivedTime = DateSerial(Year(Item.ReceivedTime), Month(Item.ReceivedTime), Day(Item.ReceivedTime))
Call CreateCSV(filename, ReceivedTime)
i = i + 1
End If
Next Atmt
Item.Delete
Next Item
。
私はこれに新たなんです。私はTools-> Referencesパッケージをダウンロードしました。私が読んだMicrosoft Outlook 15.0 Object Libraryは、潜在的な問題の1つでした。
「Outlook」から「Workbook」*を参照したい場合は、「Microsoft Excel 15.0 Object Library」への参照を含めたいと思います。 – CLR
ありがとう!それは仕事をした。 –