Buscar nome em célula com fórmula

Question

Possuo uma planilha que possui uma macro que puxa informações de uma pasta de propostas que possuo. Exemplo:

Possuo uma pasta com o nome Propostas 2014. E nessa planilha eu puxo as seguintes informações das propostas:

Razão Social, Contato, Telefone, E-mail e Valor Total

A planilha funcionava perfeitamente pois eu colocava essas informações manualmente em cada proposta, porém para poder facilitar eu criei uma lista de clientes com validação de dados em lista com as informações que necessito em cada proposta (razão social, contato, e-mail e telefone) e no momento que eu coloco a razão social da empresa na proposta, coloquei uma fórmula para que o restante das informações sejam preenchidas automaticamente. Exemplo:

Razão Social (Validação de Dados por Lista)

=PROCV(Empresa;Plan3!A4:D72;2;0) - Contato

=PROCV(Empresa;Plan3!A4:D72;3;0) - Telefone=PROCV(Empresa;Plan3!A4:D72;4;0) - E-mail

Porém com essa alteração que realizei a minha planilha que puxa todas as informações não esta sendo mais preenchida, ela aparece com o valor de "0" nas células. Segue a macro que estou usando na planilha para puxar as informações da minha pasta de propostas:

 wRow = ActiveCell.Row

  wCol = 1

  Range("A" & wRow).Select

  wProp = Selection.Text

  Range("B" & wRow).Select

  ActiveCell.FormulaR1C1 = "='" & ActiveWorkbook.Path & "\Proposta Mik''s " & wProp & ".xls'!Data"

  Range("C" & wRow).Select

  ActiveCell.FormulaR1C1 = "='" & ActiveWorkbook.Path & "\Proposta Mik''s " & wProp & ".xls'!Empresa"

  Range("D" & wRow).Select

  ActiveCell.FormulaR1C1 = "='" & ActiveWorkbook.Path & "\Proposta Mik''s " & wProp & ".xls'!Contato"

  Range("E" & wRow).Select

  ActiveCell.FormulaR1C1 = "='" & ActiveWorkbook.Path & "\Proposta Mik''s " & wProp & ".xls'!Telefone"

  Range("F" & wRow).Select

  ActiveCell.FormulaR1C1 = "='" & ActiveWorkbook.Path & "\Proposta Mik''s " & wProp & ".xls'!TOTAL"

  Range("G" & wRow).Select

Gostaria de saber se alguém sabe me informar a alteração que preciso realizar nessa macro, para que a planilha puxe o nome que consta na célula (exemplo: Razão Social: "XXXXXXX")

Aguardo retorno e desde já agradeço a atenção de todos que se prontificarem a me ajudar.

Grato