L 
		
								
				
				
			
		Lance
In the open or save event you can add the line
example:
Private Sub Workbook_Open()
ActiveSheet.Cells(1, 1).Select
End Sub
				
			example:
Private Sub Workbook_Open()
ActiveSheet.Cells(1, 1).Select
End Sub
