Nombrar archivos

Hola Mbaeijhapa,

Prueba la siguiente instruccion:

Sub Test()
ThisWorkbook.SaveAs Range("A1") & ".xls"
End Sub

Saludos,
KL

"Mbaeijhapa" wrote in message
news:

Hola amigos,

Quisiera saber si existe la posibilidad, a traves de macros, de nombrar un
archivo relacionado con la entrada de datos en una determinada celda. Ej.:

Si en la celda "A1" tiene el dato "Enero", que la planilla se grabe como
"Enero.xls".
Si esta celda tiene el dato "XXX" que la planilla se grabe como "XXX.xls".

El motivo del mismo se debe a que tengo una plantilla como base para
ingresar datos todos los meses, y como tiene unas macros preestablecidos,
desearia agragarle una instruccion para que el archivo se grabe
automaticamente con el nombre del dato ingresado en una celda.

Muchas gracias.
Mbaejhapa

Hola KL,
Excel-ente tu repuesta, muchas gracias.
Aprovecho tu conocimiento para preguntarte si esta macro se puede adaptar a
lo siguiente:
Al ejecutar una macro (otra) que está en el libro que contiene en A1 el
dato "XXX", genera un nuevo libro que es el que deseo grabar con el nombre de
"XXX" que está en la celda A1 pero del otro libro (se entiende?).
Es decir, quisiera grabar el libro nuevo (libro2) con el nombre
correspondiente al dato que esta en la celda A1 de otro libro (libro1), y es
en este libro1 donde debería estar las macros.

Desde ya te agradezco tu atención.
Mbaeijhapa


"KL" escribió:

Hola Mbaeijhapa,

Prueba la siguiente instruccion:

Sub Test()
ThisWorkbook.SaveAs Range("A1") & ".xls"
End Sub

Saludos,
KL

"Mbaeijhapa" wrote in message
news:
> Hola amigos,
>
> Quisiera saber si existe la posibilidad, a traves de macros, de nombrar un
> archivo relacionado con la entrada de datos en una determinada celda. Ej.:
>
> Si en la celda "A1" tiene el dato "Enero", que la planilla se grabe como
> "Enero.xls".
> Si esta celda tiene el dato "XXX" que la planilla se grabe como "XXX.xls".
>
> El motivo del mismo se debe a que tengo una plantilla como base para
> ingresar datos todos los meses, y como tiene unas macros preestablecidos,
> desearia agragarle una instruccion para que el archivo se grabe
> automaticamente con el nombre del dato ingresado en una celda.
>
> Muchas gracias.
> Mbaejhapa

Hola Mbaeijhapa,

Que tal este codigo:

Sub Test()
Dim Nombre As String
Nombre = ActiveSheet.Range("A1") & ".xls"
Workbooks.Add.SaveAs Nombre
End Sub

Saludos,
KL

"Mbaeijhapa" wrote in message
news:

Hola KL,
Excel-ente tu repuesta, muchas gracias.
Aprovecho tu conocimiento para preguntarte si esta macro se puede adaptar
a
lo siguiente:
Al ejecutar una macro (otra) que esta en el libro que contiene en A1 el
dato "XXX", genera un nuevo libro que es el que deseo grabar con el nombre
de
"XXX" que esta en la celda A1 pero del otro libro (se entiende?).
Es decir, quisiera grabar el libro nuevo (libro2) con el nombre
correspondiente al dato que esta en la celda A1 de otro libro (libro1), y
es
en este libro1 donde deberia estar las macros.

Desde ya te agradezco tu atencion.
Mbaeijhapa


"KL" escribio:

Hola Mbaeijhapa,

Prueba la siguiente instruccion:

Sub Test()
ThisWorkbook.SaveAs Range("A1") & ".xls"
End Sub

Saludos,
KL

"Mbaeijhapa" wrote in message
news:
> Hola amigos,
>
> Quisiera saber si existe la posibilidad, a traves de macros, de nombrar
> un
> archivo relacionado con la entrada de datos en una determinada celda.
> Ej.:
>
> Si en la celda "A1" tiene el dato "Enero", que la planilla se grabe
> como
> "Enero.xls".
> Si esta celda tiene el dato "XXX" que la planilla se grabe como
> "XXX.xls".
>
> El motivo del mismo se debe a que tengo una plantilla como base para
> ingresar datos todos los meses, y como tiene unas macros
> preestablecidos,
> desearia agragarle una instruccion para que el archivo se grabe
> automaticamente con el nombre del dato ingresado en una celda.
>
> Muchas gracias.
> Mbaejhapa

Hola KL,
Te estoy enviando una nota (por esta vía) con fecha 17/02 a tu nombre, paras
ver si continuamos con el tema.
Muchas gracias.
Mbaeijhapa.

"KL" escribió:

Hola Mbaeijhapa,

Que tal este codigo:

Sub Test()
Dim Nombre As String
Nombre = ActiveSheet.Range("A1") & ".xls"
Workbooks.Add.SaveAs Nombre
End Sub

Saludos,
KL

"Mbaeijhapa" wrote in message
news:
> Hola KL,
> Excel-ente tu repuesta, muchas gracias.
> Aprovecho tu conocimiento para preguntarte si esta macro se puede adaptar
> a
> lo siguiente:
> Al ejecutar una macro (otra) que esta en el libro que contiene en A1 el
> dato "XXX", genera un nuevo libro que es el que deseo grabar con el nombre
> de
> "XXX" que esta en la celda A1 pero del otro libro (se entiende?).
> Es decir, quisiera grabar el libro nuevo (libro2) con el nombre
> correspondiente al dato que esta en la celda A1 de otro libro (libro1), y
> es
> en este libro1 donde deberia estar las macros.
>
> Desde ya te agradezco tu atencion.
> Mbaeijhapa
>
>
> "KL" escribio:
>
>> Hola Mbaeijhapa,
>>
>> Prueba la siguiente instruccion:
>>
>> Sub Test()
>> ThisWorkbook.SaveAs Range("A1") & ".xls"
>> End Sub
>>
>> Saludos,
>> KL
>>
>> "Mbaeijhapa" wrote in message
>> news:
>> > Hola amigos,
>> >
>> > Quisiera saber si existe la posibilidad, a traves de macros, de nombrar
>> > un
>> > archivo relacionado con la entrada de datos en una determinada celda.
>> > Ej.:
>> >
>> > Si en la celda "A1" tiene el dato "Enero", que la planilla se grabe
>> > como
>> > "Enero.xls".
>> > Si esta celda tiene el dato "XXX" que la planilla se grabe como
>> > "XXX.xls".
>> >
>> > El motivo del mismo se debe a que tengo una plantilla como base para
>> > ingresar datos todos los meses, y como tiene unas macros
>> > preestablecidos,
>> > desearia agragarle una instruccion para que el archivo se grabe
>> > automaticamente con el nombre del dato ingresado en una celda.
>> >
>> > Muchas gracias.
>> > Mbaejhapa
>>
>>
>>