From: fi.or.jp.de on
Joel,

Give me some tips to learn excel vba.

thanks for your help


On Apr 30, 6:36 pm, joel <joel.4a8...(a)thecodecage.com> wrote:
> Yes
>
> Dim DeleteCol as string
> Dim CompareStr as string
> DeleteCol = "H"
> CompareStr = Range("AY").Text
> Call Duplicate_Delete(DeleteCol,CompareStr)
>
> sub Duplicate_Delete(DeleteCol as string, CompareStr as String)
> Application.WorksheetFunction.CountIf( _
> Range(DeleteCol & "1:" & DeleteCol & x),CompareStr)
> end sub
>
> --
> joel
> ------------------------------------------------------------------------
> joel's Profile:http://www.thecodecage.com/forumz/member.php?u=229
> View this thread:http://www.thecodecage.com/forumz/showthread.php?t=199734
>
> http://www.thecodecage.com/forumz