Excell 2007 vba macro addition remove comma in find dupes simple addition

Em Andamento Postado há 5 anos Pago na entrega
Em Andamento Pago na entrega

I have a Macro that I use and works well, it finds duplicate words in a cell and puts them in the next cell so I can edit

so if the cell had

big red dog with big collar ------ it would put ---- big big in next cell

but if it was

big, red dog with big collar

then it sees big, with the comma as a separate word

there may also be other characters causing issues but so far only seen comma, so provision for others would be required

this is the macro I am using now,

Sub FindDuplicates()

Dim i As Long

Dim j As Integer

Dim k As Integer

Dim WS As Worksheet

Dim WordArr As Variant

Dim DubStr As String

Dim WordCount As Integer

Set WS = ActiveSheet

'Loop cells

For i = 4 To [login to view URL]([login to view URL], 1).End(xlUp).Row

'Split cell words into array

WordArr = Split([login to view URL](i, 4).Value, " ")

'Loop through each word in cell

For j = LBound(WordArr) To UBound(WordArr)

WordCount = 0

'Count the occurrences of the word

For k = LBound(WordArr) To UBound(WordArr)

If UCase(WordArr(j)) = UCase(WordArr(k)) Then

WordCount = WordCount + 1

End If

Next k

'Output duplicate words to string

If WordCount > 1 And InStr(1, DubStr, WordArr(j)) = 0 Then

DubStr = DubStr & WordArr(j) & " "

End If

Next j

'Paste string in column B

[login to view URL](i, 6).Value = Trim(DubStr)

DubStr = ""

Erase WordArr

Next i

End Sub

Processamento de Dados Processamento de dados Excel Visual Basic Visual Basic para Apps

ID do Projeto: #18560737

Sobre o projeto

9 propostas Projeto remoto Ativo em há 5 anos

9 freelancers estão ofertando em média £15 nesse trabalho

prameswara

Hello Sir Im excel VBA macro and formula Expert :) im very interested to solve your case Sir please ping me now and im able to start working now Thank you Galih

£20 GBP em 1 dia
(406 Comentários)
7.3
VladimirLilenko

Hello, dear sir! I registered at the forum not so long ago, but I already have several completed projects on www.freelancer.com. I am ready to carry out your project in the reasonable price and in the shortest possibl Mais

£20 GBP in 0 dias
(150 Comentários)
6.5
madnanayoub

Hi, I am computer science graduate with more than 3 years of programming experience in VBA programming that is used by Excel Macros. I have understood your requirement and yes i can edit your macro and it will work as Mais

£10 GBP em 1 dia
(35 Comentários)
5.0
Mokshith30

Hi I have Read Your Requirements I am Excel VBA Expert Experianced in VBA Macros & Web Scraping Script... I can finish any kind of vba task in 1 day only pls see my previous projects for my vba experiance T Mais

£10 GBP in 0 dias
(43 Comentários)
4.7
theatasolution1

Dear Employer, I am ready to work on your required task and can also give 100% satisfaction. Looking forward to an opportunity to work with you. Warm Regards: Theata Solution

£13 GBP em 1 dia
(3 Comentários)
1.2
zexhan1

Hi, Thanks for sharing your requirement here at freelacner and I will be more than happy to help you. I have 5 to 6 years’ experience in this fields. I am expert in it & I have much free time for your project. Th Mais

£10 GBP em 1 dia
(1 Comentário)
0.0
summairmir56

I have an English and ms office and also a programming skill and I have good match for your project …………..

£18 GBP in 2 dias
(0 Comentários)
0.0
abhisheksura

This is an easy fix and should not take more than an hour. I will code it to ignore any special characters that appear at the end of the word.

£18 GBP em 1 dia
(0 Comentários)
0.0