Questione : Scritto di Vbs per ottenere conteggio di composizione di gruppo. Non ottiene il conteggio reale per alcuni gruppi.

Ciao, scritto del

Vbs per ottenere conteggio di composizione di gruppo. Non ottiene a conteggio reale per qualche groups.
For alcuni gruppi che siano 0 che convince al no's

Can chiunque del gruppo precedentemente esplorato l'aiuto per riparare il issue.

REgards
sharath class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
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:
riassunto notpretty di errore del >On " del class= " " di codeSnippet777591 del id= del
class= del

Risposta : Scritto di Vbs per ottenere conteggio di composizione di gruppo. Non ottiene il conteggio reale per alcuni gruppi.

L'aggiornamento qui sotto abbinerà le intere stringhe


hth

Dave

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

createhyperlink del ub ()
    La WS fioca come manuale
    Ws1 fioco come manuale
    Rng fioco come gamma
    C fioca come gamma
    Rng2 fioco come gamma

    Regolar la WS = strati (“Sheet1„)
    Regolar ws1 = strati (“Sheet2„)
    Regolare il rng = ws1.Range (“a2: „ & ws1.Cells (Cells.Rows.Count, “A„). Estremità (xlUp). Fila)

    Per ogni c nel rng
    Se "" <> di c.Value allora
        x = c.Value
        Regolar rng2 = la WS. Colonne (1).Find (che cosa: =x, dopo: =ws. Cellule (1), LookIn: =xlFormulas, LookAt: =xlWhole, SearchOrder: =xlByRows, SearchDirection: =xlNext, MatchCase: =False, SearchFormat: =False)
        Se non rng2 è niente allora ancoraggio della WS. Hyperlinks.Add: =c, indirizzo: = "", SubAddress: = "" & la WS. Nome & “!„ & rng2.Address (0, 0) & "", TextToDisplay: =c.Value
        Concluder se
    C seguente
Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us