Minggu, 24 Juni 2012

[belajar-excel] Digest Number 1665

Milis Belajar Microsoft Excel

Messages In This Digest (6 Messages)

1a.
Re: Form Login From: Rara Wilis
2a.
Dynamic Range Accumaltive Summary From: zainul_ulum[at]yahoo[dot]com
2b.
Re: Dynamic Range Accumaltive Summary From: Kid Mr.
2c.
Re: Dynamic Range Accumaltive Summary From: zainul_ulum[at]yahoo[dot]com
2d.
Re: Dynamic Range Accumaltive Summary From: Kid Mr.
2e.
Re: Dynamic Range Accumaltive Summary From: zainul_ulum[at]yahoo[dot]com

Messages

1a.

Re: Form Login

Posted by: "Rara Wilis" ra2wilis@gmail.com   rr_wilis

Sat Jun 23, 2012 7:45 pm (PDT)



Maaf baru terbaca Minggu pagi ini...

Mohon di buka module *"FrmLogin"*
di sana ada prosedur sbb, di situlah (dengan IF) diatur berdasarkan status
(hak Sheet):
(1) apakah harus membuka satu sheet khusus
(2) atau kah membuka semua sheet yg ada (kecuali sheet USER & FACE)

data di sheet user ada yg disembunyikan dengan custom number format tak
terlihat (;;;)
Bapak bisa mencoba : men-Select / mem-Blok semua cells di sheet tsb
kemudian berikan format General.

di dalam makro tsb untuk membandingkan Input Login dengan data yg ada
secara langsung
tentu tidak akan ada yg cocok, karena data di - enkrip
Sebab itulah dlm prosedur di bawah ini pembandingan harus sambil
meng-Dekrip data yg ada
Caranya seperti yg telah dijelaskan Oom Kid. (dan sekarang jelas terlihat
di codingnya)

Private Sub SheetToOpen(vUserNm)
Dim sht As String, DafSht As Range, s As Byte, cel As Range
vUserNm = LCase(vUserNm)
With Sheets("User")
sht = .Range("E" & .Range("i2")).Value
If sht = Krip("*All*", True) Then
Set DafSht = Range(.Range("E4"), .Range("E4").End(xlDown))
For Each cel In DafSht
If cel.Value <> Krip("*All*", True) And cel.Value <> "" Then
sht = Krip(cel.Value, False)
*Sheets(sht).Visible = -1*
End If
Next cel
Else ' (kalau hak sheet = bukan "All"
sht = Krip(sht, False)
Sheets(sht).Visible = -1
Sheets(sht).Activate
Sheets("Face").Visible = 0
Sheets("User").Visible = 2
End If
End With
Unload Me
frmMainMenu.Hide
End Sub

catatan gak penting: nilai visibility sebuah sheet di VBA selain dengan
enum constants yg telah disediakan
-1 = visible
0 = hidden
2 = veryhidden

~Rara

*2012/6/24 Flow Nanank <flow.nanank@yahoo.co.id>
*
>
> * *
> *Trimakasih mbak Rara,,,
> maksud saya code yg berada didalam form login yg di buat mbak Siti,,,*
> *code yg menentukan user boss bisa melihat semua Sheets, saya coba cari2
> kog tidak ketemu,,*
> *saya mencoba menulis kembali code tsb karna ada penambahan2 lagi,,,*
>
> ------------------------------
> *Dari:* Rara Wilis <ra2wilis@gmail.com>
> *Dikirim:* Sabtu, 23 Juni 2012 17:03
> mbak siti lagi bobok manis, proses recovery, semoga lekas sehat
> kembali...
>
> Kita usahakan menjawab:
> Prinsipnya karena boss punya *status ALL*
> Kemudian ada pencabangan (dengan IF)
>
> *IF Status = "ALL" Then*
> * '--- unhide semua sheets*
> *ELSE*
> *'--- unhide sheet khusus si Loger*
> *END IF*
>
> begitulah kira-kira... Rara..ra
>
>
2a.

Dynamic Range Accumaltive Summary

Posted by: "zainul_ulum[at]yahoo[dot]com" zainul_ulum@yahoo.com   zainul_ulum

Sat Jun 23, 2012 9:17 pm (PDT)



Teman-teman be-excelers

Saya sedang membuat grafik yang menunjukkan accumulative plan vs
accumulative actual.
Biasanya untuk series accumulative saya membuat cell bantu.

Rencananya akan dibuat tanpa cell bantu dengan menggunakan dynamic range.
Range dynamic sudah dibuat, kenapa masih error?

Bagaimana caranya agar tidak error?

Maturnuwun
-zainul-
2b.

Re: Dynamic Range Accumaltive Summary

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

Sat Jun 23, 2012 9:37 pm (PDT)



Coba nama range untuk running total plan merujuk ke formula :
=SUBTOTAL(109,OFFSET($A$2,0,1,1,COLUMN($B$2:$J$2)-COLUMN($A$2)))

Kemudian pada chart, klik series jika sudah ada. Pada formula bar ada
fungsi seriesnya yang kira-kira bunyinya :
=Series( "nama seriesnya" ,, [nama filenya]!nama_rangenya,
nomor_indeks_seriesnya )

Wassalam,
Kid.

2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>

> **
>
>
> Teman-teman be-excelers
>
> Saya sedang membuat grafik yang menunjukkan accumulative plan vs
> accumulative actual.
> Biasanya untuk series accumulative saya membuat cell bantu.
>
> Rencananya akan dibuat tanpa cell bantu dengan menggunakan dynamic range.
> Range dynamic sudah dibuat, kenapa masih error?
>
> Bagaimana caranya agar tidak error?
>
> Maturnuwun
> -zainul-
>
>
2c.

Re: Dynamic Range Accumaltive Summary

Posted by: "zainul_ulum[at]yahoo[dot]com" zainul_ulum@yahoo.com   zainul_ulum

Sat Jun 23, 2012 9:45 pm (PDT)



Maturnuwun mas.

Suda berhasil.

Kenapa kalo pakai fungsi
=SUM(OFFSET(_Plan,,,,TRANSPOSE(ROW(INDIRECT("1:"&_nData)))))

Tidak bisa ya.?

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Kid Mr.
Sent: Sunday, June 24, 2012 11:37 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Dynamic Range Accumaltive Summary

Coba nama range untuk running total plan merujuk ke formula :
=SUBTOTAL(109,OFFSET($A$2,0,1,1,COLUMN($B$2:$J$2)-COLUMN($A$2)))

Kemudian pada chart, klik series jika sudah ada. Pada formula bar ada fungsi
seriesnya yang kira-kira bunyinya :
=Series( "nama seriesnya" ,, [nama filenya]!nama_rangenya,
nomor_indeks_seriesnya )

Wassalam,
Kid.

2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>

Teman-teman be-excelers

Saya sedang membuat grafik yang menunjukkan accumulative plan vs
accumulative actual.
Biasanya untuk series accumulative saya membuat cell bantu.

Rencananya akan dibuat tanpa cell bantu dengan menggunakan dynamic range.
Range dynamic sudah dibuat, kenapa masih error?

Bagaimana caranya agar tidak error?

Maturnuwun
-zainul-

2d.

Re: Dynamic Range Accumaltive Summary

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

Sat Jun 23, 2012 9:55 pm (PDT)



Karena Sum adalah fungsi agregat saja. Jadi hasilnya pasti hanya 1 item
SubTotal adalah fungsi agregat dalam sebuah grup. Jadi hasilnya bisa
tergantung grup.
Fungsi Offset dalam fungsi SubTotal tadi, berfungsi untk membentuk grupnya.

Jadi, akan tercipta grup 1 berisi 1 cell, grup 2 berisi 2 cell, dst, yang
masing-maisng grup akan di Sum (kode 109) oleh SubTotal

Wassalam,
Kid.

2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>

> **
>
>
> Maturnuwun mas.****
>
> Suda berhasil.****
>
> ** **
>
> Kenapa kalo pakai fungsi
> =SUM(OFFSET(_Plan,,,,TRANSPOSE(ROW(INDIRECT("1:"&_nData)))))****
>
> Tidak bisa ya…?****
>
> ** **
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com] *On Behalf Of *Kid Mr.
> *Sent:* Sunday, June 24, 2012 11:37 AM
> *To:* belajar-excel@yahoogroups.com
> *Subject:* Re: [belajar-excel] Dynamic Range Accumaltive Summary****
>
> ** **
>
> ****
>
> Coba nama range untuk running total plan merujuk ke formula :
> =SUBTOTAL(109,OFFSET($A$2,0,1,1,COLUMN($B$2:$J$2)-COLUMN($A$2)))
>
> Kemudian pada chart, klik series jika sudah ada. Pada formula bar ada
> fungsi seriesnya yang kira-kira bunyinya :
> =Series( "nama seriesnya" ,, [nama filenya]!nama_rangenya,
> nomor_indeks_seriesnya )
>
> Wassalam,
> Kid.****
>
> 2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>****
>
> ****
>
> Teman-teman be-excelers
>
> Saya sedang membuat grafik yang menunjukkan accumulative plan vs
> accumulative actual.
> Biasanya untuk series accumulative saya membuat cell bantu.
>
> Rencananya akan dibuat tanpa cell bantu dengan menggunakan dynamic range.
> Range dynamic sudah dibuat, kenapa masih error?
>
> Bagaimana caranya agar tidak error?
>
> Maturnuwun
> -zainul-****
>
> ** **
>
> ****
>
>
>
2e.

Re: Dynamic Range Accumaltive Summary

Posted by: "zainul_ulum[at]yahoo[dot]com" zainul_ulum@yahoo.com   zainul_ulum

Sat Jun 23, 2012 10:07 pm (PDT)



Ok mas.

Maturnuwun

-zainul-

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Kid Mr.
Sent: Sunday, June 24, 2012 11:55 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Dynamic Range Accumaltive Summary

Karena Sum adalah fungsi agregat saja. Jadi hasilnya pasti hanya 1 item
SubTotal adalah fungsi agregat dalam sebuah grup. Jadi hasilnya bisa
tergantung grup.
Fungsi Offset dalam fungsi SubTotal tadi, berfungsi untk membentuk grupnya.

Jadi, akan tercipta grup 1 berisi 1 cell, grup 2 berisi 2 cell, dst, yang
masing-maisng grup akan di Sum (kode 109) oleh SubTotal

Wassalam,
Kid.

2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>

Maturnuwun mas.

Suda berhasil.

Kenapa kalo pakai fungsi
=SUM(OFFSET(_Plan,,,,TRANSPOSE(ROW(INDIRECT("1:"&_nData)))))

Tidak bisa ya.?

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Kid Mr.
Sent: Sunday, June 24, 2012 11:37 AM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Dynamic Range Accumaltive Summary

Coba nama range untuk running total plan merujuk ke formula :
=SUBTOTAL(109,OFFSET($A$2,0,1,1,COLUMN($B$2:$J$2)-COLUMN($A$2)))

Kemudian pada chart, klik series jika sudah ada. Pada formula bar ada fungsi
seriesnya yang kira-kira bunyinya :
=Series( "nama seriesnya" ,, [nama filenya]!nama_rangenya,
nomor_indeks_seriesnya )

Wassalam,
Kid.

2012/6/24 zainul_ulum[at]yahoo[dot]com <zainul_ulum@yahoo.com>

Teman-teman be-excelers

Saya sedang membuat grafik yang menunjukkan accumulative plan vs
accumulative actual.
Biasanya untuk series accumulative saya membuat cell bantu.

Rencananya akan dibuat tanpa cell bantu dengan menggunakan dynamic range.
Range dynamic sudah dibuat, kenapa masih error?

Bagaimana caranya agar tidak error?

Maturnuwun
-zainul-

Recent Activity
Visit Your Group
Yahoo! Groups

Parenting Zone

Tips for family,

kids and living

Yahoo! Groups

Small Business Group

A community for

small business owners

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
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar