formulario x codigo

Hola Daniel,

Miura mi respuesta a tu posting identico anterior.

Saludos,
KL


"Daniel S.L." wrote in message
news:%23H$

Hola de que forma por medio de código sale el formulario para capturar
registros o se
Datos->Formulario... intente sacar esto con una macro pero no me salió
nada.

Sub Macro2()
'
' Macro2 Macro
' Macro grabada el 22/09/2005 por Daniel
'

'
ActiveSheet.ShowDataForm
End Sub

he notado para que pueda salir dicho formulario debo de tener una lista de
registro con títulos
ya la tengo y empieza el primer registro desde la celda A15, por favor
alguna ayuda

Gracias.

Un saludo,
Daniel

Gracias Kl
"KL" escribió en el mensaje
news:O7n4$

Hola Daniel,

Miura mi respuesta a tu posting identico anterior.

Saludos,
KL


"Daniel S.L." wrote in message
news:%23H$
> Hola de que forma por medio de código sale el formulario para capturar
> registros o se
> Datos->Formulario... intente sacar esto con una macro pero no me salió
> nada.
>
> Sub Macro2()
> '
> ' Macro2 Macro
> ' Macro grabada el 22/09/2005 por Daniel
> '
>
> '
> ActiveSheet.ShowDataForm
> End Sub
>
> he notado para que pueda salir dicho formulario debo de tener una lista de
> registro con títulos
> ya la tengo y empieza el primer registro desde la celda A15, por favor
> alguna ayuda
>
> Gracias.
>
> Un saludo,
> Daniel
>
>

hola, Daniel !

Hola de que forma por medio de codigo sale el formulario para capturar registros o sea
Datos->Formulario... intente sacar esto con una macro pero no me salio nada.
Sub Macro2()
ActiveSheet.ShowDataForm
End Sub
he notado para que pueda salir dicho formulario debo de tener una lista de registro con titulos
ya la tengo y empieza el primer registro desde la celda A15, por favor alguna ayuda

solo como informacion adicional a lo que ya te ha respondido KL...
[espero que sea de utilidad] ;)

saludos,
hector.

-> cuando 'pretendes' mostrar el formulario de una hoja [datos / formulario...] ->por codigo<-...
excel 'trata' de encontrar un nombre de rango que haga referencia a la 'base de datos'...
o [si no lo encuentra]... 'busca' en la hoja ->a partir del rango 'A1'<-

las 'alternativa' [que veo] para que 'funcione SIN errores' el formulario de datos por codigo, son...
o... MOVER la base de datos para que inicie en 'A1'
o... usar un objeto 'commandbar' [simulando la ejecucion de: -menu- datos / formulario...]
[obviamente, la hoja 'activa' DEBE ser la 'correcta Y la celda 'activa' estar dentro de la base de datos]

1.- si te 'decides' por mover la base de datos a 'A1'...
podrias 'presentar' el formulario ->de cualquier hoja<- [si existe] DESDE cualquiera otra como 'activa' [p.e.]
si estas en hoja2 y quieres mostrar el formulario de hoja1...
Worksheets("Hoja1").ShowDataForm

2.- si 'prefieres/necesitas' DEJAR la base de datos 'donde esta'... ['tendras que']...
-> activar la hoja Y una celda 'apropiadas' y...
-> ejecutar el comando [datos / formulario...] ->por codigo<- +/- como sigue...
Worksheets("Hoja1").Select
Range("a15").Select
Application.CommandBars.FindControl(Id:†0).Execute

encontraras la explicacion de este 'comportamiento' en la siguiente pagina...
http://support.microsoft.com/defaul...es;e110462
El metodo ShowDataForm provoca un fallo si no se encuentran datos
[traduccion automatica al cstellano]