Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > microsoft.public.excel.programming > #109678

Re: sheet specific desktop shortcut

Show all headers | View raw

Hi Pual,

Am Thu, 24 Nov 2016 12:33:06 -0800 (PST) schrieb Paul Doucette:

> G\Is it possible to have a desktop shortcut open an excel file and go to a specific worksheet, even if the file was saved with a different sheet selected?
> I have a workbook with about 20 worksheets, and four users. I would like it to open to a different sheet for each user.

in a standard module:

Sub UsersSheet()
Dim shN As String

Select Case Application.UserName
    Case "Name1"
        shN = "Sheet1"
    Case "Name2"
        shN = "Sheet2"
    Case "Name2"
        shN = "Sheet3"
        .
        .
        .
End Select

Application.Goto Sheets(shN).Range("A1")
End Sub

Change Name to the expected user names.
In code module "ThisWorkbook":

Private Sub Workbook_Open()
UsersSheet
End Sub


Regards
Claus B.
-- 
Windows10
Office 2016

Back to microsoft.public.excel.programming | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

sheet specific desktop shortcut Paul Doucette <pauld@mewood.com> - 2016-11-24 12:33 -0800
  Re: sheet specific desktop shortcut Claus Busch <claus_busch@t-online.de> - 2016-11-25 07:36 +0100
  Re: sheet specific desktop shortcut isabelle <i@v.invalid> - 2016-11-25 01:44 -0500
  Re: sheet specific desktop shortcut aloinam109 <aloinam109@gmail.com> - 2016-11-25 14:02 +0000
  Re: sheet specific desktop shortcut Paul Doucette <pauld@mewood.com> - 2016-11-25 09:44 -0800

csiph-web