Aplicar en varios rangos a la vez

[Wox17Exc]

Hola expertos,

Me gustaría hacer una macro que al seleccionar varios rangos (de manera diferente cada vez) se copiaran/pegaran valores en la misma celda.

Las celdas seleccionadas contienen...

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í

 

[Warpxz]

:wink: Si, es super facil y ni si quiera necesitaras abrir VBA, lo puedes hacer directamente con el grabador de macros :D , te subo archivo listo
Si quieres hacerlo por ti mismo los pasos son...

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í

 

[Wox17Exc]

Gracias por la respuesta.

Pero lo necesito hacer con diferentes rangos seleccionados a la vez.

si seleccionas de tu archivo por ejemplo: la B12, C14 y D12:D15 y le das al boton da error.

 

[Warpxz]

Umm, sali recién de la oficina, si nadie te responde de aqui a que llegue, te ayudo, de todas formas prueba lo de grabar macros pero seleccionando un rango(yo seleccione solo 1 celda)

 

[Cacho R]

Hola! Wox17Exc.
Para manipular rangos de celdas discontínuas se utiliza la colección Areas.
Podrías, entonces, intentar con:

Sub Pegar_En_Valores()
Dim iArea As Range
For Each iArea...

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í

 

[Wox17Exc]

Perfecto!

Muchisimas gracias.

 

[Cacho R]

Perfecto! Muchisimas gracias.

Al contrario: ¡Gracias por avisar!

 

[HBanchieri]

Hola Wox17Exc y querido maestro Cacho

Solo por practicar he hecho estas macros por si quieres poner en el evento Open y BeforeClose en el ThisWorkbook de su libro en cuestión...

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í

 

[HBanchieri]

Señores....

Pille una falla en la macro de apertura,en la linea:

Set Nuevo = CommandBars("cell").Controls.Add

Error: Variable "nuevo" no establecida.

Efectivamente su valor en el...

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í

 

[Cacho R]

O donde esta mi error???? (x fa) :D

---

Tu error está aquí:

On Error Resume Next
Application.CommandBars("cell").Controls("Pasar a valores").Delete
Set...

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í

 

[HBanchieri]

Muy bien!!! muchas gracias por explicarme, en verdad creo yo no me hubiera dado cuenta jamás, :D

Los módulos de clase y sus particularidades son prácticamente un misterio para mi.
[quote="Cacho...

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í

 

[Cacho R]

... no me gusta la del ".Reset", ya que podemos eliminar alguno otro "acceso configurado por el usuario" aparte del que queremos.

Sobre gustos... ¡No hay nada...

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í

 

[HBanchieri]

(quizás en la tierna adolescencia de Antoni) se decía: De gustibus non est disputandum (¿No es así?...)

KKKKKKKKKKKK, creo que ya sabremos la respuesta.....

Gracias por...

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í