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