Yes it is, try this:-

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Intersect(Target, Range("A1"))
If rng Is Nothing Then
Exit Sub
Else
If Target.Value 6 Then
Workbooks.Open ("C:\book2.xls")
Else
Exit Sub
End If
End If
End Sub

This is worksheet code so right click the sheet tab - view code and paste in.
If A1 value is greater than 6 then the workbook opens.

Mike
"Mike" wrote:

I would like Excel to automaticaly open another worksheet if the value of a
particular cell has a particular value. Is this posible?