Vraag : de exemplaar cellen blinken dynamisch binnen uit

Hey

I heeft een lijst met initialen in de rijen en weeknumbers in culumn. Naast heb ik een lijst met enkele initialen en een specifieke weeknumber - van deze lijst die ik heb willen om de inhoud in de nauwkeurige posities in de lijst kopiëren door een knoop te duwen. Mijn gissing is, dat vba solution.

I heeft geprobeerd zou zijn om in in bijlage te verklaren uitblinkt file.

Excel 2007 voor windows.

Help: -)

Cheers, Raahaugen
Attachments:
van
Mappe2.xlsm (11 KB)  (de Details van het Type van Dossier)  
mijn problem

Antwoord : de exemplaar cellen blinken dynamisch binnen uit

Raahaugen,

De macro is hieronder in het dossier in bijlage. Laat me weten of doet het wat u wilt.

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

Sub specialmacro ()
Schemerige rng1 als Waaier
Schemerige rng2 als Waaier
Schemerige celle1 als Waaier
Schemerige celle2 als Waaier
Schemerige Colm zoals lang

Met Bladen („Sheet1“)
    Reeks rng1 = Waaier (. Cellen (12, „Q“). Cellen (. Rows.Count, „Q“). Eind (xlUp))
    Reeks rng2 = Waaier (. Cellen (12, „C“). Cellen (27, „C“))
Eind met

Voor Elke celle1 in rng1
    Voor Elke celle2 in rng2
        Als celle1 = celle2 toen
            Colm = Cellen (11, „V“). Waarde
            celle2.Offset (0, Colm) = celle1.Offset (0, 1)
        Eind als
    Volgende celle2
Volgende celle1

Sub van het eind
Andere oplossingen  
 
programming4us programming4us