pdf e cevirip mail ile gondermede sorun

[sbkst]

merhaba arkadaslar

forumdan aldigim bilgiler ile excelde hazirladigim sayfayi pdf e cevirip mail ile gondermeye calisiyorum ama asagidaki kodu yazdigimda hata veriyor

cikan hata : "RDB_Create_PDF......" bu kisimda "sub or function not defined"

nerede hata yaptigimi soyleyebilirmisiniz simdiden tesekkurler





Private Sub CommandButton2_Click()

Dim TempFilePath As String
Dim TempFileName As String
Dim FileName As String


TempFilePath = Environ$("temp") & "\"





If Range("z2").Value Like "?*@?*.?*" Then

TempFileName = TempFilePath & Range("z1").Value & " " & Range("z3").Value & " .pdf"


FileName = RDB_Create_PDF(Range("a1:i40"), TempFileName, True, False)


If FileName <> "" Then
RDB_Mail_PDF_Outlook FileName, Range("z2").Value, "Deta bvba", _
"" _
& vbNewLine & vbNewLine & "" _
& vbNewLine & "", False


If Dir(TempFileName) <> "" Then Kill TempFileName

Else
MsgBox ".................."
End If

End If



End Sub

 

[sbkst]

arkadaslar yardimci olabilecek yokmu acaba

 

[Emir Hüseyin Çoban]

arkadaslar yardimci olabilecek yokmu acaba

Merhaba,
Sorunuzu örnek dosya ile desteklerseniz daha hızlı cevap alırsınız.

 

[sbkst]

tekrar merhabalar

dosya ektedir

simdiden tesekkurler

 

[sbkst]

pardon eklemeyi unutmusum

 

[sbkst]

Tamamdir arkadaslar sorunu cozdum

 

[bogazincocugu]

sayın sbkst

sorun neymiş?