bacter582

Amigo no entiendo bien que necesitas, si lo que quieres es saber aplicar una fórmula si la celda no esta vacía, seria de esta manera Por ejemplo que le sume 1 si no esta vacía =SI(C5<>"";C5+1;"")

Una forma de hacerlo es usando la función indirecto A3=INDIRECTO(CONCATENAR("B";D3)) Y en la columna DE, estarían los valores de las filas que quieres llamar, en este caso, 8,16, 24...

Amigo estuve probando tu fórmula y con cambiar G4>=2100 por G4>=2000, obtengo el 0 en vez del 2400, no se si eso te funcione. Si no te puedo ayudar a hacer un macro para esto.

Como estas amigo Lo probé y no me tardo mucho, ¿qué computadora tienes tu? Prueba igual el que se llama busqueda2, lo hace más rapido por que no selecciona las celdas. Sub busqueda() Do While ActiveCell.Value <> "Doctor Fernandez"...

Solo te faltaba la referencia relativa desde la activecell Te dejo la macro modificada. Saludos No olvides finalizar la pregunta. Sub aleatorios() ' ' Macro1 Macro ' ' Acceso directo: CTRL+q ' ActiveCell.FormulaR1C1 = "=aleatorio.entre(1,6)"...

Pruébalo de esta manera a ver Saludos No olvides finalizar la pregunta. Bacter Sub grabar() nombre_libro = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name ActiveWorkbook.Save nombrefichero = Range("AZ3").Value directorio =...

Como estas, he estado probando tu código y no me da error, esconde las filas sin problemas, En que condiciones te da el error y en que linea exactamente.

Pruebalo de esta manera No olvides finalizar lapregunta. Saludos Bacter Sub abrir_hipervinculos() If ActiveCell.Address = Range("E3").Address Then ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _ "C:\Users\Usuario\Documents\formato 2.docx"...

Amigo lo único que te da error es Selection.PasteSpecial Paste:=xlPasteValues ¿Quieres pegar los datos como valores?

Como estas amigo, con este código colocado en thisworkbook en el editor de visual basic Se logra que cada vez que en la columna 3 escribas un "si", en la columna 4 coloca la fecha actual. Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal...