dmata

Elsa Matilde respondió: Eso porque Nro_Fila es variable Double y cuando cerrás o cancelás el valor devuelto es de otro tipo. Hay varias maneras de solucionarlo, una es esta: agregando las líneas en negrita: On error goto fin Nro_Fila = Inputbox(.....) On error goto 0 'toda...

leone respondió: Prueba con esta Macro: Sub Macro_Nueva_Fila() Dim Nro_Fila As Double ' Nro_Fila = InputBox("Ingrese el Número de la nueva Fila", "Nro de Fila") 'En la Hoja1 Sheets("Hoja1").Select Rows("Nro_Fila:Nro_Fila").Select Selection.Insert Shift:=xlDown...

Elsa Matilde respondió: Aquí nuevamente tenés que utilizar el evento Exit tal como la rutina anterior, solo que esta vez cuenta las veces que el valor ingresado ya está en la hoja (CONTAR. SI). Si ese valor es > que 0 significa que ya está y por lo tanto no podrás avanzar...

Elsa Matilde respondió: Una manera de hacerlo es con una rutina como esta. Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If TextBox1 = "" Then Cancel = True End If End Sub Esta rutina te permite continuar en el control hasta que ingreses algún valor en...