title: VBA Macro jumps to another?
body: <p>Is there any reason why this piece of code</p>
  
  <pre><code>Private Sub CT_Company_Loss_Change()
  
  With Application
      .Calculation = xlManual
      .EnableEvents = False
      .ScreenUpdating = False
  End With
  
  Dim stSQL As String, rst As ADODB.Recordset, k As Integer, vaData As Variant
  Dim objConn As ADODB.Connection
  Dim ConnectionString As String, sCompany As String
  ConnectionString = "Provider=sqloledb.1;data source=se-sqlct-0100;Initial catalog=AirCT2Loss;Integrated Security = SSPI;"
  Set objConn = New ADODB.Connection
  
  With CY_Program1
          .Clear
          .AddItem "Select Program"
          .ListIndex = 0
  End With
  </code></pre>
  
  <p>Gets to the last line and then jumps to this macro:</p>
  
  <pre><code>Private Sub CY_Program1_Change()
  
  With Application
      .Calculation = xlManual
      .EnableEvents = False
      .ScreenUpdating = False
  End With
  
  Dim stSQL As String, rst As ADODB.Recordset, k As Integer, vaData As Variant
  Dim objConn As ADODB.Connection
  Dim ConnectionString As String, sCompany As String, sProgram As String
  ConnectionString = "Provider=sqloledb.1;data source=se-sqlct-0100;Initial catalog=AirCT2Loss;Integrated Security = SSPI;"
  Set objConn = New ADODB.Connection
  </code></pre>
  
  <p>I have never seen this before and I'm not even using the call feature, so what is making it do it as its bugging my spreadsheet?</p>
  
  <p>Thanks in advance</p>