Macro para graficar hasta celda n-ésima
A tod@s expert@s!
Tengo un problema en la selección de columnas para realizar gráficas con mi macro. Utilizo un programa para la toma de datos (temperaturas, voltajes...) en laboratorio, de forma que se genera una excel, con un número de columnas determinados, desde la A a la ES, con titulo en la fila 22, y a partir de ahí los datos, de forma que ninguno de los archivos de datos que se generan diariamente tienen por qué acabar en la misma celda, ni mucho menos.
La macro que hasta ahora he hecho, crea el titulo de columnas en U22, V22 y W22, realiza un autofill hasta la fila n en la columna U y V (W la dejaré en blanco). Necesitaría que me ayudasen en la selección de columnas no contiguas para crear gráficas, por ejemplo, necesito graficar la columna U(tmin) frente a la R (bomba4), a partir de la celda 23 (los datos siempre se crearán a partir de esta celda para cada columna).
Las filas anteriores a la 22 es un encabezado que por defecto mete el programa de toma de datos, debo dejarlo así. El código que tengo de momento es el siguiente:
Sub M0()
Range("U22").Select
ActiveCell.FormulaR1C1 = "t(min)"
Range("U23").Select
ActiveCell.FormulaR1C1 = "0"
finrgo = Range("A65536").End(xlUp).Row
Range("U24").Select
ActiveCell.FormulaR1C1 = "=RC[-19]/60000+R[-1]C"
Selection.AutoFill Destination:=Range("U24:U" & finrgo)
Range("U24").Select
Range("V22").Select
ActiveCell.FormulaR1C1 = "Qabs(ml/h)"
Range("V23").Select
ActiveCell.FormulaR1C1 = "=(RC[-4]*0.0633+0.0027)*60"
Selection.AutoFill Destination:=Range("V23:V" & finrgo)
Range("V23").Select
Range("W22").Select
ActiveCell.FormulaR1C1 = "pH"
"aquí debo ingresar la selección de columnas y graficarlas"
End Sub
Tengo un problema en la selección de columnas para realizar gráficas con mi macro. Utilizo un programa para la toma de datos (temperaturas, voltajes...) en laboratorio, de forma que se genera una excel, con un número de columnas determinados, desde la A a la ES, con titulo en la fila 22, y a partir de ahí los datos, de forma que ninguno de los archivos de datos que se generan diariamente tienen por qué acabar en la misma celda, ni mucho menos.
La macro que hasta ahora he hecho, crea el titulo de columnas en U22, V22 y W22, realiza un autofill hasta la fila n en la columna U y V (W la dejaré en blanco). Necesitaría que me ayudasen en la selección de columnas no contiguas para crear gráficas, por ejemplo, necesito graficar la columna U(tmin) frente a la R (bomba4), a partir de la celda 23 (los datos siempre se crearán a partir de esta celda para cada columna).
Las filas anteriores a la 22 es un encabezado que por defecto mete el programa de toma de datos, debo dejarlo así. El código que tengo de momento es el siguiente:
Sub M0()
Range("U22").Select
ActiveCell.FormulaR1C1 = "t(min)"
Range("U23").Select
ActiveCell.FormulaR1C1 = "0"
finrgo = Range("A65536").End(xlUp).Row
Range("U24").Select
ActiveCell.FormulaR1C1 = "=RC[-19]/60000+R[-1]C"
Selection.AutoFill Destination:=Range("U24:U" & finrgo)
Range("U24").Select
Range("V22").Select
ActiveCell.FormulaR1C1 = "Qabs(ml/h)"
Range("V23").Select
ActiveCell.FormulaR1C1 = "=(RC[-4]*0.0633+0.0027)*60"
Selection.AutoFill Destination:=Range("V23:V" & finrgo)
Range("V23").Select
Range("W22").Select
ActiveCell.FormulaR1C1 = "pH"
"aquí debo ingresar la selección de columnas y graficarlas"
End Sub
2 respuestas
Respuesta de Elsa Matilde
1
Respuesta de anayellis