Posts by edulofter

Are these computers on the same LAN or in different areas of the network?

[ATTACH=JSON]{"data-align":"none","data-size":"custom","height":"191","title":"26-264239_thank-you-clipart-family-thank-you-for-listening.jpg","width":"300","data-attachmentid":1216620}[/ATTACH]

[USER="31712"]Carim[/USER] Thanks you,
I scan your advice, i is useful. Because I AM also need this answer....

Quote from NBVC

Assuming date in columns A:F and your first result in I3, try:

=SUMIFS($E$2:$E$11,$D$2:$D$11,H3,$C$2:$C$11,"closing")-SUMIFS($E$2:$E$11,$D$2:$D$11,H3,$C$2:$C$11,"Opening")

copied down

Sorry, I tried it a few times and didn't succeed.:?

Quote from graha_karya

and if you want to another sheet

Code

Sub test()
Dim r As Range, e As Range, dic As Object, i&
Set r = Sheet1.[a1].CurrentRegion
Set dic = CreateObject("system.collections.arraylist")
For Each e In r
If ((e.Value Like "D*") * (Not dic.contains(e.Value))) Then dic.Add e.Value
Next e
dic.Sort
With Sheets.Add.[a5]
.Resize(dic.Count) = Application.Transpose(dic.toarray)
For i = 1 To 4
.Offset(, i).Resize(dic.Count).Formula = "=countif('" & Sheet1.Name & "'!" & r.Columns(i).Address & "," & .Cells(1, 1).Address(False, False) & ")"
Next i
End With
End Sub

Display More

thanks for answer.
I learn it

This is a very old topic.
If you are still following the clip art resources, you can check out clipartmax.
This is a free clip art resource that I often use in design work.