Esta seria la idea:
Imports Microsoft.Office.Interop
' Definir Aplicacion, Hoja y Rango Dim oXL As Excel.Application Dim oWB As Excel.Workbook Dim oRg As Excel.Range ' Iniciar excel y obtener objeto "aplicacion" oXL = New Excel.Application ' Ajustar propiedades a tu gusto oXL.Visible = True oXL.DisplayAlerts = False ' Obtener una nueva hoja oWB = oXL.Workbooks.Add ' Trabajar con la hoja 1 Dim ws As Excel.Worksheet = DirectCast(oWB.Worksheets(1), Excel.Worksheet) ws.Cells(1, 1) = "Titulo 1" Dim Col As Integer = 2 Dim Row As Integer ' Imaginando un LineChar con valores numericos... distribuir series en columnas For Each s As Charting.Series In LineChar2D1.chart1.Series ws.Cells(1, Col) = s.Name Row = 1 For Each p As Charting.DataPoint In LineChar2D1.chart1.Series(s.Name).Points 'Mostrar valores en columnas por series ws.Cells(Row, Col) = p.YValues(0).ToString("N2") Row += 1 Next Col += 1 Next ' Ajustar aspecto final (Seleccionando rangos) oRg = CType(ws.Columns("A", Type.Missing), Excel.Range) oRg.AutoFit()
No olvideis que en chart tambien disponemos de la utilidad ‘Points.DataBindXY’ para procesarlos en bloque 😉
Espero os sea util,
PepLluis,
PD. No olvideis importar el espacio de nombres de ‘Office.Interop’
Hola! Mi nombre es Fernando, y estoy trabajando en un proyecto, en donde recibo datos de varios sensores de temperatura a traves del puerto serie. Me cree un programita en Visual C# (estilo hyperterminal), donde me va mostrando los datos de dichos sensores en el TextBox. Hasta ahí todo barbaro. Ahora el paso siguiente, sería que los datos de temperatura de dichos sensores, se almacenen en un archivo de Excel, o algo por el estilo. Quería saber si esto es posible, si hay que hacer algo similar a lo que está en esta publicacion.
Saludos,
Fernando