View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
badboybmw_886 badboybmw_886 is offline
external usenet poster
 
Posts: 1
Default VBA - making an exception for certain cells

Hello there,

I have a piece of VBA code that I have been using in a mock up excel
system for my A levels

the code places the cell number + and offset of 113 into the cell you
click on in coloumb B. Sort of working like an auto number in the next
cell. But i dont want it to do this for rows 1 -5 is there anyway of
doing this?

Heres the code;

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim RowOffset As Long
Dim IndexCol As String

RowOffset = 113

IndexCol = "B"

Intersect(ActiveCell.EntireRow, Columns(IndexCol)).Value =
ActiveCell.Row + RowOffset
End Sub

Any help would be greatly appreciated