diff --git a/VECTO/GUI/GearboxForm.vb b/VECTO/GUI/GearboxForm.vb
index 68dc635f4918f2289257a9aa54c00b7997ac8b1f..6487ad887232387c4ed43395e62d67b6ef951921 100644
--- a/VECTO/GUI/GearboxForm.vb
+++ b/VECTO/GUI/GearboxForm.vb
@@ -83,7 +83,7 @@ Public Class GearboxForm
         If (Cfg.DeclMode) Then
             CbGStype.DataSource = [Enum].GetValues(GetType(GearboxType)) _
                 .Cast(Of GearboxType)() _
-                .Where(Function(type) type.ManualTransmission() OrElse type = GearboxType.ATSerial) _
+                .Where(Function(type) Not type = GearboxType.APTN And (type.ManualTransmission() OrElse type = GearboxType.ATSerial)) _
                 .Select(Function(type) New With {Key .Value = type, .Label = type.GetLabel()}).ToList()
         Else
             CbGStype.DataSource = [Enum].GetValues(GetType(GearboxType)) _