| Pregunta: | 62203 - ESCRIBIR EVENTO EXISTENTE DE EXCEL DESDE VISUAL BASIC |
| Autor: | Jordi Casadesús Tomàs |
| Hola , a ver si me pudierais decir como escribir desde Visual Basic 6(Como si fuera una macro escrita desde VB6 a excel) un evento existente a excel desde VB 6. He encontrado como pasar macros desde VB6 a Excel, Pero eventos no lo he encontrado y supongo que tiene que ser parecido solo que no se encontrarlo. GRACIAS (no se si me he explicado bien... ¿?) | |
| Respuesta: | Jordi Casadesús |
| Soy yo mismo, :-). He encontrrado (en parte) la solución... sub funcion() ..... inicio objetos de excel 'este es el evento a passar strEventoHoja="Private Sub Worksheet_SelectionChange(ByVal Target As Range)" & Chr(13) _ & "msgbox " & Chr(34) & "Selection change" & Chr(34) & Chr(13) _ & "End Sub" 'vCont es la hoja donde se pondra el evento 'Ojo que si vCont es 1 entonces son los eventos del libro, no de la hoja y 'estos varian 'La solución anteriror .... vfExcel.xLibro.VBProject.VBComponents(vCont).codemodule.addfromstring StrEvento end sub Pero ahora me ha salido otro problemilla, que cuando cierro Excel no se me guardan dichos eventos. Las macros si se guardan en el modulo, pero los eventos no se quedan guardados ni en la hoja ni en el libro.Si alguien supiera como hacerlo....GRACIAS.si no, espero poderme contestar yo dentro de poco,jejeje | |