Pergunta : A pergunta 2003 do vba de XLS - suprimir de fileiras duplicadas

Olá! - primar dentro 2003 onde eu estou tentando setup um submarino que realize a supressão de fileiras duplicadas. o

I encontrou um certificado do vba da amostra que me começ começado - é útil para suprimir das fileiras duplicadas prima dentro mas não realiza inteiramente o que eu quero poder a do.

In seu formulário atual (com algumas modificações de mim) que eu o tenho na maior parte trabalhar mas precisa-as de endereçar estes artigos:

1. Eu quero poder fazer um teste do instr para identificar a coluna que eu quero se usar para a verificação duplicada - agora fêz comigo que ajusta a escala para dizer “A1” como mostrado abaixo, de modo que a coluna A fosse usada -- mas a coluna pode variar - é o melhor se eu posso fazer um teste da corda em row1 (que tem o encabeçamento nomeia nele, procurando diz o “*SKU*” (convites) no A1: AA1 - encontrar a pilha que e uso que a pilha para ajustar a coluna… por exemplo pôde ser B1, etc. - mas eu não sou certo como escrever o código para realizar that.

2. Se há o que parecem ser fileiras em branco mas não são realmente… por exemplo dizem que a fileira 1-10 tem dados visíveis, mas alguém datilografou algo nas fileiras 11, 12, a seguir suprimido lhe, o código estão pegarando enfileiram 11 e 12 como precisando o processamento - tão talvez lá é um teste do len feito no concantonation de diz as primeiras 3 colunas de cada fileira (por exemplo len (a1+b2+c1) >0) para considerar se a fileira precisa de processar? a edição é mim precisa uma contagem exata em quantas duplicatas porque uns processos mais atrasados confiam neste para determinar que trajeto para tomar (por exemplo se as duplicatas >100 encontradas fazem esta, se não nesta) o

3. Eu quero poder ver que os resultados/detalhe do que foi suprimido - mim ter a instalação do certificado para mostrar # das fileiras que suprimiu - vê result_sheet da parte inferior “. Escala (“number_rows_deleted”). Value = CStr (N)” - mas gostaria do detalhe - mostrar à fileira própria - como sequencialmente escrever para baixo as fileiras… vêem “o dupkillerresult” aba na lima dos xls - as fileiras 11/12 - se poderia escrever o número da fileira, o nome da aba, a seguir o detalhe da fileira….

PS - eu sou muito bem com o fato de que quando uma duplicata é encontrada, o primeiro exemplo/fileira é preserved.

thanks adiantado para toda a ajuda! nome de arquivo " vazio " >

dup-killer.xls " fileSize " > (169 KB) Javascript” do href= o " dos " attachmentDetails do class= de (tipo de lima detalhes) aba do usa_data dos dados da amostra da instalação da aba >shows " da descrição dos " do class= de
>
class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
id= " codeSnippet823394 " class= DeleteDuplicateRows_usa secundário >Public " notpretty " do
 1 então
        Rng.Rows (R).EntireRow.Delete
        N = N + 1
    Terminar se
Mais
    Se Application.WorksheetFunction.CountIf (Rng.Columns (1), V) > 1 então
        Rng.Rows (R).EntireRow.Delete
        N = N + 1
    Terminar se
Terminar se
R seguinte

EndMacro:

Application.StatusBar = falso
Application.ScreenUpdating = retificam
Application.Calculation = xlCalculationAutomatic
Ajustar o xlSheet_dupkillerresult = as folhas (o “dupkillerresult”)
xlSheet_dupkillerresult.Activate
xlSheet_dupkillerresult.Range (“usa_count”). Valor = CStr (N)
Ajustar o xlSheet_dupkillerresult = nada
As fileiras duplicadas 'de MsgBox “suprimiram: ” & CStr (N)

Submarino da extremidade
class= do

Resposta : A pergunta 2003 do vba de XLS - suprimir de fileiras duplicadas

Outras soluções  
 
programming4us programming4us