saltarse asistente en una macro

04/07/2007 - 20:48 por Tony | Informe spam
Hola a todos.

Tengo unos archivos que son de tipo texto delimitado y quería hacer una
macro para que no tuviese que pasar por el asistente cada vez que quiero
convertir dicho archivo en Excell... ¿Hay alguna forma?

Gracias

Preguntas similare

Leer las respuestas

#6 Tony
06/07/2007 - 22:40 | Informe spam
Hola Hector:

Me refería a que inicié la grabación de la macro como me dijiste, abriendo
el archivo de texto y siguiendo los pasos del asistente. Una vez terminado
con esto, en vez de detener la grabación de la macro seguí probando para
quitar las primeras 7 filas. A esta macro grabada le asigné una combinación
de teclas nueva y después probé para ver si funcionaba pero, como te dije,
sólo funciona la primera parte de abrir el archivo de texto sin que aparezca
el asistente...

¿Por qué no funciona el resto de la macro (eliminación de filas)?...

Gracias por anticipado...



"Héctor Miguel" wrote:

hola, Tony !

no me queda muy claro que signifique eso de: "he continuado con el grabador de macros" -???-
[pero] ma da la impresion de que has duplicado/copiado/... el codigo generado por la grabadora
[p.e.] en una macro nueva [quiza en un modulo nuevo tambien] que ya no es la misma que genero la grabadora -???-
es probable que la macro a la que la grabadora le asigno el atajo de teclado y la que modificaste no sean la misma -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

__ la consulta original __
> Ahora pregunto otra cosa que tiene que ver con esto. Con el "grabador de macros"
> hago todo lo del asistente y despues de que me captura en excel el archivo
> quiero quitar unas cuantas filas del principio. Para ello, he continuado con el "grabador de macros".
> Pero al pulsar la combinacion de teclas, la macro solo ejecuta la primera parte
> (la del asistente para conversion de texto a excel). Este es el codigo que me ha quedado:
>
> Workbooks.OpenText Filename:= _
> "C:\MenຠInicio\Mis documentos\UTSS-24HORAS\Nuevo proyecto de reclamaciones\RECLAMACIONES.*" _
> , Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier _
> :=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:= _
> False, Comma:=False, Space:=False, Other:=True, OtherChar:="#", _
> FieldInfo:=Array(Array(1, 1), Array(2, 1))
> Rows("1:7").Select
> Selection.Delete Shift:=xlUp
>
> Mi pregunta: por que solo funciona la primera parte y no continua con la eliminacion de las filas? Que falta?



Respuesta Responder a este mensaje
#7 Héctor Miguel
07/07/2007 - 00:06 | Informe spam
hola, Tony !

... inicie la grabacion de la macro... abriendo el archivo de texto y siguiendo los pasos del asistente
... terminado con esto, en vez de detener la grabacion... segui probando para quitar las primeras 7 filas.
A esta macro grabada le asigne una combinacion de teclas nueva y despues probe para ver si funcionaba
pero, como te dije, solo funciona la primera parte de abrir el archivo de texto sin que aparezca el asistente...
Por que no funciona el resto de la macro (eliminacion de filas)?...



de esta exposicion [creo que] se deduce lo siguiente:
1) hablamos DOS macros diferentes [una solo abre el archivo y otra ademas elimina las filas] -?-
2) cada macro tiene asignado un atajo [combinacion de teclas] diferente <= aqui...
3) es probable que la letra de cada macro sea *la misma* [p.e. una en minusculas y otra en mayusculas] -?-
4) si lo anterior es *acertado*... la macro a la que asignaste la letra en mayuscula...
-> es necesario que la llames/ejecutes/... combinando {ctrl}+{mayus}+{letra_asignada}
OJO: *independientemente* del estado de la tecla {Bloq May} o {Caps Lock}

de otra manera, no se aprecia/ve/distingue/... causa de error/suspension/omision/... en el codigo que expones

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#8 Tony
07/07/2007 - 10:34 | Informe spam
Hola de nuevo Hector:

Creo que no me expliqué lo suficientemente bien... La macro es la misma para
las DOS operaciones... Tal y como puse antes, NO detuve la grabación de la
macro después de pasar por el asistente para convertir el texto en Excel...
Por tanto, la combinación de teclas debería de hacer las dos cosas y no sé
por qué no las hace...

Tendré que probar otra cosa o hacerlo con dos macros distintas (lo cual no
me gustaría)...

Gracias por todos. Si encuentras alguna solución, por favor, hadmela
saber... Gracias.
Respuesta Responder a este mensaje
#9 Tony
10/07/2007 - 06:36 | Informe spam
Hola Hector:

¿Podrías decirme algo sobre este tema?... Gracias de nuevo.

"Tony" wrote:

Hola de nuevo Hector:

Creo que no me expliqué lo suficientemente bien... La macro es la misma para
las DOS operaciones... Tal y como puse antes, NO detuve la grabación de la
macro después de pasar por el asistente para convertir el texto en Excel...
Por tanto, la combinación de teclas debería de hacer las dos cosas y no sé
por qué no las hace...

Tendré que probar otra cosa o hacerlo con dos macros distintas (lo cual no
me gustaría)...

Gracias por todos. Si encuentras alguna solución, por favor, hadmela
saber... Gracias.
Respuesta Responder a este mensaje
#10 Héctor Miguel
10/07/2007 - 07:09 | Informe spam
hola, Tony !

Podrias decirme algo sobre este tema?...



con los datos conocidos hasta ahora ?... [mucho me temo que]... no :-((

1) expones 3 lineas de una macro:
workbooks.opentext filename:= [etc.]
rows("1:7").select
selection.delete [etc.]

2) comentas que se ejecuta la primera instruccion, pero no las siguientes -???-

3) dices que a la macro grabada le asignaste: "... una combinacion de teclas nueva y despues probe para ver si funcionaba"
-> por que una combinacion de teclas *nueva* ?...
-> de cuantas macros y combinaciones estamos hablando ?
-> cual/es combinacion/es de teclas tienes activada/s ? <= +/- exactamente :D

[creo que siguen algunos detalles *en el tintero*] -?-
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida