Pergunta:
Na minha Folha de Dados,quero identificar se determinado elemento é numérico ou alfanumérico. Como proceder ? Como saber também se determinada célula contem uma fórmula ?
Resposta:
Respondendo a primeira pergunta, introduza o segmento abaixo em seu programa
Cells(x,y).Select
If IsNumeric(ActiveCell) = True Then
MsgBox "Célula contendo Numérico"
Else
MsgBox "Célula contendo Dado não Numérico"
End If
Resposta da segunda Pergunta:
Respondendo a segunda pergunta, introduza o segmento abaixo no seu programa
Cells(x,y).Select
If Instr(ActiveCell, "=") <> 0 Then
MsgBox "Esta Célula contem uma Fórmula"
MsgBox ActiveCell.Address 'Localizando a Fórmula
End If