Cuestión : copiar las células en sobresalen dinámicamente

Hey

I tiene una tabla con iniciales en las filas y weeknumbers en el culumn. Al lado de mí tengo una lista con algo de las iniciales y de un weeknumber específico - de esta lista quiero copiar el contenido a las posiciones exactas en la tabla empujando un botón. Mi conjetura es, ese vba sería el solution.

I ha intentado explicar en atado sobresale file.

Excel 2007 para windows.

Help:-) el

Cheers, Raahaugen class= " lastRow del
>Attachments del " nombre " del class= del class= " valor " del
del >
class= " fileInfo " del
el title= " del " nombre de fichero del class= " del Mappe2.xlsm el class= (11 KB)  Javascript del href= " de los " attachmentDetails del class= " del (tipo de archivo detalles)  
class= " descripción " del
mi problem
el class= de
del >
class= del

Respuesta : copiar las células en sobresalen dinámicamente

Raahaugen,

La macro abajo está en el archivo atado. Dejarme saber si hace lo que usted quiere.

Patrick
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:

Specialmacro secundario ()
Rng1 dévil como gama
Rng2 dévil como gama
Celle1 dévil como gama
Celle2 dévil como gama
Colm dévil como de largo

Con las hojas (“Sheet1”)
    Fijar rng1 = gama (. Células (12, “Q”). Células (. Rows.Count, “Q”). Extremo (xlUp))
    Fijar rng2 = gama (. Células (12, “C”). Células (27, “C”))
Extremo con

Para cada celle1 en rng1
    Para cada celle2 en rng2
        Si celle1 = celle2 después
            Colm = células (11, “V”). Valor
            celle2.Offset (0, Colm) = celle1.Offset (0, 1)
        Terminar si
    Celle2 siguiente
Celle1 siguiente

Submarino del extremo
Otras soluciones  
 
programming4us programming4us