Jump to content

Insertar fila y escribir en ella a la vez


Recommended Posts

Insertar fila/ escribir formula en filas salteadas

Buenas!

Tengo un fichero bastante grande, que contiene datos meteorologicos por horas. El caso es que yo los quiero cada media hora, por lo que quiero insertar una fila nueva y que en cada celda haga la media entre el valor de arriba y el de abajo. Me estoy rompiendo la cabeza y no consigo nada.

Gracias a la ayuda de efmc, que he encontrado por el buscador, ya consigo insertar una fila nueva


Sub InsertarFilas2()Dim intI As Integer
With Range("$A$4:$A$13")
For intI = .Rows.Count - Application.WorksheetFunction.IsEven(.Rows.Count) To 1 Step -1 .Cells(intI, 1).EntireRow.Insert xlDown
Next End
WithEnd
Sub
[/PHP]

Pero no consigo enlazar para que me escriba algo nuevo en las celdas.

Muchas gracias de antemano, y si no me he explicado bien por favor decidmelo.

Las Vegas.rar

Link to comment
Share on other sites

Acabo de caer en la cuenta que no necesito que me lo haga a la vez. Podría tener el primer macro que me insertase las filas vacias (el que he pegado el codigo arriba), de forma que ya tuviese los huecos creados, y luego crear otro macro que lo que haga es que de fuese saltando de 2 en 2, y en esa fila me escribiese en todas las celdas de esa fila, la formula que fuese calcular el valor medio entre el valor de la celda de encima y el de la de debajo. No sé si me he explicado bien... ¿Alguien sabe como podría crear ese macro?

Gracias!

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information

Privacy Policy