Thread: Help

Hi

Can anyone help with the following:-

I input this:-

Option Explicit

Public Function PromptPayment()
MsgBox "Please issue Prompt Payment Letter and input
relevant information to PP spreadsheet"

End Function

And then this in the appropraite cell

=IF((F4-E4)>=15,PromptPayment()+F4-E4,F4-E4)

It works great when the information is input I.e Two
dates are input which are greater than 15 days a message
box appears.
The problem is that when I go to reopen this workbook the
message box appears before it opens and you have to click
ok. I can get rid of this by deleting the cell with the
more than 15 days however I need this information to be
keep can anyone please help.

Thanks

try it this way. modify to suit
Function pdf()
pdf = "hi there"
End Function


--
Don Guillett
SalesAid Software
donaldb@281.com
"Andy" <anonymous@discussions.microsoft.com> wrote in message
news:1f4401c4f6f5$8ba519d0$a601280a@phx.gbl...
> Hi
>
> Can anyone help with the following:-
>
> I input this:-
>
> Option Explicit
>
> Public Function PromptPayment()
> MsgBox "Please issue Prompt Payment Letter and input
> relevant information to PP spreadsheet"
>
> End Function
>
> And then this in the appropraite cell
>
> =IF((F4-E4)>=15,PromptPayment()+F4-E4,F4-E4)
>
> It works great when the information is input I.e Two
> dates are input which are greater than 15 days a message
> box appears.
> The problem is that when I go to reopen this workbook the
> message box appears before it opens and you have to click
> ok. I can get rid of this by deleting the cell with the
> more than 15 days however I need this information to be
> keep can anyone please help.
>
> Thanks
>

this comes up with the following error
#NAME?
thanks
>-----Original Message-----
>try it this way. modify to suit
>Function pdf()
>pdf = "hi there"
>End Function
>
>
>--
>Don Guillett
>SalesAid Software
>donaldb@281.com
>"Andy" <anonymous@discussions.microsoft.com> wrote in
message
>news:1f4401c4f6f5$8ba519d0$a601280a@phx.gbl...
>> Hi
>>
>> Can anyone help with the following:-
>>
>> I input this:-
>>
>> Option Explicit
>>
>> Public Function PromptPayment()
>> MsgBox "Please issue Prompt Payment Letter and input
>> relevant information to PP spreadsheet"
>>
>> End Function
>>
>> And then this in the appropraite cell
>>
>> =IF((F4-E4)>=15,PromptPayment()+F4-E4,F4-E4)
>>
>> It works great when the information is input I.e Two
>> dates are input which are greater than 15 days a
message
>> box appears.
>> The problem is that when I go to reopen this workbook
the
>> message box appears before it opens and you have to
click
>> ok. I can get rid of this by deleting the cell with the
>> more than 15 days however I need this information to be
>> keep can anyone please help.
>>
>> Thanks
>>
>
>
>.
>

I just re-tested and it worked just fine.
=IF(F6=1,pdf(),"")
Did you put in a regular module instead of a sheet or ThisWorkbook module?
Show us your function and your formula.

--
Don Guillett
SalesAid Software
donaldb@281.com
"andy" <anonymous@discussions.microsoft.com> wrote in message
news:118701c4f726$f5acd8a0$a501280a@phx.gbl...
> this comes up with the following error
> #NAME?
> thanks
> >-----Original Message-----
> >try it this way. modify to suit
> >Function pdf()
> >pdf = "hi there"
> >End Function
> >
> >
> >--
> >Don Guillett
> >SalesAid Software
> >donaldb@281.com
> >"Andy" <anonymous@discussions.microsoft.com> wrote in
> message
> >news:1f4401c4f6f5$8ba519d0$a601280a@phx.gbl...
> >> Hi
> >>
> >> Can anyone help with the following:-
> >>
> >> I input this:-
> >>
> >> Option Explicit
> >>
> >> Public Function PromptPayment()
> >> MsgBox "Please issue Prompt Payment Letter and input
> >> relevant information to PP spreadsheet"
> >>
> >> End Function
> >>
> >> And then this in the appropraite cell
> >>
> >> =IF((F4-E4)>=15,PromptPayment()+F4-E4,F4-E4)
> >>
> >> It works great when the information is input I.e Two
> >> dates are input which are greater than 15 days a
> message
> >> box appears.
> >> The problem is that when I go to reopen this workbook
> the
> >> message box appears before it opens and you have to
> click
> >> ok. I can get rid of this by deleting the cell with the
> >> more than 15 days however I need this information to be
> >> keep can anyone please help.
> >>
> >> Thanks
> >>
> >
> >
> >.
> >