Página 1 de 1

Macro deleta valores diferentes de numeral

Enviado: 19 Jul 2017 às 12:23
por Angra
Boa tarde
Nessa plan, preciso que a macro delete qualquer valor diferente de um numeral em um intervalo informado. grato :D

Re: Macro deleta valores diferentes de numeral

Enviado: 19 Jul 2017 às 15:13
por osvaldomp
Código: Selecionar todos
Sub LimpaCélulasNãoNuméricas()
 Dim c As Range
  For Each c In Range("F4:Y23")
   If Not IsNumeric(c.Value) Then c.Value = ""
  Next c
End Sub

Re: Macro deleta valores diferentes de numeral

Enviado: 19 Jul 2017 às 15:35
por Angra
Osvaldomp, gratíssimo pela solução. Simples e eficiente. :D :D