+ Reply to Thread
Results 1 to 5 of 5

Hyperlik to Another sheet

  1. #1
    Forum Contributor
    Join Date
    08-30-2011
    Location
    England
    MS-Off Ver
    Excel 2010
    Posts
    142

    Hyperlik to Another sheet

    I have the following code which on the selection of yes in the dropdown in cell J67 the sheet named DIP is activated and takes the user there. Under cell J67 there are 5 other cells J67 to J70 which all could have a yes selected. Only 1 yes will be selected within the range, Dependent on which cell is selected would then change what sheet the user is taken too. How do I loop the existing code ?

    Thanks
    Ted

  2. #2
    Forum Contributor
    Join Date
    08-30-2011
    Location
    England
    MS-Off Ver
    Excel 2010
    Posts
    142

    Re: Hyperlik to Another sheet

    Having trouble with Sucuri so having to post piecemeal

  3. #3
    Forum Contributor
    Join Date
    08-30-2011
    Location
    England
    MS-Off Ver
    Excel 2010
    Posts
    142

    Re: Hyperlik to Another sheet

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Target.Address = "$J$67" Then Exit Sub ' check to see if the value being changed is in your drop down cell
    If Target.Value = "yes" Then
    Sheets("DIP").Select
    Sheets("DIP").Range("B2").Select ' Sheet to select and cell if the drop down is moved to "yes"
    End If
    End Sub

  4. #4
    Forum Contributor
    Join Date
    08-30-2011
    Location
    England
    MS-Off Ver
    Excel 2010
    Posts
    142

    Re: Hyperlik to Another sheet

    Cannot post with CODE tags sorry

  5. #5
    Forum Contributor
    Join Date
    08-30-2011
    Location
    England
    MS-Off Ver
    Excel 2010
    Posts
    142

    Re: Hyperlik to Another sheet

    ive sorted it now

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("$J$67") = "yes" Then
    Sheets("DIP").Select
    Sheets("DIP").Range("B2").Select

    ElseIf Range("$J$68") = "yes" Then
    Sheets("1st Time Buyer").Select
    Sheets("1st Time Buyer").Range("B2").Select

    ElseIf Range("$J$69") = "yes" Then
    Sheets("Home Mover").Select
    Sheets("Home Mover").Range("B2").Select

    ElseIf Range("$J$70") = "yes" Then
    Sheets("Further Advance").Select
    Sheets("Further Advance").Range("B2").Select

    ElseIf Range("$J$71") = "yes" Then
    Sheets("BTL-CBTL").Select
    Sheets("BTL-CBTL").Range("B2").Select

    ElseIf Range("$J$72") = "yes" Then
    Sheets("Holiday Home").Select
    Sheets("Holiday Home").Range("B2").Select

    ElseIf Range("$J$73") = "yes" Then
    Sheets("Mtge Free Capital Raising").Select
    Sheets("Mtge Free Capital Raising").Range("B2").Select

    ElseIf Range("$J$74") = "yes" Then
    Sheets("Help to Buy").Select
    Sheets("Help to Buy").Range("B2").Select
    End If

    End Sub

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 2
    Last Post: 01-23-2016, 01:16 PM
  2. Replies: 2
    Last Post: 01-18-2014, 10:54 PM
  3. Lookup Value from Sheet 4 in Sheet 2, if found copy Sheet 2 Active Row to Sheet 5
    By lgosso23 in forum Excel Programming / VBA / Macros
    Replies: 0
    Last Post: 10-11-2013, 02:51 PM
  4. [SOLVED] Match Value in Sheet 1 with Sheet 2, copy entire row from sheet 1 to new sheet
    By lzyshaman in forum Excel Programming / VBA / Macros
    Replies: 3
    Last Post: 04-01-2013, 07:48 AM
  5. [SOLVED] find code# from sheet 1 on sheet 2, compare value on sheet 1 with value on sheet 2
    By BlakeLee in forum Excel Programming / VBA / Macros
    Replies: 7
    Last Post: 01-27-2013, 01:52 PM
  6. Replies: 11
    Last Post: 10-14-2012, 01:03 PM
  7. Replies: 2
    Last Post: 10-12-2010, 05:00 PM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1