Arquivo Txt - VBWEB

Amigos, tenho o arquivo texto abaixo:

NomeCorrida: 12 Relatório Texto ==> começa aqui

DateTime ; N9_13 ; Material
"11/07 16:24" ; 30 ; "Si. Met" == ler a partir daqui
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"
"11/07 16:24" ; 30 ; "Si. Met"

com a rotina peguei a linha desejada conforme abaixo:
Sub Novo()
Dim LinhaInicial As Integer, intLoop As Integer, strBuffer As String
Dim text
Dim Lin1
Dim y As Variant
Dim i As Integer
Dim Texto As String
LinhaInicial = 4
Lin1 = 8
text = ThisWorkbook.Path & "CFORNO1.txt"

Open text For Input As #1

For intLoop = 1 To LinhaInicial
Line Input #1, strBuffer
Next intLoop

Do While Not EOF(1)
Line Input #1, strBuffer
y = Split(Texto, ";")
i = 0
Plan1.Range("B" & Lin1) = strBuffer
'Plan1.Range("C" & Lin1) = y(Plan1.Range("C" & Lin1))
'Plan1.Range("D" & Lin1) = y(Plan1.Range("D" & Lin1))
Lin1 = Lin1 + 1

Loop

Close #1
End Sub

O problema agora é separar o texto pelo (Ponto e Vírgula) tentei o split mas não funcionou ("11/07 16:24" ; 30 ; "Si. Met")

No codigo carreguei na coluna (B) = "11/07 16:24" ; 30 ; "Si. Met"

Gostaria que assim:

Coluna (B) = 11/07 16:24
Coluna (C) = 30
Coluna (D) = Si. Met

sem as aspas. Isso é possivel?