Hi,

I want to use the ThisWorkBook BeforeSave event to prevent users from
saving the sheet if the sheet path is O:\XBOX\XBOX-Tier2\Customer
Support\Source\Reports"

Re: Prevent from save if... by Bob

Bob
Wed Jul 23 02:30:47 CDT 2008

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
If ThisWorkbook.Path = _
"O:\XBOX\XBOX-Tier2\Customer Support\Source\Reports" Then
Cancel = True
End If
End Sub


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Pietro" <Pietro@discussions.microsoft.com> wrote in message
news:B2803044-4480-49D0-95C0-A3448B004C74@microsoft.com...
> Hi,
>
> I want to use the ThisWorkBook BeforeSave event to prevent users from
> saving the sheet if the sheet path is O:\XBOX\XBOX-Tier2\Customer
> Support\Source\Reports"



Re: Prevent from save if... by Pietro

Pietro
Wed Jul 23 04:07:00 CDT 2008

Hi Bob Phillips
Thank you for your reply...
I need exactly to do the following:
Once users try to save the sheet that has the below path ,the sheet is
automatically saved as "Tier2 Report" on the desktop ,then the sheet is
closed and the one saved on the desktop opens automatically

"Bob Phillips" wrote:

> Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
> Boolean)
> If ThisWorkbook.Path = _
> "O:\XBOX\XBOX-Tier2\Customer Support\Source\Reports" Then
> Cancel = True
> End If
> End Sub
>
>
> --
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my addy)
>
> "Pietro" <Pietro@discussions.microsoft.com> wrote in message
> news:B2803044-4480-49D0-95C0-A3448B004C74@microsoft.com...
> > Hi,
> >
> > I want to use the ThisWorkBook BeforeSave event to prevent users from
> > saving the sheet if the sheet path is O:\XBOX\XBOX-Tier2\Customer
> > Support\Source\Reports"
>
>
>

Re: Prevent from save if... by Bob

Bob
Thu Jul 24 13:22:41 CDT 2008

Which one on the desktop?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Pietro" <Pietro@discussions.microsoft.com> wrote in message
news:F1799532-E119-4902-99F7-6D013EA1D649@microsoft.com...
> Hi Bob Phillips
> Thank you for your reply...
> I need exactly to do the following:
> Once users try to save the sheet that has the below path ,the sheet is
> automatically saved as "Tier2 Report" on the desktop ,then the sheet is
> closed and the one saved on the desktop opens automatically
>
> "Bob Phillips" wrote:
>
>> Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
>> Boolean)
>> If ThisWorkbook.Path = _
>> "O:\XBOX\XBOX-Tier2\Customer Support\Source\Reports" Then
>> Cancel = True
>> End If
>> End Sub
>>
>>
>> --
>> HTH
>>
>> Bob
>>
>> (there's no email, no snail mail, but somewhere should be gmail in my
>> addy)
>>
>> "Pietro" <Pietro@discussions.microsoft.com> wrote in message
>> news:B2803044-4480-49D0-95C0-A3448B004C74@microsoft.com...
>> > Hi,
>> >
>> > I want to use the ThisWorkBook BeforeSave event to prevent users from
>> > saving the sheet if the sheet path is O:\XBOX\XBOX-Tier2\Customer
>> > Support\Source\Reports"
>>
>>
>>



Re: Prevent from save if... by Pietro

Pietro
Sat Jul 26 03:40:00 CDT 2008


The one that might have been created from a previous transacion by the same
code.

"Bob Phillips" wrote:

> Which one on the desktop?
>
> --
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my addy)
>
> "Pietro" <Pietro@discussions.microsoft.com> wrote in message
> news:F1799532-E119-4902-99F7-6D013EA1D649@microsoft.com...
> > Hi Bob Phillips
> > Thank you for your reply...
> > I need exactly to do the following:
> > Once users try to save the sheet that has the below path ,the sheet is
> > automatically saved as "Tier2 Report" on the desktop ,then the sheet is
> > closed and the one saved on the desktop opens automatically
> >
> > "Bob Phillips" wrote:
> >
> >> Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
> >> Boolean)
> >> If ThisWorkbook.Path = _
> >> "O:\XBOX\XBOX-Tier2\Customer Support\Source\Reports" Then
> >> Cancel = True
> >> End If
> >> End Sub
> >>
> >>
> >> --
> >> HTH
> >>
> >> Bob
> >>
> >> (there's no email, no snail mail, but somewhere should be gmail in my
> >> addy)
> >>
> >> "Pietro" <Pietro@discussions.microsoft.com> wrote in message
> >> news:B2803044-4480-49D0-95C0-A3448B004C74@microsoft.com...
> >> > Hi,
> >> >
> >> > I want to use the ThisWorkBook BeforeSave event to prevent users from
> >> > saving the sheet if the sheet path is O:\XBOX\XBOX-Tier2\Customer
> >> > Support\Source\Reports"
> >>
> >>
> >>
>
>
>