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

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

Re: sheet specific desktop shortcut

Path csiph.com!eternal-september.org!feeder.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From Claus Busch <claus_busch@t-online.de>
Newsgroups microsoft.public.excel.programming
Subject Re: sheet specific desktop shortcut
Date Fri, 25 Nov 2016 07:36:49 +0100
Organization A noiseless patient Spider
Lines 40
Message-ID <o18m3o$o7b$1@dont-email.me> (permalink)
References <f17942ac-2d21-436e-b0b2-c46e5c0f29b0@googlegroups.com>
Mime-Version 1.0
Content-Type text/plain; charset="iso-8859-1"
Content-Transfer-Encoding 8bit
Injection-Date Fri, 25 Nov 2016 06:35:36 -0000 (UTC)
Injection-Info mx02.eternal-september.org; posting-host="12e02ea25b996a050dcf2463d0c346b7"; logging-data="24811"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX19shAGL7YRNF7/KoL3QiLlo9IZHUMwHkH0="
User-Agent 40tude_Dialog/2.0.15.84de (b74d88be.269.211)
Cancel-Lock sha1:/Bsv8BHBnEtUj1OBs82RanpViIE=
Xref csiph.com microsoft.public.excel.programming:109678

Show key headers only | 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