View Single Post
  #11   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson[_3_] Dave Peterson[_3_] is offline
external usenet poster
 
Posts: 2,824
Default Duplicate value with blank space

And Chip Pearson has lots of techniques at:
http://www.cpearson.com/excel/duplicat.htm

(some worksheet formulas, some macros)

Dave Peterson wrote:

If you're trying to get a list of unique entries, take a look at Debra
Dalgleish's site:
http://www.contextures.com/xladvfilter01.html#FilterUR

The copy|Paste the visible rows to the other sheet.

ltong wrote:

Hi Dave,

Thanks again, it works pretty well.

I've another guestion....

After the substitute function is used, I'd like to search the entire
worksheet, row by row where there is no color being highlighted on the
cell ( ie no duplicated value ), it will extract the whole row ( i.e.
row without color ) from columns A to G and transfer to a new
worksheet under the same workbook.

This will continue to extract row by row until it finds that there is
no data on the highlighted cell from the entire worksheet.

How to device an excel function or excel VBA to solve the above
problem ?

Thanks in advance

Regards
Lenard

Dave Peterson wrote in message ...
Excel allows you to specify wild cards in Edit|Find.

Excel supports these two wild cards:

* = any set of characters
? = any one character

To look/replace an asterisk, you use ~*
(tilde is to the left of the 1/! key on my USA keyboard)

to replace a question mark, you use ~?

And since you're using the tilde (~) as an "escape" character, you have to use
this:
~~ (doubled up) to find/replace the single ~ (tilde).

So in your case, you didn't do anything wrong--just got hit by something that I
didn't expect.

myBadChars = Array("-", "[", "]", "{", "}", "(", ")", "~*", " ")

should do it.

==
Pretty neat way to empty cells, though, huh??? <vbg



ltong wrote:

Hi Dave,

Thanks, it works ......but when I add new characters to that array in
the cleanEmUp macro, e.g. myBadChars = Array("-", "[", "]", "{", "}",
"(", ")","*"," "), and run the macro on the selected cell contains a
numbering as I-03-02 14*(P-PG), it turns out as blank cell ?? Did I
miss out anything ?

Sorry, I'm still learning excel VBA.

Regards
Lenard

Dave Peterson wrote in message ...
Add as many characters to that array as you need. I stopped after just a few.

Dave Peterson wrote:

You could nest a bunch of substitutes together like:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"-",""),"[",""),"]","")
(but excel has a limit of 7 nested functions)

Maybe a macro would work better:

Option Explicit
Sub cleanEmUp()

Dim myBadChars As Variant
Dim iCtr As Long

myBadChars = Array("-", "[", "]", "{", "}", "(", ")")

For iCtr = LBound(myBadChars) To UBound(myBadChars)
Selection.Replace What:=myBadChars(iCtr), _
Replacement:="", _
LookAt:=xlPart, SearchOrder:=xlByRows, _
MatchCase:=False
Next iCtr

End Sub

Select your cells and run this macro.

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

ltong wrote:

(ltong) wrote in message . com...
"Mike" wrote in message ...
If you can do it, insert a column (could be hidden) and
eliminate the spaces in the Ref No and concatenate with
the amount. To eliminate the spaces, use the substitue
function. If the first BOT entry is in cell B2 and the
first amount in C2, in D2 enter =substitute(B2," ","")
&C2. In effect you've made a unique key Excel can now
check against. Now use that unique key in a conditional
formatting to highlight those instances where they are the
same.

-----Original Message-----
Hi,

Can anyone pls help me to solve the below
question?

I've 2 columns typed with the respective header:Ref No
(Column C) and
Amount ( Column H).
I 'd like to check whether Ref No in column C
corresponding with the
amount in column H are duplicate in these columns. If
there is
duplicate then highlight the cell with colors.
The COUNTIF function is working fine for the above
situation but it
fails to detect the following values, particularly with
blank space in
between the value in Ref No column although they are
considered the
same number or duplicate :-

Ref No Amount
A BOT 987415 $250.00
B BOT987415 $250.00
C BOT 987415 $250.00

Is there anyway that can help to solve the above either
excel VBA or
excel function? ( ie to give the same solution as COUNTIF
function )

Thanks in advance.
Rgds
Lenard,
.


Hi Mike,

Thanks, it solves the question

Regards
Lenard

Hi,

I've another questions as follows : -

A)Is there anyway to remove "( )", "[ ]" or "{ }" from the numbering
in a cell ?, ie the result will be I0307981PS,I04L04513,I0220105S for
the following examples

It seems that SUBSTITUTE function fails to solve this question, ie
=SUBSTITUTE(A2,"()","")

E.g.

1) I03-07981(P-S)
2) I04-[L]04513
3) I02-201{05}S

B) How to extract a numbering as I030214PPG without the quotation
marks from I-03-02 14*(P-PG) ? Can SUBSTITUTE function solve this
question as well ?

Please helps

Thanks
Regards
Lenard

--

Dave Peterson


--

Dave Peterson


--

Dave Peterson