Selasa, 27 September 2011

[belajar-excel] Digest Number 1338

Messages In This Digest (14 Messages)

Messages

1a.

Re: FW: [?? Probable Spam] Re: [belajar-excel] Formula terbilang

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Mon Sep 26, 2011 2:39 pm (PDT)



Pak AgusR melanjutkan diskusi setelah kata posting terakhir* lewat 1 bulan
lebih*
dan yg ditanyakan adalah hal yg waktu itu SUDAH diberikan (=terbilang 15
digit)
Bahkan waktu itu pun (20 aug 2011) sudah mengatakan 'kasus di-tup-tup'

dipersilahan pak Agus melihat-lihat inboxnya dulu, membuka-buka kasus yg
sudah di-tup-tup itu, jika tidak tersimpan kiriman workbook yg
berkemampuan
fungsi terbilang 15 digit, silakan kontaks lagi ke ke milis, mengenai kasus
yg
sudah di-tup-tup tsb..
membuka kasus yg sudah di-tup-tup boleh kok.., :D

tks
~siti

'-------
a Little Talk about Date and Time <http://www.box.net/shared/8t3nlnxrjv>
'-------
terbilang15digit <http://www.box.net/shared/9jie55yi0v>
'-------

2011/9/26 Agus Ramiyanto <aramiyanto@gmail.com>

> **
>
> Para master, *tolong dong sekalian *terbilangnya untuk yang 12 digit.
> Thanx b4****
>
> AgusR
>
> ** **
>
> From: belajar-excel@yahoogroups.com On Behalf Of Eka Subyantara
> Sent: Saturday, August 20, 2011 15:15
> To: belajar-excel@yahoogroups.com
> Subject: Re: FW: [?? Probable Spam] Re: [belajar-excel] Formula terbilang
> Hwarakadah..., jangan ditutup dulu ya pak!. Kan Ane dah cape-cape bikinin
> sampil ngabuburit :-)
>
> Silakan dinikmati yaa ...
>
> Selamat berpuasa buat yang melaksanakannya
> = eka =
> @ Pok Siti: Jangan marah ya ane nyalip di belakang (ah! nyalip koq di
> belakang! dompleng tenar kalee...)
>
>
1b.

Re: FW: [?? Probable Spam] Re: [belajar-excel] Formula terbilang

Posted by: "Agus Ramiyanto" aramiyanto@gmail.com

Mon Sep 26, 2011 7:46 pm (PDT)



Okey, Tks, ternyata sdh ada.

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of STDEV(i)
Sent: Tuesday, September 27, 2011 05:39
To: belajar-excel@yahoogroups.com
Subject: Re: FW: [?? Probable Spam] Re: [belajar-excel] Formula terbilang

Pak AgusR melanjutkan diskusi setelah kata posting terakhir lewat 1 bulan lebih

dan yg ditanyakan adalah hal yg waktu itu SUDAH diberikan (=terbilang 15 digit)

Bahkan waktu itu pun (20 aug 2011) sudah mengatakan 'kasus di-tup-tup'

dipersilahan pak Agus melihat-lihat inboxnya dulu, membuka-buka kasus yg

sudah di-tup-tup itu, jika tidak tersimpan kiriman workbook yg berkemampuan

fungsi terbilang 15 digit, silakan kontaks lagi ke ke milis, mengenai kasus yg

sudah di-tup-tup tsb..

membuka kasus yg sudah di-tup-tup boleh kok.., :D

tks

~siti

'-------

a Little Talk about Date and Time <http://www.box.net/shared/8t3nlnxrjv>

'-------

<http://www.box.net/shared/9jie55yi0v> terbilang15digit
'-------

2011/9/26 Agus Ramiyanto <aramiyanto@gmail.com>

Para master, tolong dong sekalian terbilangnya untuk yang 12 digit. Thanx b4

AgusR

From: belajar-excel@yahoogroups.com On Behalf Of Eka Subyantara
Sent: Saturday, August 20, 2011 15:15
To: belajar-excel@yahoogroups.com
Subject: Re: FW: [?? Probable Spam] Re: [belajar-excel] Formula terbilang
Hwarakadah..., jangan ditutup dulu ya pak!. Kan Ane dah cape-cape bikinin sampil ngabuburit :-)

Silakan dinikmati yaa ...

Selamat berpuasa buat yang melaksanakannya
= eka =
@ Pok Siti: Jangan marah ya ane nyalip di belakang (ah! nyalip koq di belakang! dompleng tenar kalee...)

2a.

Meng hide row yang tidak perlu

Posted by: "Yusril Ramadani" yusrilramadani@gmail.com   yusril_rmd

Mon Sep 26, 2011 6:47 pm (PDT)



Dear Para pakar

mohon bantuannya untuk case terlampir
bagaimana dengan macro menghide row yang tidak diperlukan

terima kasih sebelumnya

Salam YR
2b.

Re: Meng hide row yang tidak perlu

Posted by: "Franciscus SOG" jclugbu@gmail.com   elijah_spirit

Mon Sep 26, 2011 7:25 pm (PDT)



Dear Yusril,

Semoga bermanfaat.

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Rows("7:22").EntireRow.Hidden = True
Else
Rows("7:22").EntireRow.Hidden = False
End If
End Sub

Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
Rows("26:41").EntireRow.Hidden = True
Else
Rows("26:41").EntireRow.Hidden = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then
Rows("44:59").EntireRow.Hidden = True
Else
Rows("44:59").EntireRow.Hidden = False
End If
End Sub

Blessings,

Fran'z

On 9/27/11, Yusril Ramadani <yusrilramadani@gmail.com> wrote:
> Dear Para pakar
>
> mohon bantuannya untuk case terlampir
> bagaimana dengan macro menghide row yang tidak diperlukan
>
>
>
>
> terima kasih sebelumnya
>
> Salam YR
>
2c.

Re: Meng hide row yang tidak perlu

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Mon Sep 26, 2011 7:26 pm (PDT)



agar mudah, tiap tabel diberi NAME

Private Sub Chk_Tabel1_Click()
ShowHideRange
End Sub
Private Sub Chk_Tabel2_Click()
ShowHideRange
End Sub
Private Sub Chk_Tabel3_Click()
ShowHideRange
End Sub

Private Sub ShowHideRange()
Range("A7:A60").EntireRow.Hidden = False
If Not Chk_Tabel1 Then Application.Range("Tabel1").EntireRow.Hidden =
True
If Not Chk_Tabel2 Then Application.Range("Tabel2").EntireRow.Hidden =
True
If Not Chk_Tabel3 Then Application.Range("Tabel3").EntireRow.Hidden =
True
End Sub

cmiiw
~siti

2011/9/27 Yusril Ramadani <yusrilramadani@gmail.com>

> **
>
> Dear Para pakar
> mohon bantuannya untuk case terlampir
> bagaimana dengan macro menghide row yang tidak diperlukan
> terima kasih sebelumnya
> Salam YR
>
2d.

Re: Meng hide row yang tidak perlu

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Mon Sep 26, 2011 7:53 pm (PDT)



Andaikan tabel disusun horisontal (jejer-jejer ada banyak tabel), maka
jumlah baris tidak berpengaruh terhadap script.
Seperti demikian bunyinya : *(syarat dan ketentuan berlaku)*
Private Sub chk1_Click()
Columns("f:i").EntireColumn.Hidden = (Not chk1.Value)
End Sub

Ternyata tabelnya disusun berurutan vertikal, dan contohnya dengan jumlah
baris data yang tetap. Sepertinya kenyataannya jumlah baris tiap tabel
berbeda-beda.
Kira-kira bunyinya seperti ini : *(syarat dan ketentuan berlaku)*
Private Sub HideTabelKu(sNamaTabel As String, bChkValue As Boolean)
Dim rng As Range
Dim lRows As Long

Set rng = Range("b:b").Find(sNamaTabel).CurrentRegion

'ada 2 baris kosong setelah tabel, yaitu penutup tabel (berder bottom)
dan jarak antar tabel
lRows = rng.Rows.Count + 2

'hide tabel
rng.Resize(lRows).EntireRow.Hidden = bChkValue
End Sub

Regards.
Kid.

2011/9/27 Yusril Ramadani <yusrilramadani@gmail.com>

> **
>
>
> Dear Para pakar
>
> mohon bantuannya untuk case terlampir
> bagaimana dengan macro menghide row yang tidak diperlukan
>
>
>
>
> terima kasih sebelumnya
>
> Salam YR
>
>
>
3a.

Simulasi penjumlahan

Posted by: ""imar"" imar.ap@gmail.com   baz.giglo

Mon Sep 26, 2011 9:47 pm (PDT)



Dear rekan2,
mohon bantuannya,
Masalah ke 1:
saya mempunyai file simulasi cash flow, bagaimana formulanya jika cash-out per 2 hr, per 3 hr dst.
Masalah ke 2:
jika saya menggunakan formula (="pembayaran per "&C2&" hari"), dapatkah nilai/teks C2 di hasil nya mempunyai warna yang berbeda?

- i m a r -
3b.

Re: Simulasi penjumlahan

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Mon Sep 26, 2011 10:19 pm (PDT)



mungkin begini

=IF($A$1, IF(MOD(COLUMN(),2)=1,$A$2*2,""), IF(MOD(COLUMN(),3)=2,$A$2*3, "")
)

ditulis di cell A11 dan ditularkan ke cells kanannya sejauh yg di-inginkan

2011/9/27 "imar" <imar.ap@gmail.com>

> **
>
>
> Dear rekan2,
> mohon bantuannya,
> Masalah ke 1:
> saya mempunyai file simulasi cash flow, bagaimana formulanya jika cash-out
> per 2 hr, per 3 hr dst.
> Masalah ke 2:
> jika saya menggunakan formula (="pembayaran per "&C2&" hari"), dapatkah
> nilai/teks C2 di hasil nya mempunyai warna yang berbeda?
>
> - i m a r -
>
>
3c.

Re: Simulasi penjumlahan

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Mon Sep 26, 2011 10:41 pm (PDT)



*oops salah ...*

harusnya:

=IF($A$1,
IF(MOD(COLUMN(),2)=*1*,$A$2*2,""),
IF(MOD(COLUMN(),3)=*1*,$A$2*3,""))

maap...
pada file lampiran sudah ditambahkan conditional formatting sekedarnya..

2011/9/27 STDEV(i) <setiyowati.devi@gmail.com>

> mungkin begini
>
> =IF($A$1, IF(MOD(COLUMN(),2)=*1*,$A$2*2,""), IF(MOD(COLUMN(),3)=*2*,$A$2*3,
> "") )
>
> ditulis di cell A11 dan ditularkan ke cells kanannya sejauh yg di-inginkan
>
>
> 2011/9/27 "imar" <imar.ap@gmail.com>
>
>> **
>>
>> Dear rekan2,
>> mohon bantuannya,
>> Masalah ke 1:
>> saya mempunyai file simulasi cash flow, bagaimana formulanya jika cash-out
>> per 2 hr, per 3 hr dst.
>> Masalah ke 2:
>> jika saya menggunakan formula (="pembayaran per "&C2&" hari"), dapatkah
>> nilai/teks C2 di hasil nya mempunyai warna yang berbeda?
>>
>> - i m a r -
>>
>
3d.

Re: Simulasi penjumlahan

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Mon Sep 26, 2011 10:41 pm (PDT)



Masalah ke-1 :
Coba formula :
=IF((MOD(COUNT($B$10:B$10),3-$B$1)<>1)+(COUNT(B$10:$J$10)<3-$B$1),"",$B$2*(3-$B$1))
copy ke cell lainnya.
Untuk membuat blok warna, gunakan conditional formatting.
File terlampir bisa menampilkan hasil conditional formatting yang berbeda
ketika dibuka dengan xl2003.

Masalah ke-2 :
Sepertinya tidak memungkinkan.

Regards.
Kid.

2011/9/27 "imar" <imar.ap@gmail.com>

> **
>
>
> Dear rekan2,
> mohon bantuannya,
> Masalah ke 1:
> saya mempunyai file simulasi cash flow, bagaimana formulanya jika cash-out
> per 2 hr, per 3 hr dst.
> Masalah ke 2:
> jika saya menggunakan formula (=�pembayaran per �&C2&� hari�), dapatkah
> nilai/teks C2 di hasil nya mempunyai warna yang berbeda?
>
> - i m a r -
>
>
>
4a.

Apa Kode Macro Untuk Menjumlah Kelompok Data

Posted by: "Adhi" adhi.tax.dk3@gmail.com

Mon Sep 26, 2011 11:34 pm (PDT)



Wahai para suhu excel, kasih pencerahan dong pada kasusku ini..


= Adhi =

--- Mods ---
Menceritakan kasus dengan detil dan terstruktur akan memudahkan BeExceler ikut urun solusi. Mohon dibiasakan ada data, proses yang dilakukan, contoh hasil yang diinginkan.
------------
4b.

Re: Apa Kode Macro Untuk Menjumlah Kelompok Data

Posted by: "jkssxls Sudarsono" jkssxls@hotmail.com   jkssbma

Tue Sep 27, 2011 1:17 am (PDT)




Sub BuatSubTotal()
Sheets("Sheet1").Select
'remove/hapus
Range("a1").Select
Selection.CurrentRegion.Select
Selection.RemoveSubtotal
' create/buat
Range("a1").Select
Selection.CurrentRegion.Select
Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(3), _
Replace:=True, PageBreaks:=False, SummaryBelowData:=TrueEnd Sub

> To: belajar-excel@yahoogroups.com
> From: adhi.tax.dk3@gmail.com
> Date: Tue, 27 Sep 2011 13:29:39 +0700
> Subject: [belajar-excel] Apa Kode Macro Untuk Menjumlah Kelompok Data
>
> Wahai para suhu excel, kasih pencerahan dong pada kasusku ini..
>
> 
> = Adhi =
>
>
> --- Mods ---
> Menceritakan kasus dengan detil dan terstruktur akan memudahkan BeExceler ikut urun solusi. Mohon dibiasakan ada data, proses yang dilakukan, contoh hasil yang diinginkan.
> ------------
4c.

Re: Apa Kode Macro Untuk Menjumlah Kelompok Data

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Tue Sep 27, 2011 1:55 am (PDT)



Coba gunakan tabel normal lalu dibuat pivot tablenya. Sedikit berbeda
tampilannya, tetapi tidak butuh VBA dan lebih cepat.

Kid.

2011/9/27 Adhi <adhi.tax.dk3@gmail.com>

> Wahai para suhu excel, kasih pencerahan dong pada kasusku ini..
>
> 
> = Adhi =
>
>
> --- Mods ---
> Menceritakan kasus dengan detil dan terstruktur akan memudahkan BeExceler
> ikut urun solusi. Mohon dibiasakan ada data, proses yang dilakukan, contoh
> hasil yang diinginkan.
> ------------
5.

Dynamic range otomatis te-sort

Posted by: ""imar"" imar.ap@gmail.com   baz.giglo

Tue Sep 27, 2011 8:16 am (PDT)



Dear rekan2
1. bagaimana data baru dalam dynamic range otomatis ter sortir (sheet lists)
2. Menambah data baru dalam dynamic range (sheet lists) dari range data validasi (sheet data validation)

-- Mods --
Coba sempatkan juga lihat-lihat atau cari di kasus terdahulu yang pernah masuk ke milis.

Coba jalan-jalan ke http://tech.groups.yahoo.com/group/belajar-excel/messages
kemudian search dengan key data validation
-----------
Recent Activity
Visit Your Group
Yahoo! Groups

Mental Health Zone

Mental Health

Learn More

Yahoo! Groups

Parenting Zone

Tips for a happy,

healthy home

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

Tidak ada komentar:

Posting Komentar