Visual Basic Celdas

Cerrado
Pao - 15 ene 2010 a las 02:26
xto.adrianm86 Message postés 7 Date d'inscription lunes, 14 de diciembre de 2009 Estatus Miembro Última intervención viernes, 15 de enero de 2010 - 15 ene 2010 a las 17:16
Hola,
quisiera que por favor me colaboraran con un codigo visual basic, que permita insertar varias celdas (filas) a una hoja de excel, para que el usuario no tenga que estar con clikc derecho insertar sino que el programa me pida el número de celdas (solo filas )a insertar y el usuario lo digite.

Agradezco su colaboración.

1 respuesta

xto.adrianm86 Message postés 7 Date d'inscription lunes, 14 de diciembre de 2009 Estatus Miembro Última intervención viernes, 15 de enero de 2010 4
15 ene 2010 a las 17:16
Espero te sirva esto, lo hice en una macro, solo falta que valide si es numérico lo que le ingresas, si es caracter que le mande un mensaje de que solo números y que se apague si le da cancelar.

Sub Macro1()
'
' Macro1 Macro
'

'
insertRow

End Sub

Function insertRow()
Dim iRows_ As Integer
Dim iAux_ As Integer

iRows_ = InputBox("Número de celdas")
For iAux_ = 1 To iRows_
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Next iAux_

End Function


Saludos espero te sea de utilidad
0