agudklast

Elsa Matilde respondió: Este podría ser un modo. La hoja debe estar protegida permitiendo la 'selección de celdas bloqueadas'. Entonces se ejecutará al 'seleccionar' la celda. Entrá al Editor de macros, seleccioná la HOJA donde vaya a ejecutarse y allí copiá esta macro,...

Elsa Matilde respondió: Te agrego algunas líneas para ubicarlo, en este ejemplo lo ubica a partir del extremo superior izquierdo de la celda C45. Sub GRAFICAR_POTENCIA() Sheets("Hoja2").Select ActiveSheet.Shapes.AddChart.Select ActiveChart.ChartType = xlLine...

Dante Amor respondió: Si ambos números no cambian en todas las hojas. Podría ser así, en la hoja2 en la celda C1 pon el número inicial (3) y en la celda D1 pon el número final (20000) . Esta es la macro para que tome el inicial y el final de una celda. Sub FORMULA() n = 1...

Dante Amor respondió: Pero está agregando la ruta al momento de cargar los archivos en la variable archi: archi = Dir(ruta & "\*.csv*"), entonces debería probar así: ChDir ruta & "\" archi = Dir("*.csv*") Do While archi <> mio And archi <> "" Workbooks.Open ruta & archi...

Elsa Matilde respondió: En realidad la macro funciona no importa en qué disco esté siempre y cuando el libro que contiene la macro y el resto se encuentren en la misma ubicación, por esta línea: ruta = ActiveWorkbook.Path En mi caso uso la partición D y no tengo que hacerle...