Macro Help

[mak]

I want to close a workbook when my exposure (cell L2) reach a limit lets say -300

I am trying to use the following code but nothing is happening...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Columns.Count = 16 Then
If Cells(2, 12).Value >= -1040 Then
Workbooks("makis1.xls").Close savechanges:=False
End If
End If
End Sub


Can someone help please?

[mak]

I want to close a workbook when my exposure (cell L2) reach a limit lets say -300

I am trying to use the following code but nothing is happening...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Columns.Count = 16 Then
If Cells(2, 12).Value >= -300 Then
Workbooks("makis1.xls").Close savechanges:=False
End If
End If
End Sub


Can someone help please?

[mak]

I want to close a workbook when my exposure (cell L2) reach a limit lets say -300

I am trying to use the following code but nothing is happening...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Columns.Count = 16 Then
If Cells(2, 12).Value >= -300 Then
Workbooks("makis1.xls").Close savechanges:=False
End If
End If
End Sub


Can someone help please?

Sorry I have to add that I am using excel 2007 and the workbook name is makis1.xlsm

I have tried with .xlsm also but no luck yet...

[Ian]

Should be <= -300 ?

[osknows]

try

Code: Select all

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Columns.Count = 16 Then
If Cells(2, 12).Value >= -1040 Then
Thisworkbook.Close False
End If
End If
End Sub


ActiveWorkbook.Close False
' closes the active workbook without saving any changes

ActiveWorkbook.Close True
' closes the active workbook and saves any changes

ActiveWorkbook.Close
' closes the active workbook and lets the user decide if
' changes are to be saved or not

[mak]

Os thanks,
but still the workbook remains open

I am running also a macro with on time method where every 20 sec perform
a calculation and place some bets

Do you believe that it has to do with this?

** I also tried in another cell where if it is YES then workbook close & though the cell returns YES the workbook remains open.

[osknows]

Did you try Ian's correction?

I missed it too It should be

If Cells(2, 12).Value <= -1040 Then

[osknows]

** I also tried in another cell where if it is YES then workbook close & though the cell returns YES the workbook remains open.

Sorry mis-read this bit earlier. Not sure what it is then? Send me a PM with link if you like and I'll have a look