filas
Publicado por davidf (26 intervenciones) el 18/04/2007 15:15:52
hey señores tengo este codigo:
Sub BorrarRegistro()
Dim item As Integer
item = Val(InputBox("Ingresar el Número de ITEM", ""))
Cells(item , 2).Select
ROWS("item:item").Select
Selection.Delete Shift:=xlUp
Range("a1").Select
Endsub
lo k supuestamente debe de hacer es que la ejecutar el macro me aparezca un inputbox ingrese el numero de ITEM (osea el numero de Fila), y me elimine esa fila, pero no me sale....que esta mal??
Sub BorrarRegistro()
Dim item As Integer
item = Val(InputBox("Ingresar el Número de ITEM", ""))
Cells(item , 2).Select
ROWS("item:item").Select
Selection.Delete Shift:=xlUp
Range("a1").Select
Endsub
lo k supuestamente debe de hacer es que la ejecutar el macro me aparezca un inputbox ingrese el numero de ITEM (osea el numero de Fila), y me elimine esa fila, pero no me sale....que esta mal??
Valora esta pregunta
0
