Hacer que formulario me ingrese datos según la hoja seleccionada
Publicado por JoaoM (222 intervenciones) el 27/08/2017 23:06:01
Tengo un formulario para ingreso de datos.
Los datos son variados, por eso tengo varias hojas, Ej. "Productos", "Silverado", "CAT", "JD" ect
¿Cómo estoy haciendo?.Cuando necesito insertar en la hoja Productos voy a la macro de todo formulario y lo que menciona la hoja "Silverado", cambio por "Productos". Si menciona Productos y quiero insertar en la hoja "CAT", cambio "Productos" por "CAT"
Este modo es fastidioso y no es lo correcto pero no se hacerlo de otra forma.
Un ejemplo de lo que menciono es esto; en una de las macros tengo
Sheets("Silverado") y en otras también Sheets("Silverado").Range( y quiero Sheets("CAT") cambio Silverado por CAT en todas las macros que tenga que hacerlo.
Cual la forma de no tener que estar haciendo este cambio a cada momento, porque no es una ves al dia, son 5 ,10 o mas aun. En ese tipo de línea, que tendría que poner para que me inserte en la hoja Activa o Selecionada?
Los datos son variados, por eso tengo varias hojas, Ej. "Productos", "Silverado", "CAT", "JD" ect
¿Cómo estoy haciendo?.Cuando necesito insertar en la hoja Productos voy a la macro de todo formulario y lo que menciona la hoja "Silverado", cambio por "Productos". Si menciona Productos y quiero insertar en la hoja "CAT", cambio "Productos" por "CAT"
Este modo es fastidioso y no es lo correcto pero no se hacerlo de otra forma.
Un ejemplo de lo que menciono es esto; en una de las macros tengo
Sheets("Silverado") y en otras también Sheets("Silverado").Range( y quiero Sheets("CAT") cambio Silverado por CAT en todas las macros que tenga que hacerlo.
Cual la forma de no tener que estar haciendo este cambio a cada momento, porque no es una ves al dia, son 5 ,10 o mas aun. En ese tipo de línea, que tendría que poner para que me inserte en la hoja Activa o Selecionada?
Valora esta pregunta
![Me gusta: Está pregunta es útil y esta clara Me gusta: Está pregunta es útil y esta clara](/img/img.png?11.51)
![NO me gusta: Está pregunta no esta clara o no es útil No me gusta: Está pregunta no esta clara o no es útil](/img/img.png?11.51)
0