process data in text file and import to worksheet

Could somebody please help me with this,

I have this kind of data in text file

# 
# MS.PreferredSpectrumFormat = 0
# MS.UncentroidingHalfWidth = 0.02
# MS.UncentroidingPointsPerDa = 40
# MS.AlwaysUncentroid = 0
# MS.RegriddingPointsPerDa = 200
# MS.AggregationMethod = 1
# MS.MinPeakCount = 1
# MS.MinPeakCharge = 1
# MS.MaxPeakCharge = 5
# MSMS.PreferredSpectrumFormat = 0
# MSMS.UncentroidingHalfWidth = 0.02
# MSMS.UncentroidingPointsPerDa = 40
# MSMS.AlwaysUncentroid = 0
# MSMS.RegriddingPointsPerDa = 200
# MSMS.AggregationMethod = 2
# MSMS.MinPeakCount = 3
# MSMS.MinPeakCharge = 1
# MSMS.MaxPeakCharge = 2
# MSMS.UsePrecursorAsMaxCharge = 1
# MSMS.PrecursorChargeSources = 1
# MSMS.PrecursorDefaultCharges = 1; 2; 3; 4; 5
# MSMS.RedeterminePrecursorMZ = 1
# MSMS.PrecursorMZTolerance = 2
# MSMS.IgnoreSingleChargedPrecursor = 0
# TimeDomain.MinPrecursorMass = 500
# TimeDomain.MaxPrecursorMass = 5000
# TimeDomain.PrecursorGroupingTolerance = 1
# TimeDomain.MaxIntermediateTime = 0
# TimeDomain.MaxIntermediateScans = 0
# TimeDomain.UseIntermediateScanCount = 0
# TimeDomain.MinScansInGroup = 1
# TimeDomain.CollapseMSn = 0
# PeakSelection.FilteringThreshold = 0.6
# PeakSelection.MinFilteringPeakMZ = 250
# PeakSelection.MaxFilteringPeakMZ = 1500
# PeakSelection.FilteringMinSNRatio = 2
# PeakSelection.MinPeakWidth = 0.005
# PeakSelection.ExpectedPeakWidth = 0.05
# PeakSelection.MaxPeakWidth = 0.13
# PeakSelection.MaxIterations = 500
# PeakSelection.RejectWidthOutliers = 0
# PeakSelection.BaselineCorrection = 1
# PeakSelection.BaselineSubtractMethod = 0
# PeakSelection.PeakFitMethod = 0
# PeakSelection.IsotopeEnvelopeMode = 0
# PeakSelection.IsotopePeakIntensities = 
# PeakSelection.SinglePeakCharge = 1
# PeakSelection.SinglePeakWindow = 0
# PeakSelection.MinSglPeakWindowMZ = 250
# PeakSelection.MaxSglPeakWindowMZ = 350
# 
_DISTILLER_MDRO_VERSION=2.4.1.0
_DISTILLER_RAWFILE={1}D:\MS_DATA\XL\2011\_XL2001----XL2100\XL2066_F1_01_553.d

BEGIN IONS
TITLE=1: Scan 2 (rt=1.16) [D:\MS_DATA\XL\2011\_XL2001----XL2100\XL2066_F1_01_553.d]
PEPMASS=459.18009 35794472
CHARGE=2+
SCANS=2
RAWSCANS=sn2
RTINSECONDS=1.16
281.05381	12465.077
299.06492	10383.393
324.99101	13885.746
341.02195	25212.591
359.03313	15421.499
END IONS

BEGIN IONS
TITLE=2: Scan 11 (rt=11.345) [D:\MS_DATA\XL\2011\_XL2001----XL2100\XL2066_F1_01_553.d]
PEPMASS=533.20132 50722404
CHARGE=1+
SCANS=11
RAWSCANS=sn11
RTINSECONDS=11.345
281.05424	26256.861
299.06482	24343.575
326.96951	8122.2656
341.02209	3983.679
344.98034	9692.3164
END IONS

BEGIN IONS
TITLE=3: Scan 18 (rt=19.279) [D:\MS_DATA\XL\2011\_XL2001----XL2100\XL2066_F1_01_553.d]
PEPMASS=459.18006 35550492
CHARGE=2+
SCANS=18
RAWSCANS=sn18
RTINSECONDS=19.279
281.05442	8886.7466
299.0654	7308.4806
324.99029	9926.7769
341.02191	16512.901
359.03335	9289.164
END IONS

.
.
.

I want to import only the data marked in red color to worksheet in the pattern shown in the attached file.

Please have a look at the data in the attached file.

Any help would be highly appreciated.

PS ref http://www.vbforums.com/showthread.p...10#post4127010