diff --git a/Ventas/ActualizarPrecios.aspx.vb b/Ventas/ActualizarPrecios.aspx.vb
index ec5373adf..a09d59cb4 100644
--- a/Ventas/ActualizarPrecios.aspx.vb
+++ b/Ventas/ActualizarPrecios.aspx.vb
@@ -990,20 +990,17 @@ Partial Class Ventas_ActualizarPrecios
             For Each GvRow As GridViewRow In GvMultiple.Rows
 
                 If GvRow.FCCheckBox("chkPS").Checked Then
-                    For colIndex As Integer = 2 To GvRow.Cells.Count - 1
+                    For colIndex As Integer = 2 To GvRow.Cells.Count - 3
 
                         Dim indiceColumna As Integer = (colIndex)
-
+                        Dim CvePS As Integer = DtPreciosMultiple.Rows(GvRow.RowIndex)("CvePS").ToString().ToEntero()
                         Dim LtlId As String = "LtlLista_" + (colIndex - 1).ToString()
                         Dim TxtId As String = "TxtPrecio_" + (colIndex - 1).ToString()
 
                         If indiceColumna <= DtPreciosMultiple.Columns.Count - 1 Then
 
                             Dim CvePrecioLista As Integer = GvMultiple.HeaderRow.FCLabel(LtlId).Attributes().Item("cvepreciolista").ToEntero()
-                            Dim CvePS As Integer = DtPreciosMultiple.Rows(GvRow.RowIndex)("CvePS").ToString().ToEntero()
-
                             Dim Precio As Decimal = GvRow.FCTextBox(TxtId).Text.ToDecimal()
-
                             TieneError = Not ObjPS.UpdatePSPreciosLista(Precio, CvePrecioLista, 0, CvePS, UsuarioActual.CveUsuario, NowADS(), True)
 
                             If Not TieneError Then