Vraag : Exemplaar en de rij van deeggegevens

Hallo zouden de Deskundigen,

I willen vragen de Deskundigen helpen om een manuscript te schrijven dat de gehele rij kan kopiëren als Column_C (breng blad in overeenstemming) cel wordt benadrukt. De gekopi�ërde rijen vergen om deeg te zijn het bij het blad van het „Resultaat“. De Deskundigen van de hoop kunnen me helpen om deze eigenschap tot stand te brengen.


Attachments:
van
Filter.xls (222 KB)  (de Details van het Type van Dossier)  
xls

Antwoord : Exemplaar en de rij van deeggegevens

Droevig bij het herlezen kreeg ik de betekenis verkeerd:

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

Sub copyRows ()
Schemerige rng als Waaier
Schemerige rw als Variant

    Voor Elke rw in Bladen („verzoen“) .UsedRange.Rows
        Als Bladen („verzoen“). Strek me uit („C“ & rw. Rij). Interior.Color = 52479 toen
            Als rng dan niets is
                Reeks rng = Bladen („verzoen“). Strek me uit („C“ & rw. Rij) .EntireRow
            Anders
                Reeks rng = Unie (rng, Bladen („verzoen“). Strek me uit („C“ & rw. Rij) .EntireRow)
            Eind als
        Eind als
    Daarna
    Bladen („resultaat“). Rijen („2: “ & Bladen („resultaat“). Rows.Count). Cells.Clear
    Als rng dan niets is
        Bladen („resultaat“). Zichtbaar = Vals
        MsgBox „Geen Gevonden Verslagen“
    Anders
        rng. De Bladen van het exemplaar („resultaat“). Waaier („a“ & Bladen („resultaat“). Rows.Count). Eind (xlUp). Compensatie (1, 0)
        Bladen („resultaat“). Zichtbaar = Waar
    Eind als

Sub van het eind
Andere oplossingen  
 
programming4us programming4us