When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
closes the Excel without saveing the work sheet. I belive this will be done
as a userform, but not sure on the VB codes.

Thanks

Put this in the standard code module and you can either make a keyboard
shortcut or add a button to the tool bar and assign this code to it.

Sub clsSavWB()
Resp = MsgBox("Do you want to close without _
saving?", vbYes/No + vbQuestion, "Close Workbook"
If Resp = vbYes Then
ActiveWorkbook.Close SaveChanges:=False
End If
End Sub

"pgarcia" wrote:

> When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> closes the Excel without saveing the work sheet. I belive this will be done
> as a userform, but not sure on the VB codes.
>
> Thanks

Thanks, but I don't want to give my user a yes/no question. Just an OK and
when they click on it, it close the application.

"JLGWhiz" wrote:

> Put this in the standard code module and you can either make a keyboard
> shortcut or add a button to the tool bar and assign this code to it.
>
> Sub clsSavWB()
> Resp = MsgBox("Do you want to close without _
> saving?", vbYes/No + vbQuestion, "Close Workbook"
> If Resp = vbYes Then
> ActiveWorkbook.Close SaveChanges:=False
> End If
> End Sub
>
> "pgarcia" wrote:
>
> > When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> > closes the Excel without saveing the work sheet. I belive this will be done
> > as a userform, but not sure on the VB codes.
> >
> > Thanks

Change it to OK only.

Sub clsSavWB()
Resp = MsgBox("Click OK to Save", , "Close Workbook"
If Resp = vbOK Then
ActiveWorkbook.Close SaveChanges:=False
End If
End Sub


"pgarcia" wrote:

> Thanks, but I don't want to give my user a yes/no question. Just an OK and
> when they click on it, it close the application.
>
> "JLGWhiz" wrote:
>
> > Put this in the standard code module and you can either make a keyboard
> > shortcut or add a button to the tool bar and assign this code to it.
> >
> > Sub clsSavWB()
> > Resp = MsgBox("Do you want to close without _
> > saving?", vbYes/No + vbQuestion, "Close Workbook"
> > If Resp = vbYes Then
> > ActiveWorkbook.Close SaveChanges:=False
> > End If
> > End Sub
> >
> > "pgarcia" wrote:
> >
> > > When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> > > closes the Excel without saveing the work sheet. I belive this will be done
> > > as a userform, but not sure on the VB codes.
> > >
> > > Thanks

Thanks again, but for some reson it did not like that code. I get a "Complie
error."

"JLGWhiz" wrote:

> Change it to OK only.
>
> Sub clsSavWB()
> Resp = MsgBox("Click OK to Save", , "Close Workbook"
> If Resp = vbOK Then
> ActiveWorkbook.Close SaveChanges:=False
> End If
> End Sub
>
>
> "pgarcia" wrote:
>
> > Thanks, but I don't want to give my user a yes/no question. Just an OK and
> > when they click on it, it close the application.
> >
> > "JLGWhiz" wrote:
> >
> > > Put this in the standard code module and you can either make a keyboard
> > > shortcut or add a button to the tool bar and assign this code to it.
> > >
> > > Sub clsSavWB()
> > > Resp = MsgBox("Do you want to close without _
> > > saving?", vbYes/No + vbQuestion, "Close Workbook"
> > > If Resp = vbYes Then
> > > ActiveWorkbook.Close SaveChanges:=False
> > > End If
> > > End Sub
> > >
> > > "pgarcia" wrote:
> > >
> > > > When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> > > > closes the Excel without saveing the work sheet. I belive this will be done
> > > > as a userform, but not sure on the VB codes.
> > > >
> > > > Thanks

Ahhhh, what a rucky move. Where was a ) missing. It works great, thanks.

"JLGWhiz" wrote:

> Change it to OK only.
>
> Sub clsSavWB()
> Resp = MsgBox("Click OK to Save", , "Close Workbook"
> If Resp = vbOK Then
> ActiveWorkbook.Close SaveChanges:=False
> End If
> End Sub
>
>
> "pgarcia" wrote:
>
> > Thanks, but I don't want to give my user a yes/no question. Just an OK and
> > when they click on it, it close the application.
> >
> > "JLGWhiz" wrote:
> >
> > > Put this in the standard code module and you can either make a keyboard
> > > shortcut or add a button to the tool bar and assign this code to it.
> > >
> > > Sub clsSavWB()
> > > Resp = MsgBox("Do you want to close without _
> > > saving?", vbYes/No + vbQuestion, "Close Workbook"
> > > If Resp = vbYes Then
> > > ActiveWorkbook.Close SaveChanges:=False
> > > End If
> > > End Sub
> > >
> > > "pgarcia" wrote:
> > >
> > > > When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> > > > closes the Excel without saveing the work sheet. I belive this will be done
> > > > as a userform, but not sure on the VB codes.
> > > >
> > > > Thanks

shouldn't the message be "Click OK to Close Workbook without saving"

Sub clsSavWB()
Resp = MsgBox("Click OK to Close Without Saving", , "Close Workbook")
If Resp = vbOK Then
ActiveWorkbook.Close SaveChanges:=False
End If
End Sub




"pgarcia" wrote:

> Ahhhh, what a rucky move. Where was a ) missing. It works great, thanks.
>
> "JLGWhiz" wrote:
>
> > Change it to OK only.
> >
> > Sub clsSavWB()
> > Resp = MsgBox("Click OK to Save", , "Close Workbook"
> > If Resp = vbOK Then
> > ActiveWorkbook.Close SaveChanges:=False
> > End If
> > End Sub
> >
> >
> > "pgarcia" wrote:
> >
> > > Thanks, but I don't want to give my user a yes/no question. Just an OK and
> > > when they click on it, it close the application.
> > >
> > > "JLGWhiz" wrote:
> > >
> > > > Put this in the standard code module and you can either make a keyboard
> > > > shortcut or add a button to the tool bar and assign this code to it.
> > > >
> > > > Sub clsSavWB()
> > > > Resp = MsgBox("Do you want to close without _
> > > > saving?", vbYes/No + vbQuestion, "Close Workbook"
> > > > If Resp = vbYes Then
> > > > ActiveWorkbook.Close SaveChanges:=False
> > > > End If
> > > > End Sub
> > > >
> > > > "pgarcia" wrote:
> > > >
> > > > > When I'm trying to do is, bring up a "msgbox" but when you click on "OK" it
> > > > > closes the Excel without saveing the work sheet. I belive this will be done
> > > > > as a userform, but not sure on the VB codes.
> > > > >
> > > > > Thanks

Hi All,

I'd be interested to learn what a VBA professional charges per hour in
the U.S. and U.K. nowadays.

Thanx for your replies.

Per what's in a name, or surname for that matter?:
>Hi All,
>
>I'd be interested to learn what a VBA professional charges per hour in
>the U.S. and U.K. nowadays.
>
>Thanx for your replies.

I wouldn't think there's any meaningful answer without a specific
location.

Major financial centers:Rural settings..... huge diffs - in both
hourly rates and living expenses.

Even within a given area, there are very large differences
depending on organization and employment method.


Independent contractor dealing direct with the company, working
on a project where he's just a miniscule slice of a humongous pie
is one extreme.

Somebody working through an agency that skims 30-40 percent off
the top and being placed in a business enterprise that isn't
doing that well might be another extreme.

In the two above and an urban setting think $100/hour vs
$32.50/hour.
--
PeteCresswell

On Thu, 24 Jan 2008 19:14:54 -0500, "(PeteCresswell)" <(E-Mail Removed)>
wrote:

>Per what's in a name, or surname for that matter?:
>>Hi All,
>>
>>I'd be interested to learn what a VBA professional charges per hour in
>>the U.S. and U.K. nowadays.
>>
>>Thanx for your replies.
>
>I wouldn't think there's any meaningful answer without a specific
>location.
>
>Major financial centers:Rural settings..... huge diffs - in both
>hourly rates and living expenses.
>
>Even within a given area, there are very large differences
>depending on organization and employment method.
>
>
>Independent contractor dealing direct with the company, working
>on a project where he's just a miniscule slice of a humongous pie
>is one extreme.
>
>Somebody working through an agency that skims 30-40 percent off
>the top and being placed in a business enterprise that isn't
>doing that well might be another extreme.
>
>In the two above and an urban setting think $100/hour vs
>$32.50/hour.

Thanx, and OK, poin taken. Let me rephrase te question: what is the
going hourly rate for the no-contract, freelancing VBA programming in
the U.K. and U.S.?