pregunta penultima

Private Sub Worksheet_Change(ByVal Target As Range) Dim Rng As Range On Error Resume Next Set Rng = Intersect(Target, _ Range("F18:F30,C18:C30,D18:D30,E18:E30,G18:G30,I18:I30,K18:K30,L18:L30")) On Error GoTo 0 If Rng Is Nothing Then Exit ...

Cordial saludo. Tengo la siguiente formula: =(KV683*$G$683+KV701*$G$701+KV744*$G$744+KV762*$G$762+KV770*$G $770+KV803*$G$803+KV811*$G$811+KV824*$G$824)/$G$680 (Esta es la última celda.) La cual se ha venido arrastrando a lo largo de las ...