Taskbar

ibrahimaa · #3 02-19-2012, 11:18 AM

Thanks a lot for the support. However, I have placed it in different places (below is just examples) and still does not work where the server file still appears in the below taskbar.

Also, I found that you can click on the server file while it is appearing in the taskbar and views its content which I do not want the user to do.

I would highly appreciate any further help. Thank you.

Code:

Sub getvalue()
Dim Path, myrange, ShName, Wb As String
Path = "\\Server Folder"
Wb = "Report-1c-Server.xlsx"
myrange = "A9:C9700" 
Workbooks.Open Filename:=Path & "\" & Wb
Application.DisplayStatusBar = False
With ThisWorkbook.Sheets("EXHIBIT 6-A") 'change sheet1 to your sheet name
.Activate  
Select Case ThisWorkbook.Sheets("EXHIBIT 6-A").Cells(5, "S")
Case 7
ShName = "Arxxx-MP-July"
Application.DisplayStatusBar = False
ActiveSheet.Cells(7, "B") = Application.VLookup(ActiveSheet.Cells(4, "G"),
Workbooks(Wb).Sheets(ShName).Range(myrange), 3, False)
Case Else
End Select
End With
Workbooks(Wb).Close , savechanges = True
End Select
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Show all windows in taskbar option for PP 2010.	WLVanS	PowerPoint	10	02-11-2012 01:32 AM
Show all windows in the Taskbar - problem	binaryfinary	Word	1	06-14-2011 03:51 PM
Taskbar .doc disappeared	Ossum	Word	0	12-05-2010 12:53 AM
2 icons for outlook in taskbar?	campoblanco	Outlook	2	10-17-2010 06:58 PM
Envelope in the taskbar when rules applied	whatever61	Office	1	06-11-2010 09:16 PM