Private Views created showing up on everyone's view list...

[John Riddle]

Hello,

We routinely create filters on our public contacts folders based on certain
criteria and the sales people call from that list. There may be several
different "searches" going on at once for each person so instead of having the
sales people go to Views -> Arrange By -> Current Views -> Define Views ->
Copy Current View -> (Then select "This folder visible to only me" and name
it), I have created the VBA macro and put a button on the tool bar to execute
it. The problem is that for SOME users, the views they create with it DO NOT
show up on everyone else's list of views. But for two users the views they
create with this macro ALWAYS show up on everyone's list of views.

Can anyone tell me what is wrong with this code:

Sub CopyView()
Dim objNewView As Outlook.View
Dim objOldView As Outlook.View
strViewName = InputBox("Please type a unique name for your view", "View Name")
Set objOldView = Application.ActiveExplorer.CurrentFolder.CurrentView
Set objNewView = objOldView.Copy(strViewName,
olViewSaveOptionThisFolderOnlyMe)
Set objNewView = Nothing
Set objOldView = Nothing
strViewName = ""
End Sub

The users are supposed to be able to add a filter to their current view of the
folder, save it with a name for their view and then remove the filter applied
to the original view and see all contacts on the folder (Directory) but still
be able to quickly switch back to their filter at any time later.

thanks,

John

 

[Guest]

There's something strange going on here. Because you are creating the new
view with olViewSaveOptionThisFolderOnlyMe set, there's no way other users
will be able to see that view unless they happen to have a private view with
the same name, or if a public view with the same name exists.