Datos de visual basic a excel
Hola buen dia...
Como puedo pasar datos de visual basic a excel?... pueden darme algun ejemplo
Como puedo pasar datos de visual basic a excel?... pueden darme algun ejemplo
Investiga la automatización de Excel, si buscas en google encontrarás muchos ejemplos de eso.
Saludos
Saludos
Set libro = CreateObject("excel.application")
libro.Visible = False
libro.workbooks.Open FileName:="C:Archivos de ProgramaMonitoreos_AyuntamientosReportesGrafica_Municipios.xls"
libro.Sheets("Tiempos").Select
lI_posicion = 2
While Not lr_Tiempo.EOF
If lr_Tiempo!Municipio = "INSTITUCIONALES" Then
lS_Municipios = lr_Tiempo!Municipio
lS_Partido = lr_Tiempo!Partido
libro.ActiveSheet.Cells(674, 3).Value = CDate(lr_Tiempo!Tiempo_Radio)
libro.ActiveSheet.Cells(674, 4).Value = CDate(lr_Tiempo!Tiempo_Television)
lr_Tiempo.MoveNext
lS_Municipios = lr_Tiempo!Municipio
lS_Partido = lr_Tiempo!Partido
libro.Visible = False
libro.workbooks.Open FileName:="C:Archivos de ProgramaMonitoreos_AyuntamientosReportesGrafica_Municipios.xls"
libro.Sheets("Tiempos").Select
lI_posicion = 2
While Not lr_Tiempo.EOF
If lr_Tiempo!Municipio = "INSTITUCIONALES" Then
lS_Municipios = lr_Tiempo!Municipio
lS_Partido = lr_Tiempo!Partido
libro.ActiveSheet.Cells(674, 3).Value = CDate(lr_Tiempo!Tiempo_Radio)
libro.ActiveSheet.Cells(674, 4).Value = CDate(lr_Tiempo!Tiempo_Television)
lr_Tiempo.MoveNext
lS_Municipios = lr_Tiempo!Municipio
lS_Partido = lr_Tiempo!Partido
