Buenas tardes

Por favor, si alguien me puede ayudar se lo agradecería, necesito ejecutar una macro desde varias celdas de una fila,eso ya esta conseguido en el ejemplo

El problema es que son muchas filas (en este momento 600), y el código se hace muy largo.

Lo que quiero es saber si se puede simplificar el código

Muchas gracias

Un saludo

José Carlos

Ejemplo.zip

El ejemplo que subiste no tiene nada de información, tiene 4 macros 1. escribe "prueba" en una celda, la 2.Abre la calculadora, la 3.cambia el formato de una celda, y la 4.selecciona un rango.

Que es lo que quieres simplificar????

Salu2

Buenas tardes

Riddle, gracias por contestar, efectivamente las macros realizan lo tu bien dices, y realmente lo único que hacen en el libro original es escribir en una celda, pero en el ejemplo que subí hay 4 macros, pero en el original hay 600, y no se cuantas más

se pueden escribir en el módulo de la hoja1, por eso preguntaba si se podían simplificar o acortar, espero haberme explicado bien.

Muchas gracias

Un saludo

José carlos

Quieres decir que tienes 600 macros o se ejecuta sobre 600 filas, claro que eso se puede simplificar incluso a una 1 sola pero con el ejemplo que subiste no queda claro que es lo quieres hacer en tu libro, unir esas macros o acortar el código, porque al final cada código aplica para una celda diferente en el archivo que subiste.

Lo que tienes que hacer es subir tu libro con datos y explicar para que son estas macros o que es lo que quieres lograr con las macros, porque con ese archivo en realidad no se lo que quieres lograr.

Salu2

Gracias, voy a intentar subir un archivo mejor explicado

Un saludo

José Carlos

- - - - - Mensaje combinado - - - - -

Buenas tardes

Subo el ejemplo del libro

En el módulo de la hoja1, llamo 8 macros que están en el módulo4,l as macros solo tienen que escribir un número en una celda, quisiera saber si en el módulo de la hoja1 se puede llamar sobre 1000 macros, de lo contrario como se pude solucionar

Un saludo

José Carlos

Ejemplo.zip

Coloca este código en la hoja y borra el que tenias, este hace lo mismo que el que tenias y sin necesidad del modulo y sin importar la cantidad de celdas al que lo apliques.

Comentas

Salu2

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("B1:I" & Rows.Count)) Is Nothing Then [M4] = 11 + ActiveCell.Row
End Sub[/PHP]

Buenos días

Riddle, después de haberme explicado fatal, has estado fantástico, he probado el código y funciona perfectamente.

Muchas gracias

Un saludo

José Carlos

Tema cerrado

Jose, por favor clic el corazon abajo a la derecha para agradecer a Riddle, gracias.

Buenas tardes

Perdón se me paso hacerlo, pido disculpas a Riddle, y ti te doy las gracias por avisarme

Un saludo

José carlos