diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 5d912970f..659934309 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -4196,7 +4196,7 @@ Partial Class Inventarios_EntradasSalidas
                         ElProductoChange()
                         TxtnSerie.Text = Serie
                         TxtnLote.Text = Lote
-                        DdlSeccionAlmacen.SelectedValue = CveSeccionAlmacen.ToString
+                        DdlSeccionAlmacen.SelectedValueExist(CveSeccionAlmacen.ToString)
                         TxtnFechaCaducidad.Text = If(Caducidad = "", MinFecha.ToString, Caducidad)
                         AgregarPS()
                         txtPrecio.Text = ""