Llamar una macro dentro de otra macro
Buenos días, me gustaría saber si es posible utilizar una macro dentro de otra macro. Me explico. Tengo que hacer un listado de piezas que están en diferentes hojas. El listado está en una hoja independiente de manera que al entrar ya me actualiza el listado. Tengo una macro para buscar las piezas y ponerlas al listado. Una vez situada la pieza en el listado hace los bordes y si es una pieza principal la marca en negrilla. Me gustaría que estas ordenes para formatear las celdas las diera otra macro para no tener tantas ordenes en la macro principal. He pensado en la orden Call pero cuando entras en la nueva macro pierdes el contador de la lista i se descuadra el tema. ¿Hay alguna manera de mantener el contador de una macro en otra para que no se descuadre el orden?. La macro trabaja de la siguiente manera. 1º Busca la pieza, 2º la coloca el la lista, 3º formatea la fila.
1 respuesta
Respuesta de jrgces
1
Podrías declarar la variable como pública, pero en este caso creo que es más elegante pasarle el número de fila como argumento al sub que se encarga de poner en negrita, algo parecido a:
Sub Principal()
Dim Fila As Long
For Fila = 1 To 5
PonerNegrita Fila
Next Fila
End Sub
Private Sub PonerNegrita(ByVal Fila As Long)
[Hoja1].Cells(Fila, 1).Font.Bold = True
End Sub
Sub Principal()
Dim Fila As Long
For Fila = 1 To 5
PonerNegrita Fila
Next Fila
End Sub
Private Sub PonerNegrita(ByVal Fila As Long)
[Hoja1].Cells(Fila, 1).Font.Bold = True
End Sub
