Agregar texto específico en una celda específica

Question

¿Cómo copio y pego un valor de la celda A2 en la celda especificada en la celda A1? Por ejemplo, A1 contiene F3. Y A2 contiene 2. Quiero escribir "2" en la celda F3.

Answer 1

Esto se puede lograr con el siguiente código:

Sheet1.Range(Sheet1.Range("A1").Value).Value = Sheet1.Range("A2").Value

Explicación

• Sheet1.Range("A1").Valueobtendrá el texto en A1, por lo tanto: Sheet1.Range(Sheet1.Range("A1").Value).Valueobtiene el texto en cualquier celda a la que se haga referencia A1.
• Sheet1.Range("A2").Valueobtendrá el texto en A2.
• Como .Valuees configurable, estamos configurando el valor de la celda a la que se hace referencia en el texto en A2.