馃 Macro para incluir valor o f贸rmula en una celda (VBA)

Hola Freaks!!! Continuamos automatizando nuestros ficheros excel, y esta vez vamos a incluir un valor o f贸rmula en una celda con vba.

Podemos saber la celda concreta en la que queremos insertar el valor, o no. Podemos insertar una f贸rmula en vez de un valor fijo. Podemos incluir el mismo valor en un rango de celdas…

Como hay tantas posibilidades, te voy a mostrar los m谩s comunes

Incluir valor en la celda activa vba

Cuando no sabemos exactamente la celda en la que queremos insertar un valor, o porque las celdas van variando, podemos insertar un valor en la celda activa de la siguiente manera:

Sub IncluirValorVBA_1() '
    ActiveCell.Value = "Bienvenido al Curso avanzado de Excelfreak."
End Sub

Insertar valor en una celda concreta vba

Cuando s铆 sabemos la celda en la que vamos a incluir un valor, vamos a decirle a nuestra macro que rellene una celda espec铆fica con un valor de la siguiente manera:

Sub IncluirValorVBA_2() '
    Range("A1").Value = "Bienvenido al Curso avanzado de Excelfreak."
End Sub

A帽adir valor a un rango de celdas vba

Tambi茅n puede darse el caso de querer insertar un valor en un rango de celdas. Lo haremos de la siguiente manera:

Sub IncluirValorVBA_3() '
    Range("A1:D1").Value = "Bienvenido al Curso avanzado de Excelfreak."
End Sub

Asignar una f贸rmula en una celda espec铆fica vba

Si en vez de incluir un valor en una celda queremos insertar una f贸rmula en una celda concreta podemos hacerlo de la siguiente manera:

En este caso la f贸rmula devuelve las celdas desde la b2 a la b6 que no son vac铆as y la inserto en la celda b1.

Es 煤til si a continuaci贸n, esa f贸rmula, se pega como valores, de tal forma que el fichero sea m谩s agil en el uso ya que no tendr铆a f贸rmulas.

Sub IncluirValorVBA_4() '
    Range("B1").Value = "=CONTARA(B2:B6)"
End Sub

Incluir valor en una celda de una hoja de trabajo concreta vba

Cuando tenemos que insertar un valor en distintas hojas de trabajo puede llegar a ser molesto ver mucho c贸digo cuando en una sola l铆nea puedes tener cada inserci贸n

Sub IncluirValorVBA_5()
' Incluir valor en una celda de una hoja de trabajo concreta vba
    Worksheets("Hoja1").Range("A5").Value = 500
    Worksheets("Hoja2").Range("B2").Value = 500
    Worksheets("Hoja3").Range("G2").Value = 500
End Sub

Si tienes alguna duda, real铆zanos la pregunta en el foro excel

<< Clase 8.5.4: Rellenar celdas con una macro Clase 8.5.6: (pr贸ximamente) >>
<< Regresar al 铆ndice de Curso de Excel Online Avanzado

Un saludo Freaks!

Autor entrada: Javi de Excelfreak

Deja un comentario