Out Of Memory On Loop And Match

I have come across one of those annoying 'out-of-memory' errors. See my code below:

Code:
'Dimensions (first rows and cols)
Const frow3 As Integer = 17
Const frow4 As Integer = 19
Const fcol3 As Integer = 10
Const fcol4 As Integer = 11

Sub Extract()
Dim ws As Worksheet, target As Worksheet, meta As Worksheet

[Code] .......

The code executes fine until it gets to End Sub. Some object eats up memory but I don't understand which one.