/ / Sumárne časy na základe kritérií dátumu - excel, excel-formula

Sumarizačné časy založené na kritériách dátumu - excel, excel-formula

  Col A       Col J   Col K   Col L
8/1/2015       0:58     10     4:31
8/1/2015       0:19      1     3:56

Môžem automatizovať funkciu alebo skupinu funkcií, aby som vyhliadol informácie z tejto množiny údajov na základe dátumu v stĺpci A? Momentálne robím to ručne:

=((L24+L25)-(J24+J25))/(K24+K25)

Ja a zaujímam sa, či niečo nie jeby to uľahčilo. Pokúsil som sa sumif, sumproducts, vnorené if / index-match vyhlásenia, ale vyčerpali nápady, alebo som práve nespísal funkcie správne.

odpovede:

0 pre odpoveď č. 1

Tento vzorec by mal vyzdvihnúť výsledky, ktoré hľadáte.

=(SUMIF($A$24:$A$100,G16, $L$24:$L$100)-SUMIF($A$24:$A$100,G16, $J$24:$J$100))/SUMIF($A$24:$A$100, G16, $K$24:$K$100)

Tam je ďalší problém, kde sú časyvlastne text-to-look-like-time. Prvým náznakom toho je ich zaradenie doľava v bunkách. Rýchly prechod cez text do stĺpcov, pevná šírka, dokončenie vráti každý stĺpec do aktuálnych časov, ale každý stĺpec musí mať ten beh na ňom jednotlivo.

Nasleduje rutina, ktorá rýchlo prebehne každý pracovný hárok a vykoná akciu v každom stĺpci.

Sub fix_text_times()
Dim w As Long, c As Long, fndMrg As Range

On Error Resume Next
Application.FindFormat.MergeCells = True

For w = 1 To Worksheets.Count
With Worksheets(w)
With .UsedRange.Cells
Set fndMrg = .Cells.Find(What:=vbNullString, SearchFormat:=True)
Do While Not fndMrg Is Nothing
fndMrg.MergeCells = False
Set fndMrg = .Cells.Find(What:=vbNullString, SearchFormat:=True)
Loop

For c = 1 To .Columns.Count
.Columns(c).TextToColumns Destination:=.Cells(1, c), _
DataType:=xlFixedWidth, FieldInfo:=Array(0, 1)
Next c
End With

End With
Next w

Application.FindFormat.MergeCells = False

End Sub

Na Range.TextToColumns metóda nehrá dobre s zlúčené bunky, tak si unmerged všetky, ktoré som mohol nájsť.Mám vyvážené túto akciu proti všetkým viac Oblasti nehnuteľností nájdené v Master vstup 1 a myslel, že by ste mohli dať späť, ak ste zúfalo chcela.