¿Como asigno una funcion a una tecla CTRL en WORD?

[Aprendix ABC]

Salu2

Recuerdo que hace un tiempo tenia configurado WORD para que digamos si subrayaba una linea y le undia CTRL + 1, se me cambiaba a digamos Arial 12 Negrilla Italic,... en CTRL + 2 tenia grabada otro Style..

me toco reinstalar todo y ya no me acuerdo como es ke se graban estas funciones, ALguien sabe por favor que me pueda acordar???


GRACIASSS!!!

[Mephisto]

Esas funciones se llaman Macros, lo que tienes que hacer es irte al menu herramientas en la opcion macro seleccionas grabar una nueva macro. Realizas la serie de comandos que se van a ejecutar y le asignas un combinación de acceso rapido (Ctrl + %).

[Aprendix ABC]

Estaba ensayando por la opcion ESTILOS Y FORMATO... ahi grabo mis estilos propios con sus rutas por teclado y funciona!! pero apenas cierro el FILe y abro OTRO... se han perdido, no kedan como grabado !! :( ..

Voy a ensayar por la opciones macro a ver como me va!! GRACIAS!!

[Aprendix ABC]

No se si lo estoy haciendo mal, pero por MACROS no me funciona...

Le doy GRABAR NUEVO MACRO, lo nombre, ELIJO EL ICONO DE TECLADO, en la siguiente ventana undo CTRL + 1, luego le doy asignar, salgo al editor de texto, subrayo un titulo, le cambio la tipografia, el tamaño, y la pongo en negrilla, y luego le doy STOP a grabador de macros.

DE ahi ensayo con otro subtitulo digamos, lo subrayo, y le doy CTRL + 1 y no pasa nada. Entro por la opcion de macros para aplicarlo manualmente y me cambia la tipografia y todo, pero no la ke habia grabado!!

Asi keda en el algoritomo de visual... no keda grabada la parte en donde le asigno la tipografia...

Sub Intertitulos()
'
' Intertitulos Macro
' Macro grabada el 1/5/2006 por Pedro Picapiedra
'
Selection.Font.Bold = wdToggle
Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
End Sub

Ke vaina!!!... Podrias ayudarme mas por favor? o sabes en ke parte puedo agregarle la sentencia y cual seria esta para ke tambien cambie la tipografia a tahoma por ejemplo

[Mephisto]

Lo estuve probando y no encontre ningun problema, ya que la macro funciona abriendo un nuevo documento e inclusive cerrando word y abriendolo nuevamente.

el proceso es el siguiente

Subrayas el titulo

Herramientas>Macro>Grabar Nueva Macro

En el cuadro de texto le das un nombre y seleccionas teclado

Presionas la combinacion de teclas que quieras utilizar y hay una linea en la que te menciona ASIGNADO A. Verifica que no este asignado ya que puede ser el problema que tengas

realizas el resto del procedimiento...

O si lo quieres hacer a mano

Hice la macro con el proceso anterior y le asigne la combinacion Alt+3

Sub Macro3()
'
' Macro3 Macro
' Macro grabada el 06/01/2006 por Azertia Usr
'
Selection.Font.Bold = wdToggle
Selection.Font.Italic = wdToggle
If Selection.Font.Underline = wdUnderlineNone Then
Selection.Font.Underline = wdUnderlineSingle
Else
Selection.Font.Underline = wdUnderlineNone
End If
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.Font.Color = wdColorPink
Selection.Font.Size = 24
Selection.Font.Name = "Tahoma"


End Sub

[Aprendix ABC]

Sub Macro3()
'
' Macro3 Macro
' Macro grabada el 06/01/2006 por Azertia Usr
'
Selection.Font.Bold = wdToggle
Selection.Font.Italic = wdToggle
If Selection.Font.Underline = wdUnderlineNone Then
Selection.Font.Underline = wdUnderlineSingle
Else
Selection.Font.Underline = wdUnderlineNone
End If
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.Font.Color = wdColorPink
Selection.Font.Size = 24
Selection.Font.Name = "Tahoma"

Con esto es suficiente hermano!!! muchas Gracias!!! voy a probarrrr..

[not_idea]

Yo lo probé y funcionó, Muchas gracias por el tip. A propósito, también lo probé en excel y funciona.

[Aprendix ABC]

De lujo, apenas lo acabo de probar y funciona Very Well!1 Thanks!