Suponha que eu tenha abaixo da folha de excel, e eu preciso encontrar a diferença entre eles e resultar necessidade de colocar de volta para outra coluna:

      ColA                      ColB                    ColC

9/3/2012  8:31:59 AM      09/17/2012  6:45:56 PM        Result
9/4/2012  8:31:59 AM      10/17/2012  6:45:56 PM        Result

Eu fiz isso usando a técnica de Loop e Row-By-Row. Procurando uma maneira, se isso puder ser feito diretamente por subtração de nível de coluna. Diga ColB-ColA -> ColC. Toda a operação deve ser realizada de cada vez."hh: mm: ss".

CÓDIGO

  IntRow4=2
  Do While objSheet4.Cells(IntRow4,1).Value <> ""

    If objSheet4.Cells(IntRow4,9).Value <> "Open" Then

       Date1=objSheet4.Cells(IntRow4,7).Value
       Date2=objSheet4.Cells(IntRow4,8).Value
       objSheet4.Cells(IntRow4,11)=TimeSpan(Date1,Date2)

   End If

  IntRow4=IntRow4+1
  Loop

Atualizar

      ColA1    ColB1      ColC1       ColA2    ColB2     ColC2   .....   ColAN    ColBN    ColCN    TotaltimeDurtion
      Date     Date     11:25:20      Date     Date     10:25:00          Date    Date     11:25:20      ?

aqui eu mostrei apenas uma linha, mas pode haver vários ou N número de linhas.O que eu preciso fazer é, eu quero adicionar as durações de tempo e colocá-los para a última coluna "TotaltimeDurtion" .Mas a última coluna não pode ser fixado.E todas as colunas para cada linha não deve valores obrigatórios, mas todos nunca serão vazios.Podemos também fazer isso também no nível da coluna.aqui a duração é hh: mm: ss formato ou como por sua instrução [h ]: mm: ss. Tempo totalDurção <- ColC1 + ColC2 + ... + ColCN.