rangos.

[Kaspar]

Hola.
Tengo esta macro asociada a un checkbox y quisiera incluir la lí­nea 3 en otra macro ya que la tengo que utilizar en bastantes checkbox.

Mi pregunta es cómo puedo indicarle al range que...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Private Sub CheckBox1_Click()
c = [c6]
Sheets(1).Range("B" & c).Copy Destination:=Sheets(c).Range("j2")
>>>>>>>>>>>>>

 

[galileogali]

Sub test()
[k5].Value = [j2].Value 'donde K5 forma parte del Rango Combinado "K5:L6"
End Sub

 

[galileogali]

Un viceversa mas complicado es este:
Sub test()
[j2].Value = [L6].MergeArea(1).Value 'donde L6 forma parte del Rango Combinado "K5:L6"
End Sub

 

[Kaspar]

Hola
Antes de nada gracias por contestar galileogali.

He de decir que mi nivel de VBA es prácticamente nulo y estoy aprendiendo a base de tortazos.

Tu primera propuesta no me funciona. Si bien...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Kaspar]

Hola de nuevo.

Disculpas. La propuesta primera funciona.

¡Un lapsus mí­o!

Muchas gracias

 

[galileogali]

Si trasladan valores en la misma hoja. Te convendria releer lo que pediste: en ningun momento indicaste que debia tratarse de distintas hojas, sino de celdas combinadas que reciben datos...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí