View Single Post
 
Old 02-18-2014, 04:49 AM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,467
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

You don't need VBA for that; you can do it with formulae:
Code:
In J4 =SUMPRODUCT((D:D=H4)*(RIGHT(B:B,1)<>"S"),F:F)
In K4 =SUMPRODUCT((D:D=H4)*(RIGHT(B:B,1)="S"),F:F)
Copy both formulae down to row 7
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote