no se como hacer

12/04/2005 - 21:32 por Hermano2 | Informe spam
tengo el Office 2000 profecional, mi duda es (y que contesten como hacerlo
paso por paso, ya que soy nuevito) tengo una oracion "PERIODO: ENERO
VENCIMIENTO: 15/01/05" la cual ENERO y 15/01/05 esta en rojo, toda la oracion
negrita y con tamaño de fuente en 12, y quiero que en varias partes se copie
lo mismo tal cual como esta, para asi cuando tenga que cambiarle los meses y
dias cambie de un solo lugar y eso haga que cambie en todos... pongamosle que
esta en N15, yo le pongo =N15, pero solo se copia el texto, no copia ni el
tamaño, ni negrita, y mucho menos ENERO y 15/01/05 que tienen que tener color
rojo... como hago para que copie con las espesificaciones antes dadas????
expliquenme paso por paso que debo hacer

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
13/04/2005 - 06:16 | Informe spam
hola, Hermano2 !

... tengo una oracion "PERIODO: ENERO VENCIMIENTO: 15/01/05"
... ENERO y 15/01/05 esta en rojo, toda la oracion negrita y... fuente en 12
... que en varias partes se copie... tal cual... esta
... asi cuando tenga que... cambie de un solo lugar y eso haga que cambie en todos
... expliquenme paso por paso que debo hacer...



[creo que] la forma mas 'rapida' y sencilla es usando los eventos por cambios en 'la hoja'
te expongo un ejemplo al final... si cualquier duda... comentas?
saludos,
hector.
=[p.e.] suponiendo que la oracion esta en la celda 'A1' de 'cierta' hoja...
y que requieres que se copie 'tal cual' a las celdas 'C10', 'B15', 'E20' y 'D35'
y tambien a la celda 'A1' de todas las demas hojas de calculo en el libro...
-> haz un click-derecho sobre la pestaña con el nombre de 'esa' hoja
-> selecciona la opcion de 'ver codigo' y copia las siguientes lineas...
en el modulo de codigo de 'esa' hoja ==Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Target.Copy Range("c10,b15,e20,d35")
Dim Hoja As Worksheet
For Each Hoja In Worksheets
If Hoja.Name <> Me.Name Then Target.Copy Hoja.[a1]
Next
End Sub
Respuesta Responder a este mensaje
#2 Lisandro
13/04/2005 - 16:38 | Informe spam
Hola Hector!
Excelente!! estaba en la espera de tu opinion al respeto.

Saludos,
Lisandro
hola, Hermano2 !

... tengo una oracion "PERIODO: ENERO VENCIMIENTO:




15/01/05"
... ENERO y 15/01/05 esta en rojo, toda la oracion




negrita y... fuente en 12
... que en varias partes se copie... tal cual... esta
... asi cuando tenga que... cambie de un solo lugar y




eso haga que cambie en todos
... expliquenme paso por paso que debo hacer...



[creo que] la forma mas 'rapida' y sencilla es usando los


eventos por cambios en 'la hoja'
te expongo un ejemplo al final... si cualquier duda...


comentas?
saludos,
hector.
=>[p.e.] suponiendo que la oracion esta en la celda 'A1'


de 'cierta' hoja...
y que requieres que se copie 'tal cual' a las


celdas 'C10', 'B15', 'E20' y 'D35'
y tambien a la celda 'A1' de todas las demas


hojas de calculo en el libro...
-> haz un click-derecho sobre la pestaña con el nombre


de 'esa' hoja
-> selecciona la opcion de 'ver codigo' y copia las


siguientes lineas...
en el modulo de codigo de 'esa' hoja ==>Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Target.Copy Range("c10,b15,e20,d35")
Dim Hoja As Worksheet
For Each Hoja In Worksheets
If Hoja.Name <> Me.Name Then Target.Copy Hoja.[a1]
Next
End Sub


.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida