Fråga : Få data från en bordlägga in i individ ror. Överträffa makroen, VBA

Hi har

I fick av någon stor hjälp här, för och att hoppas för I-förmiddag, att någon kan hjälpa again.

I för att ha en arbetsbok med två arbetssedlar, en `- DataSheet' och en `kontrollerar täcker', mig fäst en arbetsbok för att visa vad jag önskar att ska få förmiddagen för to.

I önskar en makro som ska befolkar kontrollera täcker med data från datasheeten men I-förmiddag inte sure hur man gör den: resultatet för

The som jag önskar, är ganska enkelt, datan är i en bordlägga med att gå för produkt besegrar ror och namnger att gå över kolonnerna, och data i förmiddagen för centre.

I önskar att lista detta, bordlägger, som en serie av ror så på det fäste exemplet,
Product A - känt B - 10
Product A - känt C - 20
Etc
Etc

On kontrollera täcker är den tillverkade I-förmiddagen som önskar att få till, emellertid, om ro eller kolonnen har' ett överhopp' bredvid det (ror), eller ovanför det (kolonnen) jag önskar inte att inkludera de data, har jag noterat denna som röd text på min ska example.

There är omkring 40 kolonner av data, och omkring 300 ror (statisk elektricitet numrerar en gång bekräftat), men inte sure hur man går omkring det som får det bäst, rusar, som det ska jordbruksprodukter runt om 12.000 förmiddagskyddsområde för rows.

I till att använda Excel för denna, så kan inte se en ta fram route.

Thanks: -)
Attachments: för >

<-/div> filenamen " för class= för >ExampleWorkbook.xls " fileSize " > (28 KB) " javascript för href= " för <-/span> <-/div>
för >
<-/div> Related lösningar för class= ": Add för qRelatedChild " för VBA-Excel" class= nya in i samling. VBA Excel

Svar : Få data från en bordlägga in i individ ror. Överträffa makroen, VBA

Byt ut, längst ner

Täcker (2). Spänna (”F6”). Resize (ror. Räkning * cols. Räkning 3) = PasteArray

med, wherever du önskar att sätta resultatet, e.g.

Täcker (”kontrollera täcker”). Spänna (”A1”). Resize (ror. Räkning * cols. Räkning 3) = PasteArray
Andra lösningar  
 
programming4us programming4us