Bom dia
Da celula A1 até A20 tenho em algumas colulas nomes e outras números, somente na coluna A, quero saber usando a função =SE(), preciso mais ou menos assim, se o conteúdo da celula for números então vazio senão mostre o que esta na celula.
desde ja agradeço a colaboração.
Bom dia!
Se entendi bem o que você quer tente usar a fórmula:
SE(ÉNÚM(A1);"";A1)
Eu fiquei em duvida se quer a solução com formula ou VBA.
Se por formula, utilize a dica do tacito, se quer por VBA, adaptando uma rotina postada do Reinaldo no tópico abaixo - viewtopic.php?f=10&t=12660, ficaria da seguinte forma:
Sub CopiarPorReinaldo()
x = 2
For Each cel In Range("A2:A20")
If IsNumeric(cel.Value2) Then
Range("B" & x) = ""
Else
Range("B" & x) = cel.Value2
End If
x = x + 1
Next
End Sub
[]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Bom dia!!
Essa forma permite escolher a formula ou VBA (via VBA)
Sub AleVBA_12857_FormulaOuValor()
Dim lastrow As Long
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
Application.ScreenUpdating = False
Range("B1").Formula = "=IF(ISNUMBER(A1),"""",A1)"
Range("B1").AutoFill Destination:=Range("B1:B" & lastrow)
'Caso não queira formula, retire a aspa do da linha abaixo
'Range("B1:B" & lastrow).Value = Range("B1:B" & lastrow).Value
Application.ScreenUpdating = True
End Sub
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel