Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
mas ghozi untuk posisi penghitungan (=IF(MOD(ROW(C1),15)=0) itu udah true hanya 
sekarang kasusnya menghitung hanya per 15 rentang cell mas

 
 
 Pada Sab, 3 Mar 2018 pada 10:16, ghozi alkatiri ghozialkat...@yahoo.co.id 
[belajar-excel]
 menulis:
 
   Mungkin yang anda maksudkan tidak menggunakan acuan nilai di kolom A(nomer 
urut).
 Kita bisa mengganti 
 Rumusnya menjadi:
 =IF(MOD(ROW(C1),15)=0,SUM($B$2:B2),"")
 copy ke bawah.
 
 Pada Sab, 3/3/18, Rian Sutarsa riansuta...@yahoo.com [belajar-excel] menulis:
 
 Judul: Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Sabtu, 3 Maret, 2018, 8:16 AM
 
 
  
 
 
 
 
 
 
 
 
 
 oia mas ghozi bagaimana bila penghitungannya tidak
 dari $B$2 tapi per 15 cell?
 
 
 Pada Sab, 3 Mar 2018 pada
 7:47, Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel]
 menulis: 
  
 
 
 
 
 
 
 
 
 
 terimakasih mas ghozi sukses

Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
Mungkin yang anda maksudkan tidak menggunakan acuan nilai di kolom A(nomer 
urut).
Kita bisa mengganti 
Rumusnya menjadi:
=IF(MOD(ROW(C1),15)=0,SUM($B$2:B2),"")
copy ke bawah.

Pada Sab, 3/3/18, Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
 menulis:

 Judul: Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Sabtu, 3 Maret, 2018, 8:16 AM
 
 
  
 
 
 
   
 
 
 
   
   
   oia mas ghozi bagaimana bila penghitungannya tidak
 dari $B$2 tapi per 15 cell?
 
  
Pada Sab, 3 Mar 2018 pada
 7:47, Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel]
 menulis:   
  
 
 
 
   
 
 
 
   
   
   terimakasih mas ghozi sukses
 
  
   
 Pada Jum, 2 Mar 2018 pada 22:57, ghozi alkatiri
 ghozialkat...@yahoo.co.id
 [belajar-excel]
 menulis:   
  
 
 
 
   
 
 
 
   
   
   Oh sori formulanya tebalik yang benar:
 
 =IF(MOD(A2,15)=0,SUM($B$2:B2),"")
 
  
 
 
 
 Pada Jum, 2/3/18, ghozi alkatiri ghozialkat...@yahoo.co.id
 [belajar-excel] 
 menulis:
 
 
 
 Judul: Re: [belajar-excel] Formula hitung berdasarkan
 rentang cell
 
  Kepada: belajar-excel@yahoogroups.com
 
  Tanggal: Jumat, 2 Maret, 2018, 10:19 PM
 
  
 
  
 
   
 
  
 
  
 
  
 

 
  
 
  
 
  
 

 

 
Assalamu alaikum
 
  
 
  Coba tulis formula di C2
 
  
 
  =IF(MOD(A2,15)=0,"",SUM($B$2:B2))
 
  
 
  copy ke bawah .
 
  
 
  Wassalam.
 
  
 
  
 
  
 
  Ghozi Alkatiri
 
  
 
  
 
  
 
  Pada Jum, 2/3/18, Rian Sutarsa riansuta...@yahoo.com
 
  [belajar-excel] 
 
  menulis:
 
  
 
  
 
  
 
  Judul: Re: [belajar-excel] Formula hitung berdasarkan
 
  rentang cell
 
  
 
   Kepada: belajar-excel@yahoogroups.com
 
  
 
   Tanggal: Jumat, 2 Maret, 2018, 8:31 PM
 
  
 
   
 
  
 
   
 
  
 
    
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
 
 
  
 
 
 
  
 
   pak zainul ini saya coba lampirkan file
 
  
 
   nya
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   Pada ‎Jumat‎, ‎02‎
 
  
 
   ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎
 
  ‎WIB,
 
  
 
   Zainul Ulum zainul_u...@yahoo.com [belajar-excel]
 
  
 
    menulis:
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
    
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
 
 
  
 
 Pak Rian,bisa menggunakan
 
  
 
   sum(index():index()), atau sum (offset()) atau pakai
 
  
 
   sumifs()
 
  
 
   kalo ada
 
  
 
   contoh data mungkin bisa lebih jelas
 
  
 
   thanks-zainul
 
  
 
   On Mar 2, 2018 6:05 PM,
 
  
 
   "Rian Sutarsa riansuta...@yahoo.com
 
  
 
   [belajar-excel]"
 
  
 
  
 
   wrote:
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
    
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
 
 
  
 
 
 
  
 
 assalamualaikum wr. wb. para master BeExcel mohon
 
  
 
   solusinya. saya dapat kasuscontoh soal di cell
 
  
 
   A1:A1000 berisikan nilai2 yang tak beraturan (tidak
 
  
 
   sama).nah di cell B15, B30, B45 dst. saya ingin
 
  
 
   mendapatkan nilai dari sum range A1:A15, A16:A30,
 
  A31:A45
 
  
 
   dst.
 
  
 
   bisa saja manual,
 
  
 
   hanya saja datanya terlalu banyak.. mohon pencerahannya
 
  
 
   master. terimakasih.wassalam
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 

 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 

 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 

 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   
 
  
 
   #yiv3614865289 #yiv3614865289 --
 
  
 
 #yiv3614865289ygrp-mkp {
 
  
 
   border:1px solid #d8d8d8;font-family:Arial;margin:10px
 
  
 
   0;padding:0 10px;}
 
  
 
   
 
  
 
   #yiv3614865289 #yiv3614865289ygrp-mkp hr {
 
  
 
   border:1px solid #d8d8d8;}
 
  
 
   
 
  
 
   #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289hd
 {
 
  
 
  
 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
 
  
 
   0;}
 
  
 
   
 
  
 
   #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289ads
 
  {
 
  
 
   margin-bottom:10px;}
 
  
 
   
 
  
 
   #yiv3614865289

Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
oia mas ghozi bagaimana bila penghitungannya tidak dari $B$2 tapi per 15 cell?



  Pada Sab, 3 Mar 2018 pada 7:47, Rian Sutarsa riansuta...@yahoo.com 
[belajar-excel] menulis:    
terimakasih mas ghozi sukses




  Pada Jum, 2 Mar 2018 pada 22:57, ghozi alkatiri ghozialkat...@yahoo.co.id 
[belajar-excel] menulis:    
Oh sori formulanya tebalik yang benar:
=IF(MOD(A2,15)=0,SUM($B$2:B2),"")


Pada Jum, 2/3/18, ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
 menulis:

Judul: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Jumat, 2 Maret, 2018, 10:19 PM


  









 Assalamu alaikum

 Coba tulis formula di C2

 =IF(MOD(A2,15)=0,"",SUM($B$2:B2))

 copy ke bawah .

 Wassalam.



 Ghozi Alkatiri

 

 Pada Jum, 2/3/18, Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel] 
 menulis:

 

 Judul: Re: [belajar-excel] Formula hitung berdasarkan
 rentang cell

 Kepada: belajar-excel@yahoogroups.com

 Tanggal: Jumat, 2 Maret, 2018, 8:31 PM





  





















 pak zainul ini saya coba lampirkan file

 nya















 Pada ‎Jumat‎, ‎02‎

 ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎
 ‎WIB,

 Zainul Ulum zainul_u...@yahoo.com [belajar-excel]

  menulis:













  



















 Pak Rian,bisa menggunakan

 sum(index():index()), atau sum (offset()) atau pakai

 sumifs()

 kalo ada

 contoh data mungkin bisa lebih jelas

 thanks-zainul

 On Mar 2, 2018 6:05 PM,

 "Rian Sutarsa riansuta...@yahoo.com

 [belajar-excel]"
 

 wrote:











  



 















 assalamualaikum wr. wb. para master BeExcel mohon

 solusinya. saya dapat kasuscontoh soal di cell

 A1:A1000 berisikan nilai2 yang tak beraturan (tidak

 sama).nah di cell B15, B30, B45 dst... saya ingin

 mendapatkan nilai dari sum range A1:A15, A16:A30,
 A31:A45

 dst.

 bisa saja manual,

 hanya saja datanya terlalu banyak.. mohon pencerahannya

 master. terimakasih.wassalam




















































 


















 #yiv3614865289 #yiv3614865289 --

 #yiv3614865289ygrp-mkp {

 border:1px solid #d8d8d8;font-family:Arial;margin:10px

 0;padding:0 10px;}



 #yiv3614865289 #yiv3614865289ygrp-mkp hr {

 border:1px solid #d8d8d8;}



 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289hd {

 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px

 0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289ads
 {

 margin-bottom:10px;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad {

 padding:0 0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad p
 {

 margin:0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad a
 {

 color:#ff;text-decoration:none;}

 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc {

 font-family:Arial;}



 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc #yiv3614865289hd {

 margin:10px

 0px;font-weight:700;font-size:78%;line-height:122%;}



 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc .yiv3614865289ad {

 margin-bottom:10px;padding:0 0;}



 #yiv3614865289 #yiv3614865289actions {
 
 font-family:Verdana;font-size:11px;padding:10px 0;}



 #yiv3614865289 #yiv3614865289activity {

 
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}



 #yiv3614865289 #yiv3614865289activity span {

 font-weight:700;}



 #yiv3614865289 #yiv3614865289activity span:first-child {

 text-transform:uppercase;}



 #yiv3614865289 #yiv3614865289activity span a {

 color:#5085b6;text-decoration:none;}



 #yiv3614865289 #yiv3614865289activity span span {

 color:#ff7900;}



 #yiv3614865289 #yiv3614865289activity span

 .yiv3614865289underline {

 text-decoration:underline;}



 #yiv3614865289 .yiv3614865289attach {

 clear:both;display:table;font-family:Arial;font-size:12px;padding:10px

 0;width:400px;}



 #yiv3614865289 .yiv3614865289attach div a {

 text-decoration:none;}



 #yiv3614865289 .yiv3614865289attach img {

 border:none;padding-right:5px;}



 #yiv3614865289 .yiv3614865289attach label {

 display:block;margin-bottom:5px;}



 #yiv3614865289 .yiv3614865289attach label a {

 text-decoration:none;}



 #yiv3614865289 blockquote {

 margin:0 0 0 4px;}



 #yiv3614865289 .yiv3614865289bold {

 font-family:Arial;font-size:13px;font-weight:700;}



 #yiv3614865289 .yiv3614865289bold a {

 text-decoration:none;}



 #yiv3614865289 dd.yiv3614865289last p a {

 font-family:Verdana;font-weight:700;}



 #yiv3614865289 dd.yiv3614865289last p span {

 margin-right:10px;font-family:Verdana;font-weight:700;}



 #yiv3614865289 dd.yiv3614865289last p
 
 span.yiv3614865289yshortcuts {

 margin-right:0;}



 #yiv3614865289

Bls: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
oia Mr. Kid, untuk 



  Pada Rab, 28 Feb 2018 pada 18:14, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] menulis:    

Wa'alaikumussalam wr wb
Hide :Sheets("nama sheet").range("a1").entirerow.hidden=true

Print :Sheets("nama sheet").range("area range").printout
Wassalamu'alaikum wr wbKid
Sent from my smart enough phone
On Feb 28, 2018, at 17:50, Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
 wrote:


  
Assalamu'alaikum para Master BeExcel, mohon bantuannya dan bimbingannya 
mengenai Macro VBA Hide/Unhide cell otomatis plus button print nya.. hehe..
terimakasih banyak sebelumnya.
Wassalam




  #yiv9661826024 #yiv9661826024 -- #yiv9661826024ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9661826024 
#yiv9661826024ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9661826024 
#yiv9661826024ygrp-mkp #yiv9661826024hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv9661826024 #yiv9661826024ygrp-mkp #yiv9661826024ads 
{margin-bottom:10px;}#yiv9661826024 #yiv9661826024ygrp-mkp .yiv9661826024ad 
{padding:0 0;}#yiv9661826024 #yiv9661826024ygrp-mkp .yiv9661826024ad p 
{margin:0;}#yiv9661826024 #yiv9661826024ygrp-mkp ...yiv9661826024ad a 
{color:#ff;text-decoration:none;}#yiv9661826024 #yiv9661826024ygrp-sponsor 
#yiv9661826024ygrp-lc {font-family:Arial;}#yiv9661826024 
#yiv9661826024ygrp-sponsor #yiv9661826024ygrp-lc #yiv9661826024hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9661826024 
#yiv9661826024ygrp-sponsor #yiv9661826024ygrp-lc .yiv9661826024ad 
{margin-bottom:10px;padding:0 0;}#yiv9661826024 #yiv9661826024actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9661826024 
#yiv9661826024activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9661826024
 #yiv9661826024activity span {font-weight:700;}#yiv9661826024 
#yiv9661826024activity span:first-child 
{text-transform:uppercase;}#yiv9661826024 #yiv9661826024activity span a 
{color:#5085b6;text-decoration:none;}#yiv9661826024 #yiv9661826024activity span 
span {color:#ff7900;}#yiv9661826024 #yiv9661826024activity span 
.yiv9661826024underline {text-decoration:underline;}#yiv9661826024 
.yiv9661826024attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv9661826024 .yiv9661826024attach div a 
{text-decoration:none;}#yiv9661826024 ...yiv9661826024attach img 
{border:none;padding-right:5px;}#yiv9661826024 .yiv9661826024attach label 
{display:block;margin-bottom:5px;}#yiv9661826024 .yiv9661826024attach label a 
{text-decoration:none;}#yiv9661826024 blockquote {margin:0 0 0 
4px;}#yiv9661826024 .yiv9661826024bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv9661826024 
.yiv9661826024bold a {text-decoration:none;}#yiv9661826024 dd.yiv9661826024last 
p a {font-family:Verdana;font-weight:700;}#yiv9661826024 dd.yiv9661826024last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9661826024 
dd.yiv9661826024last p span.yiv9661826024yshortcuts 
{margin-right:0;}#yiv9661826024 div.yiv9661826024attach-table div div a 
{text-decoration:none;}#yiv9661826024 div.yiv9661826024attach-table 
{width:400px;}#yiv9661826024 div.yiv9661826024file-title a, #yiv9661826024 
div.yiv9661826024file-title a:active, #yiv9661826024 
div.yiv9661826024file-title a:hover, #yiv9661826024 div.yiv9661826024file-title 
a:visited {text-decoration:none;}#yiv9661826024 div.yiv9661826024photo-title a, 
#yiv9661826024 div.yiv9661826024photo-title a:active, #yiv9661826024 
div.yiv9661826024photo-title a:hover, #yiv9661826024 
div.yiv9661826024photo-title a:visited {text-decoration:none;}#yiv9661826024 
div#yiv9661826024ygrp-mlmsg #yiv9661826024ygrp-msg p a 
span.yiv9661826024yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9661826024 
.yiv9661826024green {color:#628c2a;}#yiv9661826024 .yiv9661826024MsoNormal 
{margin:0 0 0 0;}#yiv9661826024 o {font-size:0;}#yiv9661826024 
#yiv9661826024photos div {float:left;width:72px;}#yiv9661826024 
#yiv9661826024photos div div {border:1px solid 
#66;min-height:62px;overflow:hidden;width:62px;}#yiv9661826024 
#yiv9661826024photos div label 
{color:#66;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9661826024
 #yiv9661826024reco-category {font-size:77%;}#yiv9661826024 
#yiv9661826024reco-desc {font-size:77%;}#yiv9661826024 .yiv9661826024replbq 
{margin:4px;}#yiv9661826024 #yiv9661826024ygrp-actbar div a:first-child 
{margin-right:2px;padding-right:5px;}#yiv9661826024 #yiv9661826024ygrp-mlmsg 
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9661826024 
#yiv9661826024ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9661826024 
#yiv9661826024ygrp-mlmsg select, #yiv9661826024 input, #yiv9661826024 textarea 
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv9661826024 
#yiv9661826024ygrp-mlmsg

Bls: Re: Re: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
Mr. Kid mah emang T.O.P dah.. hehemakasih banyak atas transfer ilmu nya selama 
ini Mr. ;)



  Pada Jum, 2 Mar 2018 pada 20:43, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] menulis:      

wkwkwk...
woles sajah...
kalo gak maklum, dah minta pensiun jadi moderator sejak dulu..
hahaha...



2018-03-02 20:32 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
:

    
ehehe.. mohon di maklum Mr. masih dalam tahapan belajar. 


Pada Jum, 2 Mar 2018 pada 19:38, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] menulis:    

walah
...hidden=true 'status hide adalah YA
kalau untuk membuat status hide jadi tidak, berarti kan jadi false toh ya...


Contoh baris kode untuk hide baris 1 Excel di sheet bernama Data :
   Sheets("Data").range("a1"). entirerow.hidden=true 'pada sheet 
bernama Data, di range A1, seluruh barisnya, status hidden menjadi true


duh gusti.
paringono sabar...
 


2018-03-01 12:28 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
:

  

alhamdulillah sukses Mr. lalu bagaimana cara unhid nya? he



  Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] 
menulis:    

oh begitu
baiklah...
yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja masih 
kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan VBA nya 
bisa tidak efisien atau terlalu rumit untuk dikembangkan.

Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide 
kolom) sudah bisa ya..
Untuk print juga sudah bisa kan ya...

Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan kriteria 
tertentu.
Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah blank 
(blank tidak sama dengan "" [nullstring])
Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke A1:A10 
yang blank.
Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di A1:A10 
lebih dulu.
Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).

Bahasa manusia dari prosesnya begini :
"ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"

Cara manual di worksheet-nya begini :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
1. blok cells A1:A10
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK]
> didapatlah cells di A1:A10 yang blank...

Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai kebutuhan, 
barulah disusun otomasinya (pakai VBA) :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
    bunyi dalam VBA :    sheets("Data")
1. blok cells A1:A10
    bunyi dalam VBA :    range("a1:a10")
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK]
    bunyi dalam VBA :    specialcells(xlCellTypeBlanks)

Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
"ke sheet yang diproses (misal sheet bernama Data),   blok A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"
      
sheets("Data").Range("A1:A10).. SpecialCells(xlCellTypeBlanks)

Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
   sheets("Data").Range("A1:A10). SpecialCells(xlCellTypeBlanks)

> Biasanya akan ada yang bilang begini :
'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih 
xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun begitu'   
*** No Offense ***


hmmm... betul juga ya...
maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan 
merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips, lalu 
asal bunyi dalam mencari alasan..
*** No Offense juga ***

Begini :
kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
 Sheets("Data").
toolstip tidak akan muncul.
kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama Sheet1 
misalnya, maka tulis begini :

​Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang 
bunyinya Cells atau Range (pilih yang cocok).
aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi tooltips-nya, 
kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti gak bisa pakai 
Cells..
Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau 
tidak Cells berarti Range, karena cells dengan range merujuk ke isi worksheet 
tempat menulis data).
Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik deh 
A1:A10 sebagai string.
Jadinya didapat bunyi :
    Sheet1.Range("A1:A10")
Begitu ketik karakter titik, muncul lagi tooltipsnya

​Tadi, kerja manualnya, pakai Goto lalu

Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
yups, terimakasih pak zainul sukses



  Pada Sab, 3 Mar 2018 pada 6:22, Zainul Ulum zainul_u...@yahoo.com 
[belajar-excel] menulis:    

pak Rian,silakan dicoba rumus terlampir.thanks_zainul

On Mar 2, 2018 8:31 PM, "Rian Sutarsa riansuta...@yahoo.com [belajar-excel]" 
 wrote:

 

 pak zainul ini saya coba lampirkan file nya

Pada ‎Jumat‎, ‎02‎ ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎ ‎WIB, Zainul Ulum 
zainul_u...@yahoo.com [belajar-excel]  menulis:

  

Pak Rian,bisa menggunakan sum(index():index()), atau sum (offset()) atau pakai 
sumifs()
kalo ada contoh data mungkin bisa lebih jelas
thanks-zainul
On Mar 2, 2018 6:05 PM, "Rian Sutarsa riansuta...@yahoo.com [belajar-excel]" 
 wrote:

 
assalamualaikum wr. wb. para master BeExcel mohon solusinya. saya dapat kasus
contoh soal di cell A1:A1000 berisikan nilai2 yang tak beraturan (tidak 
sama)...nah di cell B15, B30, B45 dst. saya ingin mendapatkan nilai dari sum 
range A1:A15, A16:A30, A31:A45 dst.
bisa saja manual, hanya saja datanya terlalu banyak. mohon pencerahannya 
master. terimakasih.wassalam





  #yiv0569113507 #yiv0569113507 -- #yiv0569113507ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0569113507 
#yiv0569113507ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0569113507 
#yiv0569113507ygrp-mkp #yiv0569113507hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv0569113507 #yiv0569113507ygrp-mkp #yiv0569113507ads 
{margin-bottom:10px;}#yiv0569113507 #yiv0569113507ygrp-mkp .yiv0569113507ad 
{padding:0 0;}#yiv0569113507 #yiv0569113507ygrp-mkp .yiv0569113507ad p 
{margin:0;}#yiv0569113507 #yiv0569113507ygrp-mkp .yiv0569113507ad a 
{color:#ff;text-decoration:none;}#yiv0569113507 #yiv0569113507ygrp-sponsor 
#yiv0569113507ygrp-lc {font-family:Arial;}#yiv0569113507 
#yiv0569113507ygrp-sponsor #yiv0569113507ygrp-lc #yiv0569113507hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0569113507 
#yiv0569113507ygrp-sponsor #yiv0569113507ygrp-lc .yiv0569113507ad 
{margin-bottom:10px;padding:0 0;}#yiv0569113507 #yiv0569113507actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0569113507 
#yiv0569113507activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0569113507
 #yiv0569113507activity span {font-weight:700;}#yiv0569113507 
#yiv0569113507activity span:first-child 
{text-transform:uppercase;}#yiv0569113507 #yiv0569113507activity span a 
{color:#5085b6;text-decoration:none;}#yiv0569113507 #yiv0569113507activity span 
span {color:#ff7900;}#yiv0569113507 #yiv0569113507activity span 
.yiv0569113507underline {text-decoration:underline;}#yiv0569113507 
.yiv0569113507attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv0569113507 .yiv0569113507attach div a 
{text-decoration:none;}#yiv0569113507 .yiv0569113507attach img 
{border:none;padding-right:5px;}#yiv0569113507 .yiv0569113507attach label 
{display:block;margin-bottom:5px;}#yiv0569113507 .yiv0569113507attach label a 
{text-decoration:none;}#yiv0569113507 blockquote {margin:0 0 0 
4px;}#yiv0569113507 .yiv0569113507bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv0569113507 
.yiv0569113507bold a {text-decoration:none;}#yiv0569113507 dd.yiv0569113507last 
p a {font-family:Verdana;font-weight:700;}#yiv0569113507 dd.yiv0569113507last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0569113507 
dd.yiv0569113507last p span.yiv0569113507yshortcuts 
{margin-right:0;}#yiv0569113507 div.yiv0569113507attach-table div div a 
{text-decoration:none;}#yiv0569113507 div.yiv0569113507attach-table 
{width:400px;}#yiv0569113507 div.yiv0569113507file-title a, #yiv0569113507 
div.yiv0569113507file-title a:active, #yiv0569113507 
div.yiv0569113507file-title a:hover, #yiv0569113507 div.yiv0569113507file-title 
a:visited {text-decoration:none;}#yiv0569113507 div.yiv0569113507photo-title a, 
#yiv0569113507 div.yiv0569113507photo-title a:active, #yiv0569113507 
div.yiv0569113507photo-title a:hover, #yiv0569113507 
div.yiv0569113507photo-title a:visited {text-decoration:none;}#yiv0569113507 
div#yiv0569113507ygrp-mlmsg #yiv0569113507ygrp-msg p a 
span.yiv0569113507yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0569113507 
.yiv0569113507green {color:#628c2a;}#yiv0569113507 .yiv0569113507MsoNormal 
{margin:0 0 0 0;}#yiv0569113507 o {font-size:0;}#yiv0569113507 
#yiv0569113507photos div {float:left;width:72px;}#yiv0569113507 
#yiv0569113507photos div div {border:1px solid 
#66;min-height:62px;overflow:hidden;width:62px;}#yiv0569113507 
#yiv0569113507photos div label 
{color:#66;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0569113507
 #yiv0569113507reco-category {font-size:77%;}#yiv0569113507 
#yiv0569113507reco-desc

Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
terimakasih mas ghozi sukses



  Pada Jum, 2 Mar 2018 pada 22:57, ghozi alkatiri ghozialkat...@yahoo.co.id 
[belajar-excel] menulis:    
Oh sori formulanya tebalik yang benar:
=IF(MOD(A2,15)=0,SUM($B$2:B2),"")


Pada Jum, 2/3/18, ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
 menulis:

Judul: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Jumat, 2 Maret, 2018, 10:19 PM


  









 Assalamu alaikum

 Coba tulis formula di C2

 =IF(MOD(A2,15)=0,"",SUM($B$2:B2))

 copy ke bawah .

 Wassalam.



 Ghozi Alkatiri

 

 Pada Jum, 2/3/18, Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel] 
 menulis:



 Judul: Re: [belajar-excel] Formula hitung berdasarkan
 rentang cell

 Kepada: belajar-excel@yahoogroups.com

 Tanggal: Jumat, 2 Maret, 2018, 8:31 PM





  





















 pak zainul ini saya coba lampirkan file

 nya















 Pada ‎Jumat‎, ‎02‎

 ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎
 ‎WIB,

 Zainul Ulum zainul_u...@yahoo.com [belajar-excel]

  menulis:













  



















 Pak Rian,bisa menggunakan

 sum(index():index()), atau sum (offset()) atau pakai

 sumifs()

 kalo ada

 contoh data mungkin bisa lebih jelas

 thanks-zainul

 On Mar 2, 2018 6:05 PM,

 "Rian Sutarsa riansuta...@yahoo.com

 [belajar-excel]"
 

 wrote:











  



 















 assalamualaikum wr. wb. para master BeExcel mohon

 solusinya. saya dapat kasuscontoh soal di cell

 A1:A1000 berisikan nilai2 yang tak beraturan (tidak

 sama).nah di cell B15, B30, B45 dst... saya ingin

 mendapatkan nilai dari sum range A1:A15, A16:A30,
 A31:A45

 dst.

 bisa saja manual,

 hanya saja datanya terlalu banyak. mohon pencerahannya

 master. terimakasih.wassalam















 























































 #yiv3614865289 #yiv3614865289 --

 #yiv3614865289ygrp-mkp {

 border:1px solid #d8d8d8;font-family:Arial;margin:10px

 0;padding:0 10px;}



 #yiv3614865289 #yiv3614865289ygrp-mkp hr {

 border:1px solid #d8d8d8;}



 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289hd {

 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px

 0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289ads
 {

 margin-bottom:10px;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad {

 padding:0 0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad p
 {

 margin:0;}



 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad a
 {

 color:#ff;text-decoration:none;}

 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc {

 font-family:Arial;}



 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc #yiv3614865289hd {

 margin:10px

 0px;font-weight:700;font-size:78%;line-height:122%;}



 #yiv3614865289 #yiv3614865289ygrp-sponsor

 #yiv3614865289ygrp-lc .yiv3614865289ad {

 margin-bottom:10px;padding:0 0;}



 #yiv3614865289 #yiv3614865289actions {

 font-family:Verdana;font-size:11px;padding:10px 0;}



 #yiv3614865289 #yiv3614865289activity {

 
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}



 #yiv3614865289 #yiv3614865289activity span {

 font-weight:700;}



 #yiv3614865289 #yiv3614865289activity span:first-child {

 text-transform:uppercase;}



 #yiv3614865289 #yiv3614865289activity span a {

 color:#5085b6;text-decoration:none;}



 #yiv3614865289 #yiv3614865289activity span span {

 color:#ff7900;}



 #yiv3614865289 #yiv3614865289activity span

 .yiv3614865289underline {

 text-decoration:underline;}



 #yiv3614865289 .yiv3614865289attach {

 clear:both;display:table;font-family:Arial;font-size:12px;padding:10px

 0;width:400px;}



 #yiv3614865289 .yiv3614865289attach div a {

 text-decoration:none;}



 #yiv3614865289 .yiv3614865289attach img {

 border:none;padding-right:5px;}



 #yiv3614865289 .yiv3614865289attach label {

 display:block;margin-bottom:5px;}



 #yiv3614865289 .yiv3614865289attach label a {

 text-decoration:none;}



 #yiv3614865289 blockquote {

 margin:0 0 0 4px;}



 #yiv3614865289 .yiv3614865289bold {

 font-family:Arial;font-size:13px;font-weight:700;}



 #yiv3614865289 .yiv3614865289bold a {

 text-decoration:none;}



 #yiv3614865289 dd.yiv3614865289last p a {

 font-family:Verdana;font-weight:700;}



 #yiv3614865289 dd.yiv3614865289last p span {

 margin-right:10px;font-family:Verdana;font-weight:700;}



 #yiv3614865289 dd.yiv3614865289last p

 span.yiv3614865289yshortcuts {

 margin-right:0;}



 #yiv3614865289 div.yiv3614865289attach-table div div a {

 text-decoration:none;}



 #yiv3614865289 div.yiv3614865289attach-table {

 width:400px;}



 #yiv3614865289 div.yiv3614865289file-title a,
 #yiv3614865289

 div.yiv3614865289file-title a:active,

Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Zainul Ulum zainul_u...@yahoo.com [belajar-excel] 













SumBerdasarkanRentangCell.xlsx
Description: MS-Excel 2007 spreadsheet

Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
Oh sori formulanya tebalik yang benar:
=IF(MOD(A2,15)=0,SUM($B$2:B2),"")
 

Pada Jum, 2/3/18, ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
 menulis:

 Judul: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Jumat, 2 Maret, 2018, 10:19 PM
 
 
  
 
 
 
   
 
 
 
   
   
   Assalamu alaikum
 
 Coba tulis formula di C2
 
 =IF(MOD(A2,15)=0,"",SUM($B$2:B2))
 
 copy ke bawah .
 
 Wassalam.
 
 
 
 Ghozi Alkatiri
 
 
 
 Pada Jum, 2/3/18, Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel] 
 menulis:
 
 
 
 Judul: Re: [belajar-excel] Formula hitung berdasarkan
 rentang cell
 
  Kepada: belajar-excel@yahoogroups.com
 
  Tanggal: Jumat, 2 Maret, 2018, 8:31 PM
 
  
 
  
 
   
 
  
 
  
 
  
 

 
  
 
  
 
  
 

 

 

 
  pak zainul ini saya coba lampirkan file
 
  nya
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  Pada ‎Jumat‎, ‎02‎
 
  ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎
 ‎WIB,
 
  Zainul Ulum zainul_u...@yahoo.com [belajar-excel]
 
   menulis:
 
  
 
  
 
  
 
  
 
  
 
  
 
   
 
  
 
  
 
  
 

 
  
 
  
 
  
 

 

 
Pak Rian,bisa menggunakan
 
  sum(index():index()), atau sum (offset()) atau pakai
 
  sumifs()
 
  kalo ada
 
  contoh data mungkin bisa lebih jelas
 
  thanks-zainul
 
  On Mar 2, 2018 6:05 PM,
 
  "Rian Sutarsa riansuta...@yahoo.com
 
  [belajar-excel]"
 
 
  wrote:
 
  
 
  
 
  
 
  
 
  
 
   
 
  
 
  
 
  
 

 
  
 
  
 
  
 

 

 
assalamualaikum wr. wb. para master BeExcel mohon
 
  solusinya. saya dapat kasuscontoh soal di cell
 
  A1:A1000 berisikan nilai2 yang tak beraturan (tidak
 
  sama).nah di cell B15, B30, B45 dst. saya ingin
 
  mendapatkan nilai dari sum range A1:A15, A16:A30,
 A31:A45
 
  dst.
 
  bisa saja manual,
 
  hanya saja datanya terlalu banyak. mohon pencerahannya
 
  master. terimakasih.wassalam
 
  
 
  
 
  
 
  
 
   
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
   
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
  
 
   
 
  
 
  
 
  
 
  
 
  
 
  
 
  #yiv3614865289 #yiv3614865289 --
 
#yiv3614865289ygrp-mkp {
 
  border:1px solid #d8d8d8;font-family:Arial;margin:10px
 
  0;padding:0 10px;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp hr {
 
  border:1px solid #d8d8d8;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289hd {
 
  color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
 
  0;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289ads
 {
 
  margin-bottom:10px;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad {
 
  padding:0 0;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad p
 {
 
  margin:0;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad a
 {
 
  color:#ff;text-decoration:none;}
 
  #yiv3614865289 #yiv3614865289ygrp-sponsor
 
  #yiv3614865289ygrp-lc {
 
  font-family:Arial;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-sponsor
 
  #yiv3614865289ygrp-lc #yiv3614865289hd {
 
  margin:10px
 
  0px;font-weight:700;font-size:78%;line-height:122%;}
 
  
 
  #yiv3614865289 #yiv3614865289ygrp-sponsor
 
  #yiv3614865289ygrp-lc .yiv3614865289ad {
 
  margin-bottom:10px;padding:0 0;}
 
  
 
  #yiv3614865289 #yiv3614865289actions {
 
  font-family:Verdana;font-size:11px;padding:10px 0;}
 
  
 
  #yiv3614865289 #yiv3614865289activity {
 
  
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}
 
  
 
  #yiv3614865289 #yiv3614865289activity span {
 
  font-weight:700;}
 
  
 
  #yiv3614865289 #yiv3614865289activity span:first-child {
 
  text-transform:uppercase;}
 
  
 
  #yiv3614865289 #yiv3614865289activity span a {
 
  color:#5085b6;text-decoration:none;}
 
  
 
  #yiv3614865289 #yiv3614865289activity span span {
 
  color:#ff7900;}
 
  
 
  #yiv3614865289 #yiv3614865289activity span
 
  .yiv3614865289underline {
 
  text-decoration:underline;}
 
  
 
  #yiv3614865289 .yiv3614865289attach {
 
  clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
 
  0;width:400px;}
 
  
 
  #yiv3614865289 .yiv3614865289attach div a {
 
  text-decoration:none;}
 
  
 
  #yiv3614865289 .yiv3614865289attach img {
 
  border:none;padding-right:5px;}
 
  
 
  #yiv3614865289 .yiv3614865289attach label {
 
  display:block;margin-bottom:5px;}
 
  
 
  #yiv3614865289 .yiv3614865289attach label a {
 
  text-decoration:none;}
 
  
 
  #yiv3614865289 blockquote {
 
  margin:0 0 0 4px;}

Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik ghozi alkatiri ghozialkat...@yahoo.co.id [belajar-excel] 
Assalamu alaikum
Coba tulis formula di C2
=IF(MOD(A2,15)=0,"",SUM($B$2:B2))
copy ke bawah .
Wassalam.

Ghozi Alkatiri

Pada Jum, 2/3/18, Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
 menulis:

 Judul: Re: [belajar-excel] Formula hitung berdasarkan rentang cell
 Kepada: belajar-excel@yahoogroups.com
 Tanggal: Jumat, 2 Maret, 2018, 8:31 PM
 
 
  
 
 
 
   
 
 
 
   
   
   
 pak zainul ini saya coba lampirkan file
 nya
 
 
 
 
 
 
 
 Pada ‎Jumat‎, ‎02‎
 ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎ ‎WIB,
 Zainul Ulum zainul_u...@yahoo.com [belajar-excel]
  menulis:
 
 
 
 
 
 
  
 
 
 
   
 
 
 
   
   
   Pak Rian,bisa menggunakan
 sum(index():index()), atau sum (offset()) atau pakai
 sumifs()
 kalo ada
 contoh data mungkin bisa lebih jelas
 thanks-zainul
 On Mar 2, 2018 6:05 PM,
 "Rian Sutarsa riansuta...@yahoo.com
 [belajar-excel]" 
 wrote:
 
 
 
 
 
  
 
 
 
   
 
 
 
   
   
   assalamualaikum wr. wb. para master BeExcel mohon
 solusinya. saya dapat kasuscontoh soal di cell
 A1:A1000 berisikan nilai2 yang tak beraturan (tidak
 sama).nah di cell B15, B30, B45 dst. saya ingin
 mendapatkan nilai dari sum range A1:A15, A16:A30, A31:A45
 dst.
 bisa saja manual,
 hanya saja datanya terlalu banyak. mohon pencerahannya
 master. terimakasih.wassalam
 
 
 
 
  
 
 
 
 
 
 
 
 
 
 
 
 
  
 
 
 
 
 
 
 
 
 
 
  
 
 
 
 
 
 
 #yiv3614865289 #yiv3614865289 --
   #yiv3614865289ygrp-mkp {
 border:1px solid #d8d8d8;font-family:Arial;margin:10px
 0;padding:0 10px;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp hr {
 border:1px solid #d8d8d8;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289hd {
 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
 0;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp #yiv3614865289ads {
 margin-bottom:10px;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad {
 padding:0 0;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad p {
 margin:0;}
 
 #yiv3614865289 #yiv3614865289ygrp-mkp .yiv3614865289ad a {
 color:#ff;text-decoration:none;}
 #yiv3614865289 #yiv3614865289ygrp-sponsor
 #yiv3614865289ygrp-lc {
 font-family:Arial;}
 
 #yiv3614865289 #yiv3614865289ygrp-sponsor
 #yiv3614865289ygrp-lc #yiv3614865289hd {
 margin:10px
 0px;font-weight:700;font-size:78%;line-height:122%;}
 
 #yiv3614865289 #yiv3614865289ygrp-sponsor
 #yiv3614865289ygrp-lc .yiv3614865289ad {
 margin-bottom:10px;padding:0 0;}
 
 #yiv3614865289 #yiv3614865289actions {
 font-family:Verdana;font-size:11px;padding:10px 0;}
 
 #yiv3614865289 #yiv3614865289activity {
 
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}
 
 #yiv3614865289 #yiv3614865289activity span {
 font-weight:700;}
 
 #yiv3614865289 #yiv3614865289activity span:first-child {
 text-transform:uppercase;}
 
 #yiv3614865289 #yiv3614865289activity span a {
 color:#5085b6;text-decoration:none;}
 
 #yiv3614865289 #yiv3614865289activity span span {
 color:#ff7900;}
 
 #yiv3614865289 #yiv3614865289activity span
 .yiv3614865289underline {
 text-decoration:underline;}
 
 #yiv3614865289 .yiv3614865289attach {
 clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
 0;width:400px;}
 
 #yiv3614865289 .yiv3614865289attach div a {
 text-decoration:none;}
 
 #yiv3614865289 .yiv3614865289attach img {
 border:none;padding-right:5px;}
 
 #yiv3614865289 .yiv3614865289attach label {
 display:block;margin-bottom:5px;}
 
 #yiv3614865289 .yiv3614865289attach label a {
 text-decoration:none;}
 
 #yiv3614865289 blockquote {
 margin:0 0 0 4px;}
 
 #yiv3614865289 .yiv3614865289bold {
 font-family:Arial;font-size:13px;font-weight:700;}
 
 #yiv3614865289 .yiv3614865289bold a {
 text-decoration:none;}
 
 #yiv3614865289 dd.yiv3614865289last p a {
 font-family:Verdana;font-weight:700;}
 
 #yiv3614865289 dd.yiv3614865289last p span {
 margin-right:10px;font-family:Verdana;font-weight:700;}
 
 #yiv3614865289 dd.yiv3614865289last p
 span.yiv3614865289yshortcuts {
 margin-right:0;}
 
 #yiv3614865289 div.yiv3614865289attach-table div div a {
 text-decoration:none;}
 
 #yiv3614865289 div.yiv3614865289attach-table {
 width:400px;}
 
 #yiv3614865289 div.yiv3614865289file-title a, #yiv3614865289
 div.yiv3614865289file-title a:active, #yiv3614865289
 div.yiv3614865289file-title a:hover, #yiv3614865289
 div.yiv3614865289file-title a:visited {
 text-decoration:none;}
 
 #yiv3614865289 div.yiv3614865289photo-title a,
 #yiv3614865289 div.yiv3614865289photo-title a:active,
 #yiv3614865289 div.yiv3614865289photo-title a:hover,
 #yiv3614865289 div.yiv3614865289photo-title a:visited {

Re: Re: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] 
wkwkwk...
woles sajah...
kalo gak maklum, dah minta pensiun jadi moderator sejak dulu..
hahaha...



2018-03-02 20:32 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com
[belajar-excel] :

>
>
> ehehe.. mohon di maklum Mr. masih dalam tahapan belajar.
>
>
> Pada Jum, 2 Mar 2018 pada 19:38, 'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]
>  menulis:
>
>
> walah
> .hidden=true 'status hide adalah YA
> kalau untuk membuat status hide jadi tidak, berarti kan jadi false toh
> ya...
>
> Contoh baris kode untuk hide baris 1 Excel di sheet bernama Data :
>Sheets("Data").range("a1"). entirerow.hidden=true 'pada sheet
> bernama Data, di range A1, seluruh barisnya, status hidden menjadi true
>
>
> duh gusti...
> paringono sabar...
>
>
>
> 2018-03-01 12:28 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com
> [belajar-excel] :
>
>
>
> alhamdulillah sukses Mr. lalu bagaimana cara unhid nya? he
>
>
> Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]
> menulis:
>
>
> oh begitu
> baiklah...
> yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
> VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja
> masih kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan
> VBA nya bisa tidak efisien atau terlalu rumit untuk dikembangkan.
>
> Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide
> kolom) sudah bisa ya..
> Untuk print juga sudah bisa kan ya...
>
> Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan
> kriteria tertentu.
> Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah
> blank (blank tidak sama dengan "" [nullstring])
> Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke
> A1:A10 yang blank.
> Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di
> A1:A10 lebih dulu.
> Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).
>
> Bahasa manusia dari prosesnya begini :
> "ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke
> (goto) cells khusus (special) yang blank (Blanks)"
>
> Cara manual di worksheet-nya begini :
> 0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
> 1. blok cells A1:A10
> 2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special ->
> pilih Blanks -> tekan OK]
> > didapatlah cells di A1:A10 yang blank.
>
> Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai
> kebutuhan, barulah disusun otomasinya (pakai VBA) :
> 0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama
> Data)
> bunyi dalam VBA :sheets("Data")
> 1. blok cells A1:A10
> bunyi dalam VBA :range("a1:a10")
> 2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special ->
> pilih Blanks -> tekan OK]
> bunyi dalam VBA :specialcells(xlCellTypeBlanks)
>
> Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
> "ke sheet yang diproses (misal sheet bernama Data),   blok A1:A10, ke
> (goto) cells khusus (special) yang blank (Blanks)"
>
> sheets("Data").Range("A1:A10). SpecialCells(xlCellTypeBlanks)
>
> Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
> sheets("Data").Range("A1:A10). SpecialCells(xlCellTypeBlanks)
>
> > Biasanya akan ada yang bilang begini :
> 'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih
> xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun
> begitu'   *** No Offense ***
>
>
> hmmm... betul juga ya...
> maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan
> merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips,
> lalu asal bunyi dalam mencari alasan..
> *** No Offense juga ***
>
> Begini :
> kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
>  Sheets("Data").
> toolstip tidak akan muncul.
> kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
> Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama
> Sheet1 misalnya, maka tulis begini :
>
> ​Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang
> bunyinya Cells atau Range (pilih yang cocok).
> aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi
> tooltips-nya, kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti
> gak bisa pakai Cells..
> Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau
> tidak Cells berarti Range, karena cells dengan range merujuk ke isi
> worksheet tempat menulis data).
> Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik
> deh A1:A10 sebagai string.
> Jadinya didapat bunyi :
> Sheet1.Range("A1:A10")
> Begitu ketik karakter titik, muncul lagi tooltipsnya
>
> ​Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau
> cari Special nih
> Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto

Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
 pak zainul ini saya coba lampirkan file nya

Pada ‎Jumat‎, ‎02‎ ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎ ‎WIB, Zainul Ulum 
zainul_u...@yahoo.com [belajar-excel]  menulis:

  

Pak Rian,bisa menggunakan sum(index():index()), atau sum (offset()) atau pakai 
sumifs()
kalo ada contoh data mungkin bisa lebih jelas
thanks-zainul
On Mar 2, 2018 6:05 PM, "Rian Sutarsa riansuta...@yahoo.com [belajar-excel]" 
 wrote:

 
assalamualaikum wr. wb. para master BeExcel mohon solusinya. saya dapat kasus
contoh soal di cell A1:A1000 berisikan nilai2 yang tak beraturan (tidak 
sama).nah di cell B15, B30, B45 dst. saya ingin mendapatkan nilai dari sum 
range A1:A15, A16:A30, A31:A45 dst.
bisa saja manual, hanya saja datanya terlalu banyak. mohon pencerahannya 
master. terimakasih.wassalam

 

  #yiv1489242220 #yiv1489242220 -- #yiv1489242220ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1489242220 
#yiv1489242220ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1489242220 
#yiv1489242220ygrp-mkp #yiv1489242220hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv1489242220 #yiv1489242220ygrp-mkp #yiv1489242220ads 
{margin-bottom:10px;}#yiv1489242220 #yiv1489242220ygrp-mkp ...yiv1489242220ad 
{padding:0 0;}#yiv1489242220 #yiv1489242220ygrp-mkp .yiv1489242220ad p 
{margin:0;}#yiv1489242220 #yiv1489242220ygrp-mkp .yiv1489242220ad a 
{color:#ff;text-decoration:none;}#yiv1489242220 #yiv1489242220ygrp-sponsor 
#yiv1489242220ygrp-lc {font-family:Arial;}#yiv1489242220 
#yiv1489242220ygrp-sponsor #yiv1489242220ygrp-lc #yiv1489242220hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1489242220 
#yiv1489242220ygrp-sponsor #yiv1489242220ygrp-lc .yiv1489242220ad 
{margin-bottom:10px;padding:0 0;}#yiv1489242220 #yiv1489242220actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1489242220 
#yiv1489242220activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1489242220
 #yiv1489242220activity span {font-weight:700;}#yiv1489242220 
#yiv1489242220activity span:first-child 
{text-transform:uppercase;}#yiv1489242220 #yiv1489242220activity span a 
{color:#5085b6;text-decoration:none;}#yiv1489242220 #yiv1489242220activity span 
span {color:#ff7900;}#yiv1489242220 #yiv1489242220activity span 
.yiv1489242220underline {text-decoration:underline;}#yiv1489242220 
.yiv1489242220attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv1489242220 .yiv1489242220attach div a 
{text-decoration:none;}#yiv1489242220 .yiv1489242220attach img 
{border:none;padding-right:5px;}#yiv1489242220 .yiv1489242220attach label 
{display:block;margin-bottom:5px;}#yiv1489242220 .yiv1489242220attach label a 
{text-decoration:none;}#yiv1489242220 blockquote {margin:0 0 0 
4px;}#yiv1489242220 .yiv1489242220bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv1489242220 
.yiv1489242220bold a {text-decoration:none;}#yiv1489242220 dd.yiv1489242220last 
p a {font-family:Verdana;font-weight:700;}#yiv1489242220 dd.yiv1489242220last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1489242220 
dd.yiv1489242220last p span.yiv1489242220yshortcuts 
{margin-right:0;}#yiv1489242220 div.yiv1489242220attach-table div div a 
{text-decoration:none;}#yiv1489242220 div.yiv1489242220attach-table 
{width:400px;}#yiv1489242220 div.yiv1489242220file-title a, #yiv1489242220 
div.yiv1489242220file-title a:active, #yiv1489242220 
div.yiv1489242220file-title a:hover, #yiv1489242220 div.yiv1489242220file-title 
a:visited {text-decoration:none;}#yiv1489242220 div.yiv1489242220photo-title a, 
#yiv1489242220 div.yiv1489242220photo-title a:active, #yiv1489242220 
div.yiv1489242220photo-title a:hover, #yiv1489242220 
div.yiv1489242220photo-title a:visited {text-decoration:none;}#yiv1489242220 
div#yiv1489242220ygrp-mlmsg #yiv1489242220ygrp-msg p a 
span.yiv1489242220yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1489242220 
.yiv1489242220green {color:#628c2a;}#yiv1489242220 .yiv1489242220MsoNormal 
{margin:0 0 0 0;}#yiv1489242220 o {font-size:0;}#yiv1489242220 
#yiv1489242220photos div {float:left;width:72px;}#yiv1489242220 
#yiv1489242220photos div div {border:1px solid 
#66;min-height:62px;overflow:hidden;width:62px;}#yiv1489242220 
#yiv1489242220photos div label 
{color:#66;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1489242220
 #yiv1489242220reco-category {font-size:77%;}#yiv1489242220 
#yiv1489242220reco-desc {font-size:77%;}#yiv1489242220 .yiv1489242220replbq 
{margin:4px;}#yiv1489242220 #yiv1489242220ygrp-actbar div a:first-child 
{margin-right:2px;padding-right:5px;}#yiv1489242220 #yiv1489242220ygrp-mlmsg 
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1489242220 
#yiv1489242220ygrp-mlmsg table

Bls: Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
jadi yang saya maksud disana yang ingin saya tampilkan penghitungan di cell 
dengan rentang kelipatan 15 pak



  Pada Jum, 2 Mar 2018 pada 20:31, Rian Sutarsa menulis: 
   pak zainul ini saya coba lampirkan file nya

Pada ‎Jumat‎, ‎02‎ ‎Maret‎ ‎2018‎ ‎19‎:‎57‎:‎02‎ ‎WIB, Zainul Ulum 
zainul_u...@yahoo...com [belajar-excel]  menulis:

    

Pak Rian,bisa menggunakan sum(index():index()), atau sum (offset()) atau pakai 
sumifs()
kalo ada contoh data mungkin bisa lebih jelas
thanks-zainul
On Mar 2, 2018 6:05 PM, "Rian Sutarsa riansuta...@yahoo.com [belajar-excel]" 
 wrote:

 
assalamualaikum wr. wb... para master BeExcel mohon solusinya. saya dapat kasus
contoh soal di cell A1:A1000 berisikan nilai2 yang tak beraturan (tidak 
sama).nah di cell B15, B30, B45 dst. saya ingin mendapatkan nilai dari sum 
range A1:A15, A16:A30, A31:A45 dst.
bisa saja manual, hanya saja datanya terlalu banyak. mohon pencerahannya 
master. terimakasih.wassalam



  #yiv5968171983 -- #yiv5968171983ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv5968171983 
#yiv5968171983ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv5968171983 
#yiv5968171983ygrp-mkp #yiv5968171983hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv5968171983 #yiv5968171983ygrp-mkp #yiv5968171983ads 
{margin-bottom:10px;}#yiv5968171983 #yiv5968171983ygrp-mkp .yiv5968171983ad 
{padding:0 0;}#yiv5968171983 #yiv5968171983ygrp-mkp .yiv5968171983ad p 
{margin:0;}#yiv5968171983 #yiv5968171983ygrp-mkp .yiv5968171983ad a 
{color:#ff;text-decoration:none;}#yiv5968171983 #yiv5968171983ygrp-sponsor 
#yiv5968171983ygrp-lc {font-family:Arial;}#yiv5968171983 
#yiv5968171983ygrp-sponsor #yiv5968171983ygrp-lc #yiv5968171983hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv5968171983 
#yiv5968171983ygrp-sponsor #yiv5968171983ygrp-lc .yiv5968171983ad 
{margin-bottom:10px;padding:0 0;}#yiv5968171983 #yiv5968171983actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv5968171983 
#yiv5968171983activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv5968171983
 #yiv5968171983activity span {font-weight:700;}#yiv5968171983 
#yiv5968171983activity span:first-child 
{text-transform:uppercase;}#yiv5968171983 #yiv5968171983activity span a 
{color:#5085b6;text-decoration:none;}#yiv5968171983 #yiv5968171983activity span 
span {color:#ff7900;}#yiv5968171983 #yiv5968171983activity span 
.yiv5968171983underline {text-decoration:underline;}#yiv5968171983 
.yiv5968171983attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv5968171983 .yiv5968171983attach div a 
{text-decoration:none;}#yiv5968171983 .yiv5968171983attach img 
{border:none;padding-right:5px;}#yiv5968171983 .yiv5968171983attach label 
{display:block;margin-bottom:5px;}#yiv5968171983 .yiv5968171983attach label a 
{text-decoration:none;}#yiv5968171983 blockquote {margin:0 0 0 
4px;}#yiv5968171983 .yiv5968171983bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv5968171983 
.yiv5968171983bold a {text-decoration:none;}#yiv5968171983 dd.yiv5968171983last 
p a {font-family:Verdana;font-weight:700;}#yiv5968171983 dd.yiv5968171983last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv5968171983 
dd.yiv5968171983last p span.yiv5968171983yshortcuts 
{margin-right:0;}#yiv5968171983 div.yiv5968171983attach-table div div a 
{text-decoration:none;}#yiv5968171983 div.yiv5968171983attach-table 
{width:400px;}#yiv5968171983 div.yiv5968171983file-title a, #yiv5968171983 
div.yiv5968171983file-title a:active, #yiv5968171983 
div.yiv5968171983file-title a:hover, #yiv5968171983 div.yiv5968171983file-title 
a:visited {text-decoration:none;}#yiv5968171983 div.yiv5968171983photo-title a, 
#yiv5968171983 div.yiv5968171983photo-title a:active, #yiv5968171983 
div.yiv5968171983photo-title a:hover, #yiv5968171983 
div.yiv5968171983photo-title a:visited {text-decoration:none;}#yiv5968171983 
div#yiv5968171983ygrp-mlmsg #yiv5968171983ygrp-msg p a 
span.yiv5968171983yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv5968171983 
.yiv5968171983green {color:#628c2a;}#yiv5968171983 .yiv5968171983MsoNormal 
{margin:0 0 0 0;}#yiv5968171983 o {font-size:0;}#yiv5968171983 
#yiv5968171983photos div {float:left;width:72px;}#yiv5968171983 
#yiv5968171983photos div div {border:1px solid 
#66;min-height:62px;overflow:hidden;width:62px;}#yiv5968171983 
#yiv5968171983photos div label 
{color:#66;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv5968171983
 #yiv5968171983reco-category {font-size:77%;}#yiv5968171983 
#yiv5968171983reco-desc {font-size:77%;}#yiv5968171983 .yiv5968171983replbq 
{margin:4px;}#yiv5968171983 #yiv5968171983ygrp-actbar div a:first-child

Bls: Re: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
ehehe.. mohon di maklum Mr. masih dalam tahapan belajar. 

Pada Jum, 2 Mar 2018 pada 19:38, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] menulis:    

walah
...hidden=true 'status hide adalah YA
kalau untuk membuat status hide jadi tidak, berarti kan jadi false toh ya...


Contoh baris kode untuk hide baris 1 Excel di sheet bernama Data :
   Sheets("Data").range("a1"). entirerow.hidden=true 'pada sheet 
bernama Data, di range A1, seluruh barisnya, status hidden menjadi true


duh gusti...
paringono sabar...
 


2018-03-01 12:28 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
:

     

alhamdulillah sukses Mr. lalu bagaimana cara unhid nya? he



  Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] 
menulis:    

oh begitu
baiklah..
yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja masih 
kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan VBA nya 
bisa tidak efisien atau terlalu rumit untuk dikembangkan.

Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide 
kolom) sudah bisa ya..
Untuk print juga sudah bisa kan ya.

Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan kriteria 
tertentu.
Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah blank 
(blank tidak sama dengan "" [nullstring])
Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke A1:A10 
yang blank.
Oke. kalau begitu cari cara supaya bisa memilih cells yang blank di A1:A10 
lebih dulu.
Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).

Bahasa manusia dari prosesnya begini :
"ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"

Cara manual di worksheet-nya begini :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
1. blok cells A1:A10
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK]
> didapatlah cells di A1:A10 yang blank.

Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai kebutuhan, 
barulah disusun otomasinya (pakai VBA) :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
    bunyi dalam VBA :    sheets("Data")
1. blok cells A1:A10
    bunyi dalam VBA :    range("a1:a10")
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK]
    bunyi dalam VBA :    specialcells(xlCellTypeBlanks)

Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
"ke sheet yang diproses (misal sheet bernama Data),   blok A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"
      
sheets("Data").Range("A1:A10). SpecialCells(xlCellTypeBlanks)

Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
   sheets("Data").Range("A1:A10). SpecialCells(xlCellTypeBlanks)

> Biasanya akan ada yang bilang begini :
'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih 
xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun begitu'   
*** No Offense ***


hmmm... betul juga ya...
maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan 
merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips, lalu 
asal bunyi dalam mencari alasan..
*** No Offense juga ***

Begini :
kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
 Sheets("Data").
toolstip tidak akan muncul.
kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama Sheet1 
misalnya, maka tulis begini :

​Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang 
bunyinya Cells atau Range (pilih yang cocok).
aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi tooltips-nya, 
kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti gak bisa pakai 
Cells.
Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau 
tidak Cells berarti Range, karena cells dengan range merujuk ke isi worksheet 
tempat menulis data).
Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik deh 
A1:A10 sebagai string.
Jadinya didapat bunyi :
    Sheet1.Range("A1:A10")
Begitu ketik karakter titik, muncul lagi tooltipsnya

​Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau cari 
Special nih
Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto lalu ketik buka 
kurung atau spasi yang penting bisa muncul tooltip lagi
loh kok Goto gak ada bunyi pilih-pilih Special nya dalam tooltip milik Goto..
waaah... brarti bukan pakai Goto nih..

Akhirnya coba kemungkinan kedua, yaotu Special
Mulai cari kata special waaah... gak ada Special, adanya cuma SpecialCells..
Coba

Re: [belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Zainul Ulum zainul_u...@yahoo.com [belajar-excel]

Re: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik 'Mr. Kid' mr.nm...@gmail.com [belajar-excel] 
walah
..hidden=true 'status hide adalah YA
kalau untuk membuat status hide jadi tidak, berarti kan jadi false toh ya

Contoh baris kode untuk hide baris 1 Excel di sheet bernama Data :
>Sheets("Data").range("a1"). entirerow.hidden=true 'pada sheet
> bernama Data, di range A1, seluruh barisnya, status hidden menjadi true
>

duh gusti...
paringono sabar...



2018-03-01 12:28 GMT+07:00 Rian Sutarsa riansuta...@yahoo.com
[belajar-excel] :

>
>
> alhamdulillah sukses Mr. lalu bagaimana cara unhid nya? he
>
>
> Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]
> menulis:
>
>
> oh begitu
> baiklah..
> yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...
> VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja
> masih kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan
> VBA nya bisa tidak efisien atau terlalu rumit untuk dikembangkan.
>
> Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide
> kolom) sudah bisa ya..
> Untuk print juga sudah bisa kan ya...
>
> Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan
> kriteria tertentu.
> Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah
> blank (blank tidak sama dengan "" [nullstring])
> Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke
> A1:A10 yang blank.
> Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di
> A1:A10 lebih dulu.
> Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).
>
> Bahasa manusia dari prosesnya begini :
> "ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke
> (goto) cells khusus (special) yang blank (Blanks)"
>
> Cara manual di worksheet-nya begini :
> 0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)
> 1. blok cells A1:A10
> 2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special ->
> pilih Blanks -> tekan OK]
> > didapatlah cells di A1:A10 yang blank.
>
> Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai
> kebutuhan, barulah disusun otomasinya (pakai VBA) :
> 0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama
> Data)
> bunyi dalam VBA :sheets("Data")
> 1. blok cells A1:A10
> bunyi dalam VBA :range("a1:a10")
> 2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special ->
> pilih Blanks -> tekan OK]
> bunyi dalam VBA :specialcells(xlCellTypeBlanks)
>
> Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
> "ke sheet yang diproses (misal sheet bernama Data),   blok A1:A10, ke
> (goto) cells khusus (special) yang blank (Blanks)"
>
> sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
>
> Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :
> sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)
>
> > Biasanya akan ada yang bilang begini :
> 'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih
> xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun
> begitu'   *** No Offense ***
>
>
> hmmm... betul juga ya...
> maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan
> merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips,
> lalu asal bunyi dalam mencari alasan..
> *** No Offense juga ***
>
> Begini :
> kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)
>  Sheets("Data").
> toolstip tidak akan muncul.
> kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.
> Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama
> Sheet1 misalnya, maka tulis begini :
>
> ​Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang
> bunyinya Cells atau Range (pilih yang cocok).
> aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi
> tooltips-nya, kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti
> gak bisa pakai Cells.
> Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau
> tidak Cells berarti Range, karena cells dengan range merujuk ke isi
> worksheet tempat menulis data).
> Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik
> deh A1:A10 sebagai string.
> Jadinya didapat bunyi :
> Sheet1.Range("A1:A10")
> Begitu ketik karakter titik, muncul lagi tooltipsnya
>
> ​Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau
> cari Special nih
> Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto lalu ketik
> buka kurung atau spasi yang penting bisa muncul tooltip lagi
> loh kok Goto gak ada bunyi pilih-pilih Special nya dalam tooltip milik
> Goto..
> waaah... brarti bukan pakai Goto nih..
>
> Akhirnya coba kemungkinan kedua, yaotu Special
> Mulai cari kata special... waaah... gak ada Special, adanya cuma
> SpecialCells..
> Coba sajalah, siapa tahu Goto Special di fitur Excel itu artinya
> SpecialCells..
> eh kan di bahasa

Bls: Re: Re: Re: Re: [belajar-excel] VBA Hide/Unhide Cell Otomatis

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
waduh gimana ini mengakhiri tooltips nya Mr.? he

 
 
 Pada Kam, 1 Mar 2018 pada 8:15, 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
 menulis:
 
   
 oh begitu

baiklah..

yuk disempatkan belajar fitur Excel yang dasar-dasar dulu...

VBA kan untuk otomasi... kalau menerjakan secara manual (tanpa VBA) saja masih 
kurang optimum dalam memanfaatkan fitur Excel, hasil otomasi dengan VBA nya 
bisa tidak efisien atau terlalu rumit untuk dikembangkan.


Untuk hide baris (bisa dikembangkan untuk hide kolom, unhide baris, unhide 
kolom) sudah bisa ya..

Untuk print juga sudah bisa kan ya...


Masalah berikutnya adalah baris yang akan di-hide ada banyak dengan kriteria 
tertentu.

Pada kasus ini, baris yang di-hide adalah yang cells di A1:A10 adalah blank 
(blank tidak sama dengan "" [nullstring])

 Artinya, range yang ada di baris kode untuk hide haruslah merujuk ke A1:A10 
yang blank.

 Oke... kalau begitu cari cara supaya bisa memilih cells yang blank di A1:A10 
lebih dulu.

 Maka dicoba dulu dengan cara manual (BUKAN bersegera menggunakan VBA).


 Bahasa manusia dari prosesnya begini :

 "ke sheet yang diproses (misal sheet bernama Data), blok cells A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"

 
Cara manual di worksheet-nya begini :

 0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data)

 1. blok cells A1:A10

 2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK]

 > didapatlah cells di A1:A10 yang blank.


 Kalau sudah bisa dan mencoba cara manualnya, dan berhasil sesuai kebutuhan, 
barulah disusun otomasinya (pakai VBA) :
0. ke sheet yang beberapa barisnya akan diproses (misal sheet bernama Data) 

 bunyi dalam VBA :sheets("Data")

 1. blok cells A1:A10

 bunyi dalam VBA :range("a1:a10")
2. pakai fitur Goto Special Blanks OK [tekan CTRL G -> klik Special -> pilih 
Blanks -> tekan OK] 

 bunyi dalam VBA :specialcells(xlCellTypeBlanks)

 

 Sudah dapat parts-nya, maka dikembalikan ke bahasa manusianya :
 "ke sheet yang diproses (misal sheet bernama Data),   blok A1:A10, ke 
(goto) cells khusus (special) yang blank (Blanks)"

  
sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks)

 

 Dapat deh baris kode untuk memilih range yang blank di A1:A10, yaitu :

 sheets("Data").Range("A1:A10).SpecialCells(xlCellTypeBlanks) 
 

 > Biasanya akan ada yang bilang begini :

 'itu kan kalo sudah tahu VBA punya SpecialCells dan harus milih 
xlCellTypeBlanks, kalau belum tahu trus gimana mungkin bisa nyusun begitu'   
*** No Offense *** 



 hmmm... betul juga ya...

 maksudnya, betul juga kalau gak pernah memperhatikan tooltips, gak akan 
merasakan manfaat tooltips, jadinya gak mau berusaha memunculkan tooltips, lalu 
asal bunyi dalam mencari alasan..

 *** No Offense juga *** 

 

 Begini :

 kalau di VBA menulis : (jangan lupa karakter titik nya dan tidak ada spasi)

  Sheets("Data").

 toolstip tidak akan muncul.

 kalau begitu, untuk sementara pinjam dulu nama asli worksheet-nya.

 Sheets bernama Data, di VBA Object Explorer akan tampak memiliki nama Sheet1 
misalnya, maka tulis begini :

 

​Berhubung butuh menggunakan cells atau range, maka cari dalam daftar yang 
bunyinya Cells atau Range (pilih yang cocok).

 aah.. ada bunyi Cells, maka klik cells, buka kurung. Muncul lagi tooltips-nya, 
kok gak bisa pakai alamat A1:A10 kalau pakai Cells, berarti gak bisa pakai 
Cells.

 Cari yang lainnya saja... lalu cari lainnya, dapatlah pilihan kedua (kalau 
tidak Cells berarti Range, karena cells dengan range merujuk ke isi worksheet 
tempat menulis data).

 Dipilihlah range lalu buka kurung, muncul lagi tooltips-nya, lalu diketik deh 
A1:A10 sebagai string.

 Jadinya didapat bunyi :

 Sheet1.Range("A1:A10")

 Begitu ketik karakter titik, muncul lagi tooltipsnya
 

​Tadi, kerja manualnya, pakai Goto lalu Special, berarti cari Goto atau cari 
Special nih

 Mulailah cari Goto dulu... horeee ketemu goto.. dipilihlah goto lalu ketik 
buka kurung atau spasi yang penting bisa muncul tooltip lagi

 loh kok Goto gak ada bunyi pilih-pilih Special nya dalam tooltip milik Goto..

 waaah... brarti bukan pakai Goto nih..


 Akhirnya coba kemungkinan kedua, yaotu Special

 Mulai cari kata special... waaah... gak ada Special, adanya cuma SpecialCells..

 Coba sajalah, siapa tahu Goto Special di fitur Excel itu artinya 
SpecialCells.. 
eh kan di bahasa manusianya berbunyi 'ke cells khusus' ya... itukan bahasa 
sononya berbunyi Cells Special atau Special Cells.. kayaknya milih SpecialCells 
bener dah nih..

 dicobalah SpecialCells lalu spasi atau buka kurung asal keluar tooltips.. 

 dicobalah dulu pakai spasi, lalu muncul deh tuh tooltips
 
waahh... ada bermacam-macam..

 butuh yang blank nih, karena cara manualnya trus pilih blank... 
dicarilah pilihan yang ada bunyi blank..

 yaiy... dapet bunyi xlCellTypeBlanks

 ​Dapet deh bunyi baris

[belajar-excel] Memberi nomor unik pada nilai yg ganda (duplicate)

2018-03-02 Terurut Topik Cari Kebenaran cahayailm...@gmail.com [belajar-excel] 
Assalamu'alaikum Wr Wb.

Kepada para master dan segenap anggota milis. Tolong dibantu untuk
modifikasi VBA Code.

VBA code yang ada saat ini hanya bisa memberi warna pada data yang ganda
(duplicate).

Saya ingin menambahkan nomor yang sama dari nilai yang ganda (duplicate)
pada kolom

sebelahnya (lihat lampiran). Ini akan memudahkan dalam melakukan sortir

terhadap data yang ganda tersebut mengingat datanya sangat banyak (ribuan).
Tolong

dimodifikasi VBA code yang ada. Terima kasih



Wassalamu'alaikum Wr Wb.


Duplicate.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

[belajar-excel] Formula hitung berdasarkan rentang cell

2018-03-02 Terurut Topik Rian Sutarsa riansuta...@yahoo.com [belajar-excel] 
assalamualaikum wr. wb. para master BeExcel mohon solusinya. saya dapat 
kasuscontoh soal di cell A1:A1000 berisikan nilai2 yang tak beraturan (tidak 
sama).nah di cell B15, B30, B45 dst. saya ingin mendapatkan nilai dari sum 
range A1:A15, A16:A30, A31:A45 dst.
bisa saja manual, hanya saja datanya terlalu banyak. mohon pencerahannya 
master. terimakasih.wassalam