Consulting

Results 1 to 2 of 2

Thread: testing code.

  1. #1

    testing code.

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Cells(1, Target.Column) <> "X" Then Target.Offset(0, 1).Select
    End Sub

  2. #2
    Administrator
    VP-Knowledge Base
    VBAX Grand Master mdmackillop's Avatar
    Joined
    May 2004
    Location
    Scotland
    Posts
    14,489
    Location
    [VBA]Use the VBA button[/VBA]
    MVP (Excel 2008-2010)

    Post a workbook with sample data and layout if you want a quicker solution.


    To help indent your macros try Smart Indent

    Please remember to mark threads 'Solved'

Posting Permissions

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