Prezados,

sou novo neste forum, caso fale alguma bobagem pof favor podem me corrigir...

Estou tendo problemas para fazer um codigo em vba, que tem a finalidade de selecionar todos os campos da planilha, e depois tirar somente numeros ",00" e manter o restante, depois preciso fazer uma mala direto destes dados para o word...

Private Sub CommandButton1_Click()

Dim LR As Long, k As Long

LR = Cells(Rows.Count, "m").End(xlUp).Row
Application.ScreenUpdating = False
For k = LR To 1 Step -1
If Cells(k, "m").Value <> "" Then
c1 = Cells(k, "m").Replace(",00", "", xlPart)

End If
Next k
Application.ScreenUpdating = True

End Sub

Agradeço desde já a ajuda