Actividad pública reciente
Ha valorado "Buena" la respuesta
Dividir procedimiento demasiado largo
Si te entendí bien, lo que puedes hacer es: Realizar las rutinas por separado en módulos distintos si deseas, siempre y cuando sea dentro del mismo archivo. Y para llamar a una rutina dentro de otra simplemente colocas el nombre de la que quieras...
Ha valorado "Excelente" la respuesta
Seleccionar columna
Colocalo el Case como "$AB", es decir solo los tres primeros caracteres.
Ha valorado "Excelente" la respuesta
Dividir procedimiento demasiado largo
No entiendo la pregunta de dividir el código. Esto es un evento que se ejecuta cada vez que en la hoja se cambia el valor de las celdas. Este evento no puede ser invocado con Call. Chequea y me avisas.
Ha valorado "Excelente" la respuesta
Valor de celdas continuas
No llego a entender bien, igual te comento que en excel con las fórmulas "convencionales" NO podes hacer que una celda cambie el valor de otra celda; lo que pongas en la celda será el resultado de ella y no va a hacer que modifique en otro lado...
Ha valorado "Excelente" la respuesta
Combinar funciones en una misma celda
Esto no lo podes hacer con fórmulas; tendrás que usar el evento Change de la Hoja (o Calculate). Si tenés dudas avisame que te digo como deberías hacerlo.
Ha valorado "Buena" la respuesta
Macro imprimir solo las hojas que cumplan la condición
Asigna a un Botón el siguiente código: Sub Macro_Imprimir() Dim X As Double X = 0 Do While X < Sheets.Count X = X + 1 Sheets(X).Select If Val(Sheets(X).Range("F48").Value) > 0 Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If...
Ha valorado "Buena" la respuesta
Macro imprimir solo si la hoja cumple la condición
¿Tenés algo prearmado? Porque sería algo así (te lo pasó en Pseudocódigo; luego habría que hacerlo "real") Para cada hoja Si F48 > 0 entonces Imprimir fin si Fin para Decime como vas y lo pasamos a código real
Ha valorado "Buena" la respuesta
Imprimir libro excel si una celda tiene tal valor
Tal y como lo veo, lo mejor es colocar un botón en la página primera, por ejemplo, y añadir el siguiente código en el evento click. Private Sub CommandButton1_Click() Dim totalhojas As Integer totalhojas = ThisWorkbook.Sheets.Count For i = 1 To...

