Boa tarde!!

Explique mais sua dúvida!

Att

Assim, quando eu puxo os dados do banco de dados para o excel ele vem em forma de texto e quero passar ele para numero. mas são muito queria uma macro pra fazer essa rotina. preciso que ela pule para cada coluna e roda nas celulas

Boa tarde!!

Grave uma macro.

Sub AleVBA_9997_I()
'Selecione o intervalo que deseja mudar
    For Each cell In Selection
        cell.Value = Val(cell.Value)
    Next
    Selection.NumberFormat = "General"
End Sub
Sub AleVBA_9997_II()
'Selecione o intervalo que deseja mudar
With ActiveSheet.UsedRange
    .Value = Evaluate(.Address & "*1")
End With
End Sub
Sub AleVBA_9997_III()
With Range("H19:AL1000")
  .Cells.NumberFormat = "General"
  .Value = .Value
End With
End Sub

Att