manubdn

Elsa Matilde respondió: ¿El código solicitado estará dentro de otro código? Entonces estas son las líneas: if sheets("FACTURA").RANGE("a23") = 0 THEN Call Graba 'qué significa 'finalizar' ???? ... eso iría aquí else sheets("FACTURA").RANGE("A24") = 1 MsgBox "ERROR EN DATOS"...

Luis Mondelo respondió: Eso lo puedes conseguir con el evento change de dicha hoja pero debes elegir cuando aparecerá, es decir, en qué momento: -Cuando modifiques la celda A1 -Cuando modifiques cualquier celda de la columna A (u otra) -Cuando "toques" una determinada celda...

Elsa Matilde respondió: Entrá al Editor, seleccioná con doble clic el objeto HOJA donde vayas a trabajar y allí copiá esta macro. Tendrás que completarla como te lo indico allí: Private Sub Worksheet_Change(ByVal Target As Range) 'x Elsamatilde If Target.Address = "$F$1"...

Luis Mondelo respondió: Se me ocurre que utilices la función SI. ERROR en la celda donde haces el cálculo, como este ejemplo: En las celdas A1 y A2 escribimos fechas que queremos restar: =SI.ERROR(A2-A1;"") (Si se produce un error al restar las fechas que deje la celda en...

Dante Amor respondió: Intenté algunas opciones con fórmulas y me parece que tiene que ser una macro, el problema es: el periodo de lo vendido siempre es un par de fechas o pueden ser varios pares de fechas, por ejemplo del 1 al 3 de noviembre y del 6 al 8 de nov y también...

Luis Mondelo respondió: Esta sería la otra parte que necesitas para hacer lo del rango A1 Sub ejemplo() 'por luismondelo Sheets("hoja2").Select Range("a65000").End(xlUp).Offset(1, 0).Select Do While ActiveCell.Offset(0, 2).Value <> "" ActiveCell.Value =...