Macro autorellenar

14/05/2007 - 15:26 por fernanda.peruana | Informe spam
Hola a todos. Me encuentro muy agradecida con este foro, ya que todas
las respuetas que me han proporcionado me han servido de maravilla,
gracias por todo...

Tengo otra pregunta, la explicaré de la siguiente manera:

Columna A Columna B Columna C
2 3 ¢*B2
3 4
4 5
5 6

Tengo valores en la columna A y valores en la columna B, en la columna
C meto una fórmula que multiplica los valores de ambas columnas como
aparece arriba. Si activo la celda en donde se encuentra la primer
fórmula y posiciono el ratón en la esquina inferior derecha aparece
una crucecita negra, al presionar doble clic izquierdo sobre la
crucecita, copia la fórmula hasta la última celda con valores. Mi
pregunta es, Cómo hago eso, con una macro?

Espero que me puedan ayudar una vez más y gracias a todos!!
Un saludo desde Perú de su amiga Fernanda.

Preguntas similare

Leer las respuestas

#1 Carol Pna
14/05/2007 - 16:14 | Informe spam
Hola,
Mediante el método "AutoFill"... selecciona la celda a arrastrar y copiar,
después la instrucción sería:
selection.autofill destination:=range(RANGO), type:=xlfilldefault
donde RANGO es el rango en el que quieres arrastrar y copiar, en tu ejemplo
sería C2:C5


"" wrote:

Hola a todos. Me encuentro muy agradecida con este foro, ya que todas
las respuetas que me han proporcionado me han servido de maravilla,
gracias por todo...

Tengo otra pregunta, la explicaré de la siguiente manera:

Columna A Columna B Columna C
2 3 ¢*B2
3 4
4 5
5 6

Tengo valores en la columna A y valores en la columna B, en la columna
C meto una fórmula que multiplica los valores de ambas columnas como
aparece arriba. Si activo la celda en donde se encuentra la primer
fórmula y posiciono el ratón en la esquina inferior derecha aparece
una crucecita negra, al presionar doble clic izquierdo sobre la
crucecita, copia la fórmula hasta la última celda con valores. Mi
pregunta es, Cómo hago eso, con una macro?

Espero que me puedan ayudar una vez más y gracias a todos!!
Un saludo desde Perú de su amiga Fernanda.


Respuesta Responder a este mensaje
#2 fernanda.peruana
14/05/2007 - 16:27 | Informe spam
Gracias Carol Pna, pero tu respuesta funcionaría cuando conozco el
número de celdas donde quiero copiar la fórmula, en éste caso son 3
celdas, pero pudieran ser 5, 20, 45, 58, 289, 15002, ó sólo 2 celdas,
las celdas son siempre variables. Cómo sería?
Respuesta Responder a este mensaje
#3 Carol Pna
14/05/2007 - 17:07 | Informe spam
Tienes que recoger ese número variable (5,20,45...) en una variable - por
ejemplo nroceldas
y generar RANGO como otra variable calculada
rang="C2:C" & (nroceldas + 2)
por último en RANGO pones la variable rang


"" wrote:

Gracias Carol Pna, pero tu respuesta funcionaría cuando conozco el
número de celdas donde quiero copiar la fórmula, en éste caso son 3
celdas, pero pudieran ser 5, 20, 45, 58, 289, 15002, ó sólo 2 celdas,
las celdas son siempre variables. Cómo sería?


Respuesta Responder a este mensaje
#4 Juan M
14/05/2007 - 17:13 | Informe spam
escribió en el mensaje
Gracias Carol Pna, pero tu respuesta funcionaría cuando conozco el
número de celdas donde quiero copiar la fórmula, en éste caso son 3
celdas, pero pudieran ser 5, 20, 45, 58, 289, 15002, ó sólo 2 celdas,
las celdas son siempre variables. Cómo sería?



Hola Fernanda,

Prueba esto

Range("C2").AutoFill _
Destination:=Range("C2:C" & Range("A65535").End(xlUp).Row), _
Type:=xlFillDefault

Un saludo,
Juan
Respuesta Responder a este mensaje
#5 fernanda.peruana
14/05/2007 - 17:29 | Informe spam
GRACIAS A AMBOS!!!!!!!!!!!!!!!!!

La he probado y me ha funcionado de maravilla!!!!!!!!!!!!!!!!

Gracias
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida