Alguien me podria ayudar?

13/02/2008 - 19:18 por Principiante | Informe spam
Disculpen, pero como se hace? estoy abriendo el editor de vba pero no veo el
modulo del codigo del objeto ThisWorkbook, para pegar la macro que me
enviaron...
me podrian orientar ?



"Héctor Miguel" <NOhemiordiSPAM@PLShotmail.com> escribió en el mensaje
news:%23Bcdv7RbIHA.1204@TK2MSFTNGP03.phx.gbl...

hola, !


Ok Gracias, y serias tan amable de ponerme un ejemplo como seria esa
Macro ?



(p.e.) en el modulo de codigo del objeto ThisWorkbook desde el editor de
vba...
Private Sub Workbook_Open()
With Worksheets("hoja1")
MsgBox "Las celdas ""clave"" reportan lo siguiente:" & vbCr & _
"La celda A1: " & .Range("a1").Text & vbCr & _
"La celda A2: " & .Range("a2").Text & vbCr & _
"La celda A3: " & .Range("a3").Text & vbCr & _
"La celda A4: " & .Range("a4").Text & vbCr & _
"La celda A5: " & .Range("a5").Text
End With
End Sub

si no se trata de las celdas [A1:A5] y/o no todas estan en la hoja1 y/o el
valor condicional tiene que ver con el aviso y/o... ???
te toca enmendar donde los supuestos se equivocan (o comentar lo que
dejaste "en el tintero") :))

saludos,
hector.

__ la propuesta __


... en el Workbook_Open puedes poner lo que necesites que se ejecute al
abrir un libro.





__ la consulta __



... que al momento de abrir mi libro de aprox 20 hojas de calculo
me avise del contenido de 5 celdas, las cuales tienen un valor
condicional.








 

Leer las respuestas

#1 Juan M
13/02/2008 - 21:31 | Informe spam
Hola,

En el editor de vba (alt + f11) comprueba que tienes visible el explorador
de proyectos (ctrl + R), busca una carpeta que ponga algo asi como
VBAProject(nombre de tu libro) , existen una serie de carpetas entre las que
se encuentra Microsoft Excel Objetos, de esta cuelgan una serie de objetos
entre los que se encuentra ThisWorkbook haz doble click en el y añade el
código que tienes.

Un saludo,
Juan

"Principiante" escribió

Disculpen, pero como se hace? estoy abriendo el editor de vba pero no veo
el
modulo del codigo del objeto ThisWorkbook, para pegar la macro que me
enviaron...
me podrian orientar ?



"Héctor Miguel" escribió en el mensaje
news:%
hola, !

Ok Gracias, y serias tan amable de ponerme un ejemplo como seria esa
Macro ?



(p.e.) en el modulo de codigo del objeto ThisWorkbook desde el editor de
vba...
Private Sub Workbook_Open()
With Worksheets("hoja1")
MsgBox "Las celdas ""clave"" reportan lo siguiente:" & vbCr & _
"La celda A1: " & .Range("a1").Text & vbCr & _
"La celda A2: " & .Range("a2").Text & vbCr & _
"La celda A3: " & .Range("a3").Text & vbCr & _
"La celda A4: " & .Range("a4").Text & vbCr & _
"La celda A5: " & .Range("a5").Text
End With
End Sub

si no se trata de las celdas [A1:A5] y/o no todas estan en la hoja1 y/o
el
valor condicional tiene que ver con el aviso y/o... ???
te toca enmendar donde los supuestos se equivocan (o comentar lo que
dejaste "en el tintero") :))

saludos,
hector.

__ la propuesta __
... en el Workbook_Open puedes poner lo que necesites que se ejecute al
abrir un libro.





__ la consulta __
... que al momento de abrir mi libro de aprox 20 hojas de calculo
me avise del contenido de 5 celdas, las cuales tienen un valor
condicional.












Preguntas similares