Soy nuevo en lo que es programacion VBA a macros,tengo un gran problema en el cual me he quedado estancado,quisiera que el valor de mis columnas puede ser dividido entre 10 y 100 ,adjunto mi excel para un mayor entendimiento.

Gracias de Antemano

DATOS DE EXAMENES.rar

Si muestras en el ejemplo el resultado esperado nos facilitaras responder, basta con 5-10 filas, no es necesario que este completo.

Bueno aqui dejo mi macro hasta donde he avanzado , en la HOJA 2 especifica en un texto lo que deseria El resultado de los primeros resultado en si , seria de gran ayuda si me pudieran ayudar , me estanque en este problema.

DATOS.rar

Se me ocurren 2 opciones:

Si es una hoja, ó 2-3, basta con una simple formula insertada de un golpe en todo el rango de una hoja en "blanco", sin los numeros, solo los textos.

Si son mas hojas puedo darte un codigo que haga la operacion en cada una de las hojas, tu decides cual de las 2 te sirve.

Hay uno de 2hojaa y otro archivo.Son mas de 3 hojas , seria buena en codigo vba que se aplique de forma directa .seria bueno ver ambas

Por ser pocas hojas te doy una macro sencilla usando una sola formula:

Sub Macro1()

    With Hoja2

        .[E4:Z183].Formula = "=IF(DATOS!E4="""","""",DATOS!E4/E$2)"

        .[E4:Z183].Value = .[E4:Z183].Value

       ' .[E2:Z2].Clear

    End With

End Sub[/CODE]

Para evitar los errores debes eliminar los ---- en la hoja DATOS.

Lo que hice fue copiar todos los datos de la hoja del mismo nombre a la segunda y corri la macro. Conserve la fila 2 con los factores.

La columna AA no la inclui en el codigo por estar vacia la celda AA2.

Lo he estado tratando pero me tira error , no se mi pudieras adjutar el archivo excel porfavor con esta macro ejecutada , seria de gran ayuda

Por ser pocas hojas te doy una macro sencilla usando una sola formula:

Sub Macro1()

    With Hoja2

        .[E4:Z183].Formula = "=IF(DATOS!E4="""","""",DATOS!E4/E$2)"

        .[E4:Z183].Value = .[E4:Z183].Value

       ' .[E2:Z2].Clear

    End With

End Sub[/CODE]

Para evitar los errores debes eliminar los ---- en la hoja DATOS.

Lo que hice fue copiar todos los datos de la hoja del mismo nombre a la segunda y corri la macro. Conserve la fila 2 con los factores.

La columna AA no la inclui en el codigo por estar vacia la celda AA2.

Aqui va:

Dividir.rar

Perdon que vuelva a molestar otra vez . en caso que quisieran que se borren entre 10 y 100 , pero si la necesidad de los valores se jalen de una columna como se haria , ademas la ultima columna AA se divide entre 10

Bueno aqui dejo mi macro hasta donde he avanzado , en la HOJA 2 especifica en un texto lo que deseria El resultado de los primeros resultado en si , seria de gran ayuda si me pudieran ayudar , me estanque en este problema.

En el codigo explico que borrando el apostrofo se borrar los datos en [E2:Z2].

Agrega el 10 en AA2 y ajusta los rangos.

Muchas gracias armando , ya lo tengo solucionado , ya pueden cerrar el tema , Muchas Gracias te pasaste

SOLUCIONADO