Coba copas Function warisan mbak Siti ini di Module, lalu ketik =AngkaThok(A1) 
di B1.
Function AngkaThok(Cel As Range)   ' siti Vi   ' memilih angka saja (modified 
by HK)   Dim i As Integer   Dim n As Integer 's as String   Dim k As String   n 
= 1   For i = 1 To Len(Cel)      k = Mid(Cel, i, 1)        If k = "," Then n = 
n + 1 's = s & k   Next i   AngkaThok = n 'Val(s)End Function
Huruf Biru tebal adalah bagian yang saya modifikasi.
Selamat mencoba.
Salam,HK


      From: "Prodev SIMPLE PB [email protected] [belajar-excel]" 
<[email protected]>
 To: [email protected] 
 Sent: Friday, 3 July 2015, 11:15
 Subject: [belajar-excel] Mencari Jumlah Data
   
    Assalamu'alaikum Wr. Wb.
Master, numpang tanya...Bagaimana formulasinya untuk bisa menghitung jumlah 
data (tanggal) yang dipisahkan oleh koma.Misal :A1 : Data tanggal 1, 2, 4, 
10,31B1 : Jumlah = 5
Terima kasih atas pencerahannya.
Wassalam. - prodev simple -
  #yiv4068915941 #yiv4068915941 -- #yiv4068915941ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv4068915941 
#yiv4068915941ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv4068915941 
#yiv4068915941ygrp-mkp #yiv4068915941hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv4068915941 #yiv4068915941ygrp-mkp #yiv4068915941ads 
{margin-bottom:10px;}#yiv4068915941 #yiv4068915941ygrp-mkp .yiv4068915941ad 
{padding:0 0;}#yiv4068915941 #yiv4068915941ygrp-mkp .yiv4068915941ad p 
{margin:0;}#yiv4068915941 #yiv4068915941ygrp-mkp .yiv4068915941ad a 
{color:#0000ff;text-decoration:none;}#yiv4068915941 #yiv4068915941ygrp-sponsor 
#yiv4068915941ygrp-lc {font-family:Arial;}#yiv4068915941 
#yiv4068915941ygrp-sponsor #yiv4068915941ygrp-lc #yiv4068915941hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv4068915941 
#yiv4068915941ygrp-sponsor #yiv4068915941ygrp-lc .yiv4068915941ad 
{margin-bottom:10px;padding:0 0;}#yiv4068915941 #yiv4068915941actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv4068915941 
#yiv4068915941activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv4068915941
 #yiv4068915941activity span {font-weight:700;}#yiv4068915941 
#yiv4068915941activity span:first-child 
{text-transform:uppercase;}#yiv4068915941 #yiv4068915941activity span a 
{color:#5085b6;text-decoration:none;}#yiv4068915941 #yiv4068915941activity span 
span {color:#ff7900;}#yiv4068915941 #yiv4068915941activity span 
.yiv4068915941underline {text-decoration:underline;}#yiv4068915941 
.yiv4068915941attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv4068915941 .yiv4068915941attach div a 
{text-decoration:none;}#yiv4068915941 .yiv4068915941attach img 
{border:none;padding-right:5px;}#yiv4068915941 .yiv4068915941attach label 
{display:block;margin-bottom:5px;}#yiv4068915941 .yiv4068915941attach label a 
{text-decoration:none;}#yiv4068915941 blockquote {margin:0 0 0 
4px;}#yiv4068915941 .yiv4068915941bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv4068915941 
.yiv4068915941bold a {text-decoration:none;}#yiv4068915941 dd.yiv4068915941last 
p a {font-family:Verdana;font-weight:700;}#yiv4068915941 dd.yiv4068915941last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv4068915941 
dd.yiv4068915941last p span.yiv4068915941yshortcuts 
{margin-right:0;}#yiv4068915941 div.yiv4068915941attach-table div div a 
{text-decoration:none;}#yiv4068915941 div.yiv4068915941attach-table 
{width:400px;}#yiv4068915941 div.yiv4068915941file-title a, #yiv4068915941 
div.yiv4068915941file-title a:active, #yiv4068915941 
div.yiv4068915941file-title a:hover, #yiv4068915941 div.yiv4068915941file-title 
a:visited {text-decoration:none;}#yiv4068915941 div.yiv4068915941photo-title a, 
#yiv4068915941 div.yiv4068915941photo-title a:active, #yiv4068915941 
div.yiv4068915941photo-title a:hover, #yiv4068915941 
div.yiv4068915941photo-title a:visited {text-decoration:none;}#yiv4068915941 
div#yiv4068915941ygrp-mlmsg #yiv4068915941ygrp-msg p a 
span.yiv4068915941yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv4068915941 
.yiv4068915941green {color:#628c2a;}#yiv4068915941 .yiv4068915941MsoNormal 
{margin:0 0 0 0;}#yiv4068915941 o {font-size:0;}#yiv4068915941 
#yiv4068915941photos div {float:left;width:72px;}#yiv4068915941 
#yiv4068915941photos div div {border:1px solid 
#666666;height:62px;overflow:hidden;width:62px;}#yiv4068915941 
#yiv4068915941photos div label 
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv4068915941
 #yiv4068915941reco-category {font-size:77%;}#yiv4068915941 
#yiv4068915941reco-desc {font-size:77%;}#yiv4068915941 .yiv4068915941replbq 
{margin:4px;}#yiv4068915941 #yiv4068915941ygrp-actbar div a:first-child 
{margin-right:2px;padding-right:5px;}#yiv4068915941 #yiv4068915941ygrp-mlmsg 
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv4068915941 
#yiv4068915941ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv4068915941 
#yiv4068915941ygrp-mlmsg select, #yiv4068915941 input, #yiv4068915941 textarea 
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv4068915941 
#yiv4068915941ygrp-mlmsg pre, #yiv4068915941 code {font:115% 
monospace;}#yiv4068915941 #yiv4068915941ygrp-mlmsg * 
{line-height:1.22em;}#yiv4068915941 #yiv4068915941ygrp-mlmsg #yiv4068915941logo 
{padding-bottom:10px;}#yiv4068915941 #yiv4068915941ygrp-msg p a 
{font-family:Verdana;}#yiv4068915941 #yiv4068915941ygrp-msg 
p#yiv4068915941attach-count span {color:#1E66AE;font-weight:700;}#yiv4068915941 
#yiv4068915941ygrp-reco #yiv4068915941reco-head 
{color:#ff7900;font-weight:700;}#yiv4068915941 #yiv4068915941ygrp-reco 
{margin-bottom:20px;padding:0px;}#yiv4068915941 #yiv4068915941ygrp-sponsor 
#yiv4068915941ov li a {font-size:130%;text-decoration:none;}#yiv4068915941 
#yiv4068915941ygrp-sponsor #yiv4068915941ov li 
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv4068915941 
#yiv4068915941ygrp-sponsor #yiv4068915941ov ul {margin:0;padding:0 0 0 
8px;}#yiv4068915941 #yiv4068915941ygrp-text 
{font-family:Georgia;}#yiv4068915941 #yiv4068915941ygrp-text p {margin:0 0 1em 
0;}#yiv4068915941 #yiv4068915941ygrp-text tt {font-size:120%;}#yiv4068915941 
#yiv4068915941ygrp-vital ul li:last-child {border-right:none 
!important;}#yiv4068915941 

  

Kirim email ke