Pergunta : Perseguidor do comparecimento - consolidação dos dados

Eu tenho um perseguidor do comparecimento que tenha o mês em dados do mês em vários spreadsheets e eu inclua um spreadsheet nomeado o “sumário”, que deve basicamente me dar a soma das folhas para cada empregado (puxado das várias folhas). Ajudar-me por favor. Obrigado class= do " lastRow do
>Attachments do " nome " do class= do class= " valor " do
>
nome de arquivo " do class= do >Attendance-Tracker2010.xls " fileSize " > (470 KB) Javascript " do href= o " dos " attachmentDetails do class= de (tipo de lima detalhes)
>Attendance Tracker
da " descrição " do class= do
o class= de
do >
class= do

Resposta : Perseguidor do comparecimento - consolidação dos dados

Está aqui uma atualização que endereça o ponto 1. Para o ponto 2, você apenas tem que copiar a fórmula transversalmente.

Thomas
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:

Função GetLeave (empNo como a corda, strType como a corda)
Sht não ofuscante como a folha, rowFound como por muito tempo, colFound como por muito tempo, lgResult como por muito tempo

No resumo do erro em seguida

Para cada sht em ActiveWorkbook.Worksheets

    Se sht. Nome <> “sumário” então
        rowFound = sht. Colunas (2). Achado (que: =empNo, em seguida: =sht. Pilhas (1, 2), LookIn: =xlValues, LookAt: = _
                    xlWhole, SearchOrder: =xlByRows, SearchDirection: =xlNext, MatchCase: _ do =False
                    , SearchFormat: =False). Fileira
        colFound = sht. Fileiras (9). Achado (que: =strType, em seguida: =sht. Pilhas (9, 1), LookIn: =xlValues, LookAt: = _
                    xlWhole, SearchOrder: =xlByRows, SearchDirection: =xlNext, MatchCase: _ do =False
                    , SearchFormat: =False). Coluna
    
    
        Se Err.Number = 0 então
            lgResult = lgResult + sht. Pilhas (rowFound, colFound)
        Mais
            Err.Clear
        Terminar se
    
    Terminar se
    
Em seguida

GetLeave = lgResult

Função do fim
Outras soluções  
 
programming4us programming4us