Messages In This Digest (25 Messages)
- 1a.
- [Belajar Excel] Fungsi Navigasi pake Macro From: MAMUDA PONTIM
- 1b.
- Re: [Belajar Excel] Fungsi Navigasi pake Macro From: Franciscus SOG
- 1c.
- Re: [Belajar Excel] Fungsi Navigasi pake Macro From: Mr. Kid
- 1d.
- Re: [Belajar Excel] Fungsi Navigasi pake Macro From: agung_widodo@sanyo.com
- 2a.
- Tanya fungsi IF dalam pengelompokan data From: Rani Ramayanti
- 2b.
- Re: Tanya fungsi IF dalam pengelompokan data From: Mr. Kid
- 3a.
- menamai range terpilih (name range selected) From: si Nung
- 3b.
- Re: menamai range terpilih (name range selected) From: Mr. Kid
- 3c.
- Re: menamai range terpilih (name range selected) From: si Nung
- 3d.
- Re: menamai range terpilih (name range selected) From: Mr. Kid
- 3e.
- Re: menamai range terpilih (name range selected) From: STDEV(i)
- 4a.
- Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka From: M. Ferdiansyah
- 4b.
- Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka From: si Nung
- 4c.
- Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka From: M. Ferdiansyah
- 5a.
- Re: Rekap absensi dan Jam kerja From: Mr. Kid
- 5b.
- Re: Rekap absensi dan Jam kerja From: makdo marbun
- 6a.
- Bls: [belajar-excel] Penggunaan file excel yang memiliki makro bisa From: subagyo agung
- 7a.
- Data yang sama dihitung 1 From: Rachmad HIDAYAT
- 7b.
- Re: Data yang sama dihitung 1 From: Mr. Kid
- 7c.
- Re: Data yang sama dihitung 1 From: Rachmad HIDAYAT
- 7d.
- Re: Data yang sama dihitung 1 From: Mr. Kid
- 7e.
- Re: Data yang sama dihitung 1 From: STDEV(i)
- 8.
- FW: [belajar-excel] Re: Hitung Jml Bln Penyusutan pke Excel From: Sudarsono Suhenk
- 9a.
- Re: Hitung Jml Bln Penyusutan pke Excel From: Sudarsono Suhenk
- 10a.
- Re: Laporan Akhir Tahun 2011 From: Muh Nuh Haikal
Messages
- 1a.
-
[Belajar Excel] Fungsi Navigasi pake Macro
Posted by: "MAMUDA PONTIM" uud_mamuda@yahoo.com uud_mamuda
Sun Jun 12, 2011 2:14 am (PDT)
Dear Pakar Be-Exceler
langsung to the point.
Misalnya kita punya 5 sheet. Kita mengakses file tesebut berturut-turut sbb:
1. Sheet 3
2. Sheet 4
3. Sheet 1
4. Sheet 5
5. Sheet 2
Jadi sekarang kita berada di Sheet2.
Masalahnya, bagaimana membuat kode macro yang bisa membawa kita kembali ke sheet yang sebelumnya kita akses- Sheet5- (Seperti fungsi BACK pada browser).kemudian ada fungsi lagi untuk kembali ke sheet yang baru diakses atau Sheet2 (Forward, atau apa istilahnya).
Dengan catatan, fungsi Back tadi bisa mengembalikan sampai ke sheet yang pertama kali kita buka (sheet3).
Mohon maaf, kalau kurang dipahami, saya agak kesulitan menjelaskannya. - 1b.
-
Re: [Belajar Excel] Fungsi Navigasi pake Macro
Posted by: "Franciscus SOG" jclugbu@gmail.com elijah_spirit
Sun Jun 12, 2011 3:32 am (PDT)
Dear Mamuda,
Semoga membantu. Berikut cuplikan vba-nya :
Option Explicit
Dim i, posisi As Variant
Sub PosisiSheet()
For i = 1 To Sheets.Count
If Sheets(i).Name = ActiveSheet.Name Then posisi = i
Next i
End Sub
Private Sub cmdBack_Click()
Call PosisiSheet
If posisi = 1 Then
MsgBox "Tidak ada lagi sheets sebelum ini", vbExclamation, "Inform.."
Else
Sheets(posisi - 1).Activate
End If
End Sub
Private Sub cmdNext_Click()
Call PosisiSheet
If posisi = Sheets.Count Then
MsgBox "Tidak ada lagi sheets sesudah ini", vbExclamation, "Inform.."
Else
Sheets(posisi + 1).Activate
End If
End Sub
CMIIW
Blessings,
Fran'z
On 6/12/11, MAMUDA PONTIM <uud_mamuda@yahoo.com > wrote:
> Dear Pakar Be-Exceler
> langsung to the point.
> Misalnya kita punya 5 sheet. Kita mengakses file tesebut berturut-turut sbb:
> 1. Sheet 3
> 2. Sheet 4
> 3. Sheet 1
> 4. Sheet 5
> 5. Sheet 2
> Jadi sekarang kita berada di Sheet2.
> Masalahnya, bagaimana membuat kode macro yang bisa membawa kita kembali ke
> sheet yang sebelumnya kita akses- Sheet5- (Seperti fungsi BACK pada
> browser).kemudian ada fungsi lagi untuk kembali ke sheet yang baru diakses
> atau Sheet2 (Forward, atau apa istilahnya).
> Dengan catatan, fungsi Back tadi bisa mengembalikan sampai ke sheet yang
> pertama kali kita buka (sheet3).
> Mohon maaf, kalau kurang dipahami, saya agak kesulitan menjelaskannya.
- 1c.
-
Re: [Belajar Excel] Fungsi Navigasi pake Macro
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 3:50 pm (PDT)
Dear Mamuda,
File terlampir belum menyertakan adanya perubahan jumlah sheet akibat proses
delete sheet atau move ke workbook lain.
Masing-masing sheet memiliki 4 tombol, yaitu << >> Back Forward
Tombol << dan >> untuk navigasi sheet mengikuti index sheet dalam workbook.
Tombol Back dan Forward untuk navigasi sheet yang pernah diaktifkan saja.
Pengujian dan pengembangan lebih lanjut dibutuhkan agar sesuai kebutuhan.
Prosedur untuk navigasi mengikuti index sheet dalam workbook adalah :
Public Sub PindahSheetIndex(lArah As Long)
Dim lIdx As Long
lIdx = ActiveSheet.Index
If lIdx = Worksheets.Count Then
If lArah > 0 Then
MsgBox "Tidak ada sheet lagi setelah ini.", vbExclamation,
"Mentok"
Exit Sub
End If
ElseIf lIdx = 1 Then
If lArah < 0 Then
MsgBox "Tidak ada sheet lagi sebelum ini.", vbExclamation,
"Mentok"
Exit Sub
End If
End If
Worksheets(lIdx + lArah).Activate
End Sub
Dengan event click pada tombol << adalah :
Private Sub CommandButton1_Click()
PindahSheetIndex -1
End Sub
dan event click pada tombol >> adalah :
Private Sub CommandButton2_Click()
PindahSheetIndex 1
End Sub
Untuk navigasi pada sheet yang pernah diaktifkan saja, membutuhkan variabel
:
sShtIdx sebagai penyimpan nama-nama sheet yang pernah diaktifkan
lCurSht sebagai penyimpan posisi nama sheet yang pernah diaktifkan yang
sedang aktif
bUpdate sebagai status ijin update nama-nama sheet yang pernah diaktifkan
Proses navigasi menggunakan prosedur :
Public Sub PindahSheetByList(lArah As Long)
Dim sIdx() As String
Dim lIdx As Long
If lCurSht < 1 Then
lCurSht = 1
sShtIdx = ActiveSheet.Name & ";"
End If
sIdx = Split(sShtIdx, ";")
lIdx = UBound(sIdx)
If lCurSht = 1 Then
If lArah < 0 Then
MsgBox "Sheet ini yang pertama kali diaktifkan.", vbExclamation,
"Mentok"
Exit Sub
End If
End If
If lCurSht = lIdx Then
If lArah > 0 Then
MsgBox "Sheet ini yang diaktifkan terakhir kali.",
vbExclamation, "Mentok"
Exit Sub
End If
End If
lCurSht = lCurSht + lArah
bUpdate = True
Worksheets(sIdx(lCurSht - 1)).Activate
'batasi jumlah sheet dalam list yang telah diaktifkan, bisa ditambahkan
disini
End Sub
Dengan event click pada tombol Back adalah :
Private Sub CommandButton3_Click()
PindahSheetByList -1
End Sub
dan event click pada tombol Forward adalah :
Private Sub CommandButton4_Click()
PindahSheetByList 1
End Sub
Proses navigasi pada sheet yang pernah diaktifkan juga membutuhkan
inisialisasi pertama pada event workbook open berupa :
Private Sub Workbook_Open()
sShtIdx = ActiveSheet.Name & ";"
lCurSht = 1
End Sub
dan proses update nama-nama sheet dalam daftar pada event workbook sheet
activate berupa :
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim sIdx() As String
If Not bUpdate Then
sShtIdx = sShtIdx & Sh.Name & ";"
sIdx = Split(sShtIdx, ";")
lCurSht = UBound(sIdx)
Else
bUpdate = False
End If
End Sub
Silakan dikembangkan dan dikoreksi jika masih terdapat error.
Regard,
Kid.
2011/6/12 MAMUDA PONTIM <uud_mamuda@yahoo.com >
>
>
> Dear Pakar Be-Exceler
> langsung to the point.
> Misalnya kita punya 5 sheet. Kita mengakses file tesebut berturut-turut
> sbb:
> 1. Sheet 3
> 2. Sheet 4
> 3. Sheet 1
> 4. Sheet 5
> 5. Sheet 2
> Jadi sekarang kita berada di Sheet2.
> Masalahnya, bagaimana membuat kode macro yang bisa membawa kita kembali ke
> sheet yang sebelumnya kita akses- Sheet5- (Seperti fungsi BACK pada
> browser).kemudian ada fungsi lagi untuk kembali ke sheet yang baru diakses
> atau Sheet2 (Forward, atau apa istilahnya).
> Dengan catatan, fungsi Back tadi bisa mengembalikan sampai ke sheet yang
> pertama kali kita buka (sheet3).
> Mohon maaf, kalau kurang dipahami, saya agak kesulitan menjelaskannya.
>
>
>
>
- 1d.
-
Re: [Belajar Excel] Fungsi Navigasi pake Macro
Posted by: "agung_widodo@sanyo.com" agung_widodo@sanyo.com
Sun Jun 12, 2011 8:33 pm (PDT)
Ada pilihan lain yang ditawarkan oleh Excel yang excellent,
Tidak sekedar Back to last location,
Namun ke lokasi lain yang pernah kita klik.
Namanya Add Watch,
Lokasinya Ada di klik kanan Mouse.
Menurut saya fungsi ini lebih keren dibanding tombol Back pada browser yang bersifat serial
Add Watch bisa bersifat parallel ke lokasi manapun yang pernah kita Addwatchkan, Meski di Workbook lain sekalipun
Salam
Agung Widodo
_____________________ _________ __
From: belajar-excel@yahoogroups. [mailto:belajar-excel@com yahoogroups. ] On Behalf Of MAMUDA PONTIMcom
Sent: Sunday, June 12, 2011 4:14 PM
To: belajar-excel@yahoogroups. com
Subject: [belajar-excel] [Belajar Excel] Fungsi Navigasi pake Macro
Dear Pakar Be-Exceler
langsung to the point.
Misalnya kita punya 5 sheet. Kita mengakses file tesebut berturut-turut sbb:
1. Sheet 3
2. Sheet 4
3. Sheet 1
4. Sheet 5
5. Sheet 2
Jadi sekarang kita berada di Sheet2.
Masalahnya, bagaimana membuat kode macro yang bisa membawa kita kembali ke sheet yang sebelumnya kita akses- Sheet5- (Seperti fungsi BACK pada browser).kemudian ada fungsi lagi untuk kembali ke sheet yang baru diakses atau Sheet2 (Forward, atau apa istilahnya).
Dengan catatan, fungsi Back tadi bisa mengembalikan sampai ke sheet yang pertama kali kita buka (sheet3).
Mohon maaf, kalau kurang dipahami, saya agak kesulitan menjelaskannya.
- 2a.
-
Tanya fungsi IF dalam pengelompokan data
Posted by: "Rani Ramayanti" raniramayanti@yahoo.com raniramayanti
Sun Jun 12, 2011 11:31 am (PDT)
Halo mbak Siti, mas Kid dan master Excel lainnya,
Saya mau tanya (lagi) tentang cara mengelompokkan data... *maklum lg stress skripsi >_<"
Kali ini gimana ya caranya menggunakan fungsi IF untuk membagi data jadi 3 kelompok seperti ini:
Under-reaction jika Beta X > 0 dan Beta Y > 0
Over-reaction jika Beta X > 0 dan Beta Y < 0
Reversion jika Beta X < 0 dan Beta Y > 0
Terimakasih atas jawabannya.
Warm regards,
Rani R. - 2b.
-
Re: Tanya fungsi IF dalam pengelompokan data
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 12:36 pm (PDT)
Halo Rani,
Semoga skripsinya cepat selesai dengan baik.
Dari kriteria :
Under-reaction jika Beta X > 0 dan Beta Y > 0
Over-reaction jika Beta X > 0 dan Beta Y < 0
Reversion jika Beta X < 0 dan Beta Y > 0
Kondisi X<0 dan Y < 0 tidak ada keterangan, dan pada file terlampir diisi
dengan karakter '?' (ubah formula bila ingin tampilan lain untuk kondisi
ini).
Kondisi X=0 atau X is null maupun Y=0 atau Y is null juga belum ada
keterangan, dan pada file terlampir akan diisi dengan nullstring.
Formula yang digunakan :
=IF(*D2*E2*,IF(*D2>0* ,1*(E2>0) ,IF(*E2>0* ,*-1*,"?" )),"")
Kondisi pertama adalah *D2*E2*.
Jika salah satu dari X atau Y berisi nol atau blank (null dan bukan
nullstring), maka kondisi ini akan menghasilkan 0 yang setara dengan kondisi
FALSE, dan nullstring akan menjadi hasil formula.
Jika keduanya (X dan Y) memiliki isi, maka akan masuk pada kondisi kedua,
yaitu *D2>0*.
Jika hasil cek kondisi adalah TRUE, maka kemungkinan hasil tergantung nilai
E.
Jika nilai E>0 akan disebut Under, sedangkan untuk nilai E<0 akan disebut
Over.
Kedua keadaan ini (Under dan Over) diwakili oleh bagian 1*(E2>0) yang
menghasilkan 1 untuk Under akibat E>0 menghasilkan TRUE dan TRUE * 1 equal
1, dan nilai 0 untuk Over. Pengaturan teks tampilan adalah dengan *format
cell number custom*.
Ketika kondisi *D2>0* menghasilkan FALSE, maka kalkulasi akan berlanjut ke
kondisi ketiga, yaitu bagian *E2>0*
Saat kondisi ini bernilai TRUE, maka kelompoknya adalah Reversion dan diberi
nilai *-1*
Pada kondisi bernilai FALSE, akan terjadi kondisi X<0 dan Y<0 yang belum ada
keterangannya, dan diberi keterangan dengan karakter '?' pada bagian "?"
dalam formula.
Format cell number untuk menampilkan keterangan, sebagai pengganti penulisan
angka 1 (Under), -1 (Reversion), 0 (Over) dilakukan adalah dengan cara :
*Klik kanan* cell -> pilih *Format Cells* -> pilih tab *Number *-> pilih
kategori *Custom *-> ketik pada text box tulisan format number berikut :
*[Blue]"Under-reaction" ;[Red]"Reversion ";[Magenta] "Over-reaction" ;@*
Untuk mempelajari lebih lanjut tentang format *number* bisa ke
sini<http://www.ozgrid.com/Excel/ >CustomFormats. htm
.
Regard,
Kid.
2011/6/13 Rani Ramayanti <raniramayanti@yahoo.com >
>
>
> Halo mbak Siti, mas Kid dan master Excel lainnya,
>
> Saya mau tanya (lagi) tentang cara mengelompokkan data... *maklum lg stress
> skripsi >_<"
> Kali ini gimana ya caranya menggunakan fungsi IF untuk membagi data jadi 3
> kelompok seperti ini:
>
> Under-reaction jika Beta X > 0 dan Beta Y > 0
> Over-reaction jika Beta X > 0 dan Beta Y < 0
> Reversion jika Beta X < 0 dan Beta Y > 0
>
> Terimakasih atas jawabannya.
>
> Warm regards,
> Rani R.
>
>
>
- 3a.
-
menamai range terpilih (name range selected)
Posted by: "si Nung" sinung4milis@yahoo.com.sg sinung4milis
Sun Jun 12, 2011 5:47 pm (PDT)
assalamu'alaikum
mohon pencerahan vba untuk menamai range yg sudah disorot,
karena luasan range ini bervariasi pada tiap sheet serta luasannya tetap (bukan dinamis)
jadi setelah menyorot range tertentu dan hendak menamainya dengan rumusan tertentu (namafile_namasheet)
contoh file rangename.xls (8 KB) terlampir,
dari googling dapat link berikut :
http://www.xtremevbtalk.com/ showthread. php?t=43003
Naming an Excel range,
ada vba sbb :
Range("A1").CurrentRegion. Select
Names.Add Name:="Import", RefersTo:=activecel l.currentrange. Range
namun ketika saya praktekkan masih error (learning by doing sih :))
mohon pencerahan anggota belajar-excel
sebelumnya saya sampaikan terima kasih
wassalamu'alaikum
/*-sig-
"Wisdom and knowledge is everywhere,
but so is stupidity."
Reivan
-sig-*/
- 3b.
-
Re: menamai range terpilih (name range selected)
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 6:35 pm (PDT)
Wa alaikumusalam Wr. Wb.
Misal range yang akan dinamai adalah range C7:J19 di sheet bernama myData.
Nama range yang dikehendaki adalah myRange
Sheets("myData").range(" c7:j19"). name="myRange"
Kid.
2011/6/13 si Nung <sinung4milis@yahoo.com. >sg
>
>
> assalamu'alaikum
>
> mohon pencerahan vba untuk menamai range yg sudah disorot,
> karena luasan range ini bervariasi pada tiap sheet serta luasannya tetap
> (bukan dinamis)
> jadi setelah menyorot range tertentu dan hendak menamainya dengan rumusan
> tertentu (namafile_namasheet)
>
> contoh file rangename.xls (8 KB) terlampir,
>
> dari googling dapat link berikut :
> http://www.xtremevbtalk.com/ showthread. php?t=43003
> Naming an Excel range,
>
> ada vba sbb :
> Range("A1").CurrentRegion. Select
> Names.Add Name:="Import", RefersTo:=activecel l.currentrange. Range
>
> namun ketika saya praktekkan masih error (learning by doing sih :))
> mohon pencerahan anggota belajar-excel
>
> sebelumnya saya sampaikan terima kasih
>
> wassalamu'alaikum
>
> /*-sig-
>
> "Wisdom and knowledge is everywhere,
> but so is stupidity."
>
> Reivan
>
> -sig-*/
>
>
>
- 3c.
-
Re: menamai range terpilih (name range selected)
Posted by: "si Nung" sinung4milis@yahoo.com.sg sinung4milis
Sun Jun 12, 2011 6:57 pm (PDT)
On 13 Jun 2011 at 8:34, Mr. Kid wrote:
> Wa alaikumusalam Wr. Wb.
>
> Misal range yang akan dinamai adalah range C7:J19
> di sheet bernama myData. Nama range yang
> dikehendaki adalah myRange
>
> Sheets("myData").range(" c7:j19"). name="myRange"
trims mr ki(n)d :)
wajib hardcoded ya ?
kemarin coba rekam makro dapat offset offset ya hardcoded juga walau pilih opsi relative cell :(
rencana saya,
buat makro untuk memberi nama secara otomatis, buat tombolnya,
kemudian setelah buka file xls yg berjibun, select rangenya, tekan tombol, jadi deh nama rangenya...
mohon pencerahan kembali :)
> Kid.
>
> 2011/6/13 si Nung <sinung4milis@yahoo.com. >sg
>
> >
> >
> > assalamu'alaikum
> >
> > mohon pencerahan vba untuk menamai range yg sudah disorot,
> > karena luasan range ini bervariasi pada tiap sheet serta luasannya tetap
> > (bukan dinamis)
> > jadi setelah menyorot range tertentu dan hendak menamainya dengan rumusan
> > tertentu (namafile_namasheet)
> >
> > contoh file rangename.xls (8 KB) terlampir,
> >
> > dari googling dapat link berikut :
> > http://www.xtremevbtalk.com/ showthread. php?t=43003
> > Naming an Excel range,
> >
> > ada vba sbb :
> > Range("A1").CurrentRegion. Select
> > Names.Add Name:="Import", RefersTo:=activecel l.currentrange. Range
> >
> > namun ketika saya praktekkan masih error (learning by doing sih :))
> > mohon pencerahan anggota belajar-excel
> >
> > sebelumnya saya sampaikan terima kasih
> >
> > wassalamu'alaikum
/*-sig-
"Wisdom and knowledge is everywhere,
but so is stupidity."
Reivan
-sig-*/
- 3d.
-
Re: menamai range terpilih (name range selected)
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 7:07 pm (PDT)
gak wajib.
Silakan dikembangkan saja.
Misal :
dim rng as range
dim sname as string
on error resume next
set rng=application.inputbox( "Pilih range yang akan dinamai","Input
Range","a1",type:=8
if err.number <> 0 then
err.clear
exit sub
endif
sname=inputbox("Tulis nama range")
if lenb(trim$(sname))<>0 then
sname=replace$("_" & sname," ","_")
endif
rng.name=sname
Kid.
2011/6/13 si Nung <sinung4milis@yahoo.com. >sg
>
>
> On 13 Jun 2011 at 8:34, Mr. Kid wrote:
>
> > Wa alaikumusalam Wr. Wb.
> >
> > Misal range yang akan dinamai adalah range C7:J19
> > di sheet bernama myData. Nama range yang
> > dikehendaki adalah myRange
> >
> > Sheets("myData").range(" c7:j19"). name="myRange"
>
> trims mr ki(n)d :)
>
> wajib hardcoded ya ?
>
> kemarin coba rekam makro dapat offset offset ya hardcoded juga walau pilih
> opsi relative cell :(
>
> rencana saya,
> buat makro untuk memberi nama secara otomatis, buat tombolnya,
> kemudian setelah buka file xls yg berjibun, select rangenya, tekan tombol,
> jadi deh nama rangenya...
>
> mohon pencerahan kembali :)
>
>
> > Kid.
> >
> > 2011/6/13 si Nung <sinung4milis@yahoo.com. >sg
> >
> > >
> > >
> > > assalamu'alaikum
> > >
> > > mohon pencerahan vba untuk menamai range yg sudah disorot,
> > > karena luasan range ini bervariasi pada tiap sheet serta luasannya
> tetap
> > > (bukan dinamis)
> > > jadi setelah menyorot range tertentu dan hendak menamainya dengan
> rumusan
> > > tertentu (namafile_namasheet)
> > >
> > > contoh file rangename.xls (8 KB) terlampir,
> > >
> > > dari googling dapat link berikut :
> > > http://www.xtremevbtalk.com/ showthread. php?t=43003
> > > Naming an Excel range,
> > >
> > > ada vba sbb :
> > > Range("A1").CurrentRegion. Select
> > > Names.Add Name:="Import", RefersTo:=activecel l.currentrange. Range
> > >
> > > namun ketika saya praktekkan masih error (learning by doing sih :))
> > > mohon pencerahan anggota belajar-excel
> > >
> > > sebelumnya saya sampaikan terima kasih
> > >
> > > wassalamu'alaikum
>
> /*-sig-
>
> "Wisdom and knowledge is everywhere,
> but so is stupidity."
>
> Reivan
>
> -sig-*/
>
>
>
- 3e.
-
Re: menamai range terpilih (name range selected)
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Sun Jun 12, 2011 7:15 pm (PDT)
sepertinya tadi sudah di katakan bahwa:
"luasan range ini bervariasi pada tiap sheet serta *luasannya tetap *(bukan
dinamis)"
jadi IMHO, paling cucok ya dibuat hardcoded (konstanta alamat range)
apa gunanya dibuat dinamis kalau sudah tahu BAHWA yg dituju jelas TIDAK
dinamis
Dengan Currentregion, setiap saat luasan rang bisa berubah sesuai keadaan
aktualnya.
CMIIW, mungkin saya belum banyak melihat isi workbook nya
(ini sambil iseng mumpung di dalam angkot... deket pak sopir... )
oiya, OOT dikit ya..
cara si nung menulis posting jawaban = tidak TOP POSTING, menurutku (untuk
milis)
susah diikutinya; kita tidak segera tahu mana kata-kata jawaban dari si
nung...
karena harus baca email yg ditanggapi lebih dulu.. baru ditengahnya ataupun
di bagian
bawahnya: ada jawaban si nung...
saya tahu si nung sudah lebih senior dlm hal bermilis-ria... daripada
kita-kita, makanya
dlm hal ini kit amintakan juga saran2nya.
(coba dilihat di peraturan milis ada himbauan menjawab dengan cara top
posting
(walaupun cara top-posting (untuk keperluan lain) sering dikritik.
-salam-
2011/6/13 si Nung <sinung4milis@yahoo.com. >sg
> On 13 Jun 2011 at 8:34, Mr. Kid wrote:
> > Wa alaikumusalam Wr. Wb.
> > Misal range yang akan dinamai adalah range C7:J19
> > di sheet bernama myData. Nama range yang
> > dikehendaki adalah myRange
> > Sheets("myData").range(" c7:j19"). name="myRange"
>
> trims mr ki(n)d :)
>
> wajib hardcoded ya ?
> kemarin coba rekam makro dapat offset offset ya hardcoded juga walau pilih
> opsi relative cell :(
> rencana saya,
> buat makro untuk memberi nama secara otomatis, buat tombolnya,
> kemudian setelah buka file xls yg berjibun, select rangenya, tekan tombol,
> jadi deh nama rangenya...
>
> mohon pencerahan kembali :)
>
> > Kid.
>
>
>
- 4a.
-
Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka
Posted by: "M. Ferdiansyah" muh_ferdy@pusri.co.id muh_f3rdi4n5yah
Sun Jun 12, 2011 6:00 pm (PDT)
Terimakasih buat bu Nung atas responnya..
Bu Nung menjawab :
1. "trial and error :)
rename F1 menjadi nama apa saja, kemudian "buka semua file selain F1""
--> justru itu yg ingin saya ketahui bu, file2 apa saja yg menggunakan
data dari file F1, soalnya kl mesti dibuka semua, file yg ada lebih dari
40 file dalam 1 folder belum termasuk subfoldernya..
2. "FD = flash disk ?
bila F1 dan F2 dalam satu folder (atau satu subfolder),insya Allah
tetap terkonek (tidak perlu update link)"
--> benar bu FD singkatan dari Flashdisk, troublenya adalah file F1 berada
dalam folder & F2 berada dalam subfolder linknya menjadi error bu..
Mohon pencerahannya kembali.
regard,
Ferdy
> On 11 Jun 2011 at 15:47, M. Ferdiansyah wrote:
>
>> ----- Original Message -----
>> From: M. Ferdiansyah
>> To: milis excel
>> Sent: Friday, June 10, 2011 2:40 PM
>> Subject: [belajar-excel] Mencari file" apa saja yg datanya menggunakan
>> file Sumber Data (link)
>>
>>
>> Dear be-excel,
>>
>> Saya mempunyai 2 buah file, sebut saja F1 (
>> sumber data) & F2 ( sample link ).
>> F1 merupakan kumpulan data yang suatu cellnya
>> digunakan oleh F2, jika kita ingin mengetahui
>> sumber data F2 bisa dengan menggunakan Edit >
>> Edit Link..
>>
>>
>> tetapi yang ingin saya tanyakan :
>>
>> 1. bagaimana jika kita ingin mengetahui data"
>> dari F1 digunakan oleh file apa saja ?
>
> trial and error :)
>
> rename F1 menjadi namaapasaja, kemudian
> buka semua file selain F1
>
>> 2.Jika kita ingin mengkopi filenya menggunakan
>> FD, Apakah link-an nya jadi terganggu (error)
>> jika filenya berada di sub folder ? kl ia
>> bagaimana solusinya ?
>
> FD = flash disk ?
>
> bila F1 dan F2 dalam satu folder (atau satu subfolder),
> insya Allah tetap terkonek (tidak perlu update link)
>
>>
>>
>> Mohon pencerahannya..
>>
>> Regard,
>>
>> Ferdy
>
>
> cmiiw
>
> sinung
>
>
>
>
>
>
>
>
>
> /*-sig-
>
> "Wisdom and knowledge is everywhere,
> but so is stupidity."
>
> Reivan
>
> -sig-*/
>
>
>
>
>
>
>
>
____________ _________ _________ _________ _________ _________ _________
Notice : This e-mail (and any attachment) is strictly confidential and
is intended only for the addressee(s)above. Is strictly prohibited to
forward, print, copy, or otherwise reproduce this message that would
allow it to be viewed by any individual not originally listed as
a recipient(s). If you have received this e-mail in error, please
immediately notify the sender and delete this message. The opinions
expressed in this e-mail (and any attachment) are those of the individual
sender and may not necessarily reflect the views of PT Pusri.
____________ _________ _________ _________ _________ _________ _________
- 4b.
-
Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka
Posted by: "si Nung" sinung4milis@yahoo.com.sg sinung4milis
Sun Jun 12, 2011 6:53 pm (PDT)
On 13 Jun 2011 at 8:00, M. Ferdiansyah wrote:
> Terimakasih buat bu Nung atas responnya..
> Bu Nung menjawab :
>
> 1. "trial and error :)
> rename F1 menjadi nama apa saja, kemudian "buka semua file selain
> F1""
> --> justru itu yg ingin saya ketahui bu, file2
> apa saja yg menggunakan data dari file F1, soalnya
> kl mesti dibuka semua, file yg ada lebih dari 40
> file dalam 1 folder belum termasuk subfoldernya..
as far i know,
F1 adalah file sumber (produsen), dia bersifat pasif, hanya menyimpan datanya dia sendiri
F2, F3 dst adalah pengguna, menyimpan alamat (path) file dari F1, serta (semacam) mirror data dari F1,
maka yg harus dibuka adalah file F2, F3 dst ini
kalau jumlah filenya yg dicurigai mengandung link ke F1 ada 40,
ya silakan membuka 40 file tsb !!! :)
ini guyonannya : apa iya waktu membuka 40 file butuh waktu seharian ? :)
dari googling,
coba simak url berikut :
http://www.sqldrill.com/excel/ programming- vba-vb-c- etc/859881- xlexcellinks. html
How can I determin if a cell contains a link to a cell anotherworksheet (xlExcelLinks )?
http://www.ozgrid.com/VBA/update- links.htm
Update Links in Excel
cmiiw
(cak)sinung
> 2. "FD = flash disk ?
> bila F1 dan F2 dalam satu folder (atau satu subfolder),insya Allah
> tetap terkonek (tidak perlu update link)"
> --> benar bu FD singkatan dari Flashdisk, troublenya adalah file F1
> berada
> dalam folder & F2 berada dalam subfolder linknya menjadi error bu..
>
> Mohon pencerahannya kembali.
>
> regard,
>
> Ferdy
>
/*-sig-
"Wisdom and knowledge is everywhere,
but so is stupidity."
Reivan
-sig-*/
- 4c.
-
Re: Fw: [belajar-excel] Mencari file" apa saja yg datanya menggunaka
Posted by: "M. Ferdiansyah" muh_ferdy@pusri.co.id muh_f3rdi4n5yah
Sun Jun 12, 2011 8:17 pm (PDT)
Sayang eh sayang pake komputer di kantor yg specny kurang memuaskan hati..
buka 1 file aja nahan hati, apalagi mesti buka file sebanyak gitu..
-_-"
izin ke tkp dulu y bu..
> On 13 Jun 2011 at 8:00, M. Ferdiansyah wrote:
>
>> Terimakasih buat bu Nung atas responnya..
>> Bu Nung menjawab :
>>
>> 1. "trial and error :)
>> rename F1 menjadi nama apa saja, kemudian "buka semua file selain
>> F1""
>> --> justru itu yg ingin saya ketahui bu, file2
>> apa saja yg menggunakan data dari file F1, soalnya
>> kl mesti dibuka semua, file yg ada lebih dari 40
>> file dalam 1 folder belum termasuk subfoldernya..
>
> as far i know,
>
> F1 adalah file sumber (produsen), dia bersifat pasif, hanya menyimpan
> datanya dia sendiri
>
> F2, F3 dst adalah pengguna, menyimpan alamat (path) file dari F1, serta
> (semacam) mirror data dari F1,
> maka yg harus dibuka adalah file F2, F3 dst ini
>
> kalau jumlah filenya yg dicurigai mengandung link ke F1 ada 40,
> ya silakan membuka 40 file tsb !!! :)
>
> ini guyonannya : apa iya waktu membuka 40 file butuh waktu seharian ? :)
>
> dari googling,
> coba simak url berikut :
>
> http://www.sqldrill.com/excel/ programming- vba-vb-c- etc/859881- xlexcellinks. html
> How can I determin if a cell contains a link to a cell anotherworksheet
> (xlExcelLinks )?
>
> http://www.ozgrid.com/VBA/update- links.htm
> Update Links in Excel
>
> cmiiw
>
> (cak)sinung
>
>
>> 2. "FD = flash disk ?
>> bila F1 dan F2 dalam satu folder (atau satu subfolder),insya Allah
>> tetap terkonek (tidak perlu update link)"
>> --> benar bu FD singkatan dari Flashdisk, troublenya adalah file F1
>> berada
>> dalam folder & F2 berada dalam subfolder linknya menjadi error bu..
>>
>> Mohon pencerahannya kembali.
>>
>> regard,
>>
>> Ferdy
>>
>
>
>
>
>
> /*-sig-
>
> "Wisdom and knowledge is everywhere,
> but so is stupidity."
>
> Reivan
>
> -sig-*/
>
>
>
>
>
>
>
>
____________ _________ _________ _________ _________ _________ _________
Notice : This e-mail (and any attachment) is strictly confidential and
is intended only for the addressee(s)above. Is strictly prohibited to
forward, print, copy, or otherwise reproduce this message that would
allow it to be viewed by any individual not originally listed as
a recipient(s). If you have received this e-mail in error, please
immediately notify the sender and delete this message. The opinions
expressed in this e-mail (and any attachment) are those of the individual
sender and may not necessarily reflect the views of PT Pusri.
____________ _________ _________ _________ _________ _________ _________
- 5a.
-
Re: Rekap absensi dan Jam kerja
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 6:05 pm (PDT)
Dear Makdo,
File terlampir mencoba menggunakan tabel referensi dan cells bantu. Cells
bantu terdiri dari kolom helper sebagai posisi NIK dalam data dan baris
helper sebagai posisi tanggal pada data.
Ketika data bukan ber-type time, maka formula yang digunakan : (pada cell
H13)
=IF(ISNUMBER($B13*H$9) ,ABS(IF(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B13, H$9),IF(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B13, H$9)>=$F$ 4+$F$6,TIME( INT(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B13, H$9))-$F$ 6,MOD(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B13, H$9),1)*100, 0),TIME($ F$4,0,0)) ,0)-IF(N( INDEX('Jam
Msk_kel'!$H$7:$Y$9,$B13, H$9))<=$F$ 5,LOOKUP( INDEX('Jam
Msk_kel'!$H$7:$Y$9,$B13, H$9),$H$2: $H$8,IF(WEEKDAY( H$11)<7,$ J$2:$J$7, $I$2:$I$7) ),TIME(INT( INDEX('Jam
Msk_kel'!$H$7:$Y$9,$B13, H$9)),MOD( INDEX('Jam
Msk_kel'!$H$7:$Y$9,$B13, H$9),1)*100, 0))),0)
Ketika data telah tersusun dengan baik ber-type time, maka formula menjadi :
(pada cell H14)
=IF(ISNUMBER($B14*H$9) ,ABS(IF(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B14, H$9),IF(INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B14, H$9)>=TIME( $F$4+$F$6, 0,0),INDEX( 'Jam
Msk_kel'!$I$7:$Y$9,$B14, H$9)-TIME( $F$6,0,0) ,TIME($F$ 4,0,0)),0) -IF(N(INDEX( 'Jam
Msk_kel'!$H$7:$Y$9,$B14, H$9))<=TIME( INT($F$5) ,MOD($F$5, 1)*100,0) ,LOOKUP(INDEX( 'Jam
Msk_kel'!$H$7:$Y$9,$B14, H$9),$H$2: $H$8,IF(WEEKDAY( H$11)<7,$ J$2:$J$7, $I$2:$I$7) ),INDEX(' Jam
Msk_kel'!$H$7:$Y$9,$B14, H$9))),0)
Semoga file terlampir lebih bisa menjelaskan.
Kid.
2011/6/10 makdo marbun <banten7003@yahoo.com >
>
>
> dear sedulur..
>
>
> Mohon pencerahannya, saya masih awam neh
> Yang diharapkan sebagai berikut :
> 1. Jika pada absensi jam masuk datang sebelum jam 8 maka tertulis
> pada actual jadi 8
> 2. Jika pada absensi jam masuk datang sebelum jam 8:15 maka tertulis
> pada actual jadi 8
> 3. Jika pada Jam masuk di tulis = A maka tertulis pada actual hour jadi
> = 0
> 4. Jika pada Jam masuk di tulis = C / I / S / D pada hari sabtu
> maka tertulis pada actual hour jadi = 5
> 5. Jika pada Jam masuk di tulis = C / I / S / D di luar hari sabtu
> maka tertulis pada actual hour jadi = 7
> 6. jam kerja kantor adalah =jam masuk – jam keluar - jam istirahat
> Contoh masuk jam 8 keluar jam 22 mak hasilnya = 13 jam
>
>
> Terimakasih banyak & semoga di murahkan rejeki serta diberi
> kesehatan oleh yang Mahakuasa
>
> Salam
> makdo Marbun
>
> Note : Kalau bisa jangan pake makro ya ..hee
>
>
>
- 5b.
-
Re: Rekap absensi dan Jam kerja
Posted by: "makdo marbun" banten7003@yahoo.com banten7003
Sun Jun 12, 2011 7:22 pm (PDT)
Dear rekans mailist
dan Pak frans,Mas syukron . Mr. Kid and Moderator..terimakasih ya atas bantuannya
Selamat Pagi
semua....
terlampir respon saya yang saya ujicobakan contoh dari rekan
kita pak Frans maka hasilnya adalah sbb
1.Pada L9 saya
coba ketikkan D yang muncul di Actual Hour seharusnya angka 7 jam tapi jadi muncul
jadi angka 5 ya,..?
2. pada Jam masuk
21 Nov ( Minggu ) karyawan yang bersangkutan
gak kerja jadi saya ketik 0 dan
pada actual hour muncul ###### ,.. kenapa ya?
Oh ya rekans mailist
and Mod yth
Sebagai catatan pada kami adalah ...
Prinsipnya 1 : jika D/C/I/S pada hari senin sd Jumat adalah basic hour yang muncul 7 jam
Prinsipnya 2 : jika D/C/I/S pada hari sabtu adalah basic hour yang muncul 5 jam
Prinsipnya 3 : jika A adalah basic hour yang muncul 0 jam
Prinsipnya 4 : jika pada
hari minggu jika tidak masuk adalah basic
hour yang muncul 0 jam
Prinsipnya 5 : JIka masuk masuk sebelum
jam 8.15 pada pada jam masuk
muncul jadi 8 jam
Prinsipnya 6 : Jam
kerja regular ( normalnya ) adalah Jam
masuk â€" Jam keluar â€" jam istirahat
Salamku
makdo
--- On Fri, 10/6/11, Franciscus SOG <jclugbu@gmail.com > wrote:
From: Franciscus SOG <jclugbu@gmail.com >
Subject: Re: [belajar-excel] Rekap absensi dan Jam kerja
To: belajar-excel@yahoogroups. com
Date: Friday, 10 June, 2011, 11:27 AM
Dear Makdo,
Semoga membantu.
=IF(ISNA(MATCH(H$11;'Jam
Msk_kel'!$H$4:$BQ$4;0) );"";IF(ISNUMBER (IF(ISNUMBER( INDEX('Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));IF(INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) )<=$F$5;$ F$3;INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) )))*ISNUMBER( INDEX('Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) +1));(INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) +1))-(IF( ISNUMBER( INDEX('Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));IF(INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) )<=$F$5;$ F$3;INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) )))-$F$6; IF(IF(ISNUMBER( INDEX('Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));IF(INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) )<=$F$5;$ F$3;INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ));INDEX( 'Jam
Msk_kel'!$H$7:$BQ$16; MATCH($D12; 'Jam
Msk_kel'!$D$7:$D$16;0) ;MATCH(H$ 11;'Jam
Msk_kel'!$H$4:$BQ$4;0) ))="A";TIME( 0;0;0);IF( WEEKDAY(H11; 2)=6;TIME( 5;0;0);TIME( 7;0;0)))) )
Penjelasan lengkap di attachment.
NB : tipe data sudah diubah menjadi time [hh]:mm
CMIIW
Blessings,
Fran'z
On 6/10/11, makdo marbun <banten7003@yahoo.com > wrote:
>
>
>
>
> dear sedulur..
> Mohon
> pencerahannya, saya masih awam neh
>
> Yang diharapkan sebagai berikut :
>
> 1. Jika pada absensi jam
> masuk datang sebelum jam 8 maka tertulis
>
> pada actual jadi 8
>
> 2. Jika pada absensi jam masuk datang sebelum jam 8:15 maka
> tertulis
>
> pada actual jadi 8
>
> 3. Jika pada Jam masuk di tulis = A maka tertulis pada
> actual hour jadi = 0
>
> 4. Jika pada Jam masuk di tulis = C / I / S / D pada hari
> sabtu
>
> maka tertulis pada actual hour jadi = 5
>
> 5. Jika pada Jam masuk di tulis = C / I / S / D di luar hari
> sabtu
>
> maka tertulis pada actual hour jadi = 7
>
> 6. jam kerja kantor adalah =jam masuk â€" jam keluar - jam
> istirahat
>
> Contoh masuk jam
> 8 keluar jam 22 mak hasilnya = 13
> jam
>
>
>
> Terimakasih banyak & semoga di murahkan rejeki serta diberi
>
> kesehatan oleh yang Mahakuasa
>
>
>
>
>
> Salam
>
>
> makdo Marbun
>
>
>
> Note : Kalau bisa jangan pake makro ya ..hee
>
>
- 6a.
-
Bls: [belajar-excel] Penggunaan file excel yang memiliki makro bisa
Posted by: "subagyo agung" boobs_pop@yahoo.com boobs_pop
Sun Jun 12, 2011 6:28 pm (PDT)
Wah..tidak menduga pertanyaannya saya dijawab super cepat
Terimakasih atas perhatianya (mbak "siti" pake "s" kecil ) Master Excel
jadi kesimpulanya memang ada kemungkinan problem di tampilan komputer saya disebabkan oleh otak-atik makro yang saya lakukan sendiri ya...saya juga yakin tidak disebabkan oleh file excel milis ini...saya memang memodifikasi sedikit dari file mbak siti tentang menginsert gambar di excel sesuai kebutuhan saya dan kebetulan saya menggunakan excel 2003...nah mungkin karena ilmu saya masih belum bersertifikat (alias try n error) jadinya error .......yups maksud saya mengundang teman kami bergabung adalah memperkenalkan keberadaan milis belajar excel ini secara formal di kantor sebagai rujukan ..karena memang sangat-sangat berguna.....
Be Excel...belajar excel? gak akan nyesel!.......saya malah sudah terlanjur nyesel karena tidak belajar dari awal........
(Pak Wenc)
Wenceslaus Subagyo Agung Wibowo S.S
<wenc4success@gmail.com >wenceslausa@yahoo.com
WAREHOUSE ADMIN
9001 PP BOOKS LOCAL
_____________________ _________ __
Dari: STDEV(i) <setiyowati.devi@gmail.com >
Kepada: belajar-excel@yahoogroups. com
Dikirim: Sabtu, 11 Juni 2011 13:32
Judul: Re: [belajar-excel] Penggunaan file excel yang memiliki makro bisa membahayakan komputer ?
ysh pak / bu wenceslaus,
selamat datang dan terima kasih telah bergabung dengan milis kita:
'Be Excel' belajar-excel
(~ belajar excel? 'gak akan nyesel! )
makro
makro memang punya potensi untuk menjadi perusak bila oleh pembuatnya sengaja
diisi dengan perintah perintah yg "tidak senonoh"...
Ini disebabkan antara lain karena perintah dlm mcro tidak hanya terbatas pada
operasional apa yg ada di dalam aplikasi Office saja, melainkan bisa juga membuat
perintah yg sudah berada di level o/s (operating system, misalnya Windows)
"Hampir semua" yg dapat diperbuat oleh VB (program pembuat program) dapat
dibuat versi VBA (bahasa yg dipakai untuk menulis macro) - nya.
Oleh sebab itulah pihak microsoft sendiri serius ingin mengamankan para pemakainya
dengan cara : makro tidak akan jalan otomatis ketika workbook dibuka JIKA MEMANG
TIDAK DIKEHENDAKI. Ada setting yg dapat diatur-atur untuk keperluan ini.
Makro jahat tidak selalu dibuat oleh pengirim workbooknya, karena seperti di tahun-
tahun y.l. pernah beredar virus makro (kalo ndak salah virus melissa) yg berkembangnya
melalui email attachment.
Milis Be Excel
Sebagai milis yg mendeklariskan diri sbg milis "unmoderated posting" kami tentu
sulit untuk memeriksa apakah workbook lampiran posting dari members "pasti aman"
sebelum didistribusikan.
Tetapi kami percaya bahwa (mudah-mudahan) tidak ada members yg dengan sengaja
menjejalkan perntah jahat didalam makro-makronya.
Walupun begitu kami tetap menyarankan agar jangan membuka workbook bermakro jika
berasal dari sumber yg tidak dipercayai/dikenal dengan baik.
(mulai versi Excel 2007, workbook bermakro sudah dapat dikenali sejak dari melihat
nama / extensi filenya (xlsx pasti tidak bermakro; xlsm hampir pasti bermakro; xlsb
bisa bermakro bisa tidak. Ini adalah salah satu bentuk keseriusan Microfost dlm rangka
melindungi users nya)
Kasus pak / bu wenceslaus
Bila ditilik bahwa baru sekarang ini ada keluhan sepert itu, sedangkan members lain tidak
ada keluhan yg sama, maka untk sementara dapat disimpulkan bahwa keluhan di pc anda
bukan karena makro ex workbook lampiran dari milis Be Exel.
Walaupun demikian jika pak wen dapat "mempersempit daerahnya" (sejak kapan mengunduh
lampiran workbook dari milis, dan kapan keluhan mulai terjadi, sehingga bisa dikira-kira
file/ workbook apa saja yg pernah dibuka) maka files tsb dapat dikirim ke moderators
untuk dilihat lihat barangkali memang ada yg mengandung makro jahat (tentunya juga akan
dibantu oleh members lain yg berminat)
Mengundang / mengajak teman bergabung ke milis Be Excel.
Wah duh, terima kasih sebelumnya, memang itulah yang kami kehendaki, members get member !!
seperti MLM ya ?? hanya di sini tidak ada pembagian dividen maupun 'komisi' karena yg
dibagi bagi adalah pengetahuan cara ber-Excel yang lebih cerdas.. itu saja...
Berbagi saling memberi.. hidup terasa lebih indah dan hepii...
Bila dikehendaki Undangan (Invitation) Resmi dari milis, pak wen / members lain dapat
mengirimkan daftar email address yg ingin diundang, agar kami dapat mengirimkan
JOIN-TO-MILIS Invitations kepada mereka.
-siti-
note:
mengenai 'dugaan makro menyebabkan pc bermasalah' :
kita tetap menunggu masukan /pendapat /saran dari BeExcellers lainnya...
ayok ayok.. mumpung sabtu....
2011/6/11 wenceslaus <boobs_pop@yahoo.com >
>
> Salam buat semua master excel,
> salam kenal.....
>
> semenjak bergabung di milis ..aku baru mampu melihat dan menjelajahi ilmu-ilmu excel dari setiap jawaban para master excel..dan sesekali "try and error" coba mengaplikasikannya. namun beberapa waktu ini komputerku sering bermasalah dalam tampilan layar monitor ku ..flikker...warna berubah ..
> adakah kemungkinan penyebab dari penggunaan makro difile excel?
>
> mohon berkenan berbagi ilmunya...dan mohon ijin untuk mengajak teman2 ku bergabung dalam milis ini....(belajar-excel is My Best recommended Yahoo Groups !!)
- 7a.
-
Data yang sama dihitung 1
Posted by: "Rachmad HIDAYAT" rachmad.hidayat@external.total.com
Sun Jun 12, 2011 6:34 pm (PDT)
Dear Frend,
Saya punya data misal seperti ini :
Budi-1
Budi-1
Budi-1
Budi-1
Joni Indo
Joni Indo
Joni Indo
B234WD
B234WD
B234WD
Bagaimana ya menghitung jumlah data tersebut ?
Hasil yang diinginkan dari data di atas adalah = 3 ( jadi karakter yang sama di hitung satu)
Bukan jumlah data semua yang di hitung tapi hanya karakter/data yang sama saja yang di jumlahkan...
Terima kasih ya...
Terima Kasih,
Rachmad Hidayat / aq Bapakne Ridho
- 7b.
-
Re: Data yang sama dihitung 1
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 6:40 pm (PDT)
Dear Rachmat,
Jumlah cacah unique dengan array formula :
=Sum( 1 / CountIF( range_datanya , range_datanya ) )
Jika tidak ingin array formula, ganti Sum dengan Sumproduct, menjadi :
=SumProduct( 1 / CountIF( range_datanya , range_datanya ) )
Kalau pake kriteria, misal yang gak blank aja yang dihitung, beri kondisi
pada sisi pembilang, dan modifikasi kriteria dalam CountIF
menjadi :
=SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya ,
range_datanya & "*" ) )
Regard,
Kid.
2011/6/13 Rachmad HIDAYAT <rachmad.hidayat@external. >total.com
>
>
>
>
> Dear Frend,
>
>
>
> Saya punya data misal seperti ini :
>
>
>
> Budi-1
>
> Budi-1
>
> Budi-1
>
> Budi-1
>
> Joni Indo
>
> Joni Indo
>
> Joni Indo
>
> B234WD
>
> B234WD
>
> B234WD
>
>
>
> Bagaimana ya menghitung jumlah data tersebut ?
>
>
>
> Hasil yang diinginkan dari data di atas adalah = 3 ( jadi karakter yang
> sama di hitung satu)
>
> Bukan jumlah data semua yang di hitung tapi hanya karakter/data yang sama
> saja yang di jumlahkan…
>
> Terima kasih ya…
>
>
>
>
>
>
>
> Terima Kasih,
>
> Rachmad Hidayat / aq Bapakne Ridho
>
>
>
>
>
- 7c.
-
Re: Data yang sama dihitung 1
Posted by: "Rachmad HIDAYAT" rachmad.hidayat@external.total.com
Sun Jun 12, 2011 7:23 pm (PDT)
Alhamdulillah,
Boleh di jelasin dikit ngga mas kid,
Untuk rumus
=SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya , range_datanya & "*" ) )
Di akhirnya ada ......&"*" fungsinya apa ya ?
Terima Kasih,
Rachmad Hidayat
Inspection Method
3487
From: belajar-excel@yahoogroups. [mailto:belajar-excel@com yahoogroups. ] On Behalf Of Mr. Kidcom
Sent: 13 June 2011 09:40
To: belajar-excel@yahoogroups. com
Subject: Re: [belajar-excel] Data yang sama dihitung 1
Dear Rachmat,
Jumlah cacah unique dengan array formula :
=Sum( 1 / CountIF( range_datanya , range_datanya ) )
Jika tidak ingin array formula, ganti Sum dengan Sumproduct, menjadi :
=SumProduct( 1 / CountIF( range_datanya , range_datanya ) )
Kalau pake kriteria, misal yang gak blank aja yang dihitung, beri kondisi pada sisi pembilang, dan modifikasi kriteria dalam CountIF
menjadi :
=SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya , range_datanya & "*" ) )
Regard,
Kid.
2011/6/13 Rachmad HIDAYAT <rachmad.hidayat@external. <mailto:rachmad.hidayat@total.com external. >>total.com
[cid:image001.jpg@01CC29B1. ]33072C00
Dear Frend,
Saya punya data misal seperti ini :
Budi-1
Budi-1
Budi-1
Budi-1
Joni Indo
Joni Indo
Joni Indo
B234WD
B234WD
B234WD
Bagaimana ya menghitung jumlah data tersebut ?
Hasil yang diinginkan dari data di atas adalah = 3 ( jadi karakter yang sama di hitung satu)
Bukan jumlah data semua yang di hitung tapi hanya karakter/data yang sama saja yang di jumlahkan...
Terima kasih ya...
Terima Kasih,
Rachmad Hidayat / aq Bapakne Ridho
- 7d.
-
Re: Data yang sama dihitung 1
Posted by: "Mr. Kid" mr.nmkid@gmail.com nmkid.family@ymail.com
Sun Jun 12, 2011 7:29 pm (PDT)
Pak Rachmad Yth,
Prinsip dasar hitung jumlah item unique adalah :
Jumlah total dari 1 / *jumlah masing-masing item*.
CountIF untuk menghitung cacah berdasar suatu kriteria. Pada kriteria yang
blank, bisa jadi hasilnya adalah 0. Artinya,* jumlah masing-masing
item*bisa menjadi 0. Karena fungsi CountIF diletakkan sebagai
penyebut, maka
error karena pembagian dengan 0 akan terjadi.
Untuk mencegah hal ini, maka digunakan wildcard character yang berarti
sembarang karakter, yaitu tanda asterik tersebut.
Pada suatu data bernilai 'Sesuatu', akan terbentuk kriteria : 'Sesuatu*'
yang artinya semua yang dimulai dengan kata 'Sesuatu' diikuti sembarang
karakter.
Pada data blank, akan terbentuk kriteria : '*' yang artinya sembarang
karakter. Blank akan tetap dihitung. Jadi, error dibagi dengan 0 akibat
adanya data blank, dapat dieliminir.
Kid.
2011/6/13 Rachmad HIDAYAT <rachmad.hidayat@external. >total.com
>
>
>
>
> Alhamdulillah,
>
> Boleh di jelasin dikit ngga mas kid,
>
> Untuk rumus
>
> =SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya ,
> range_datanya & "*" ) )
>
> Di akhirnya ada *……&"*" *fungsinya apa ya ?
>
>
>
>
>
> Terima Kasih,
>
> Rachmad Hidayat
>
> Inspection Method
>
> 3487
>
>
>
> *From:* belajar-excel@yahoogroups. [mailto:com
> belajar-excel@yahoogroups. ] *On Behalf Of *Mr. Kidcom
> *Sent:* 13 June 2011 09:40
> *To:* belajar-excel@yahoogroups. com
> *Subject:* Re: [belajar-excel] Data yang sama dihitung 1
>
>
>
>
>
> Dear Rachmat,
>
> Jumlah cacah unique dengan array formula :
>
> =Sum( 1 / CountIF( range_datanya , range_datanya ) )
>
> Jika tidak ingin array formula, ganti Sum dengan Sumproduct, menjadi :
> =SumProduct( 1 / CountIF( range_datanya , range_datanya ) )
>
> Kalau pake kriteria, misal yang gak blank aja yang dihitung, beri kondisi
> pada sisi pembilang, dan modifikasi kriteria dalam CountIF
> menjadi :
>
> =SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya ,
> range_datanya & "*" ) )
>
> Regard,
> Kid.
>
>
> 2011/6/13 Rachmad HIDAYAT <rachmad.hidayat@external. >total.com
>
>
>
>
>
> Dear Frend,
>
>
>
> Saya punya data misal seperti ini :
>
>
>
> Budi-1
>
> Budi-1
>
> Budi-1
>
> Budi-1
>
> Joni Indo
>
> Joni Indo
>
> Joni Indo
>
> B234WD
>
> B234WD
>
> B234WD
>
>
>
> Bagaimana ya menghitung jumlah data tersebut ?
>
>
>
> Hasil yang diinginkan dari data di atas adalah = 3 ( jadi karakter yang
> sama di hitung satu)
>
> Bukan jumlah data semua yang di hitung tapi hanya karakter/data yang sama
> saja yang di jumlahkan…
>
> Terima kasih ya…
>
>
>
>
>
>
>
> Terima Kasih,
>
> Rachmad Hidayat / aq Bapakne Ridho
>
>
>
>
>
>
>
- 7e.
-
Re: Data yang sama dihitung 1
Posted by: "STDEV(i)" setiyowati.devi@gmail.com siti_vi
Sun Jun 12, 2011 8:41 pm (PDT)
1.
saya sudah lupa *file ini <http://www.box.net/shared/ >*dulu39n5do94kscf10jt 6gj6
untuk menanggapi pertanyaan siapa ya...
ini mengenai sekidit penjelasan SUM (1/COUNTIF())
[image: UniqValues Count.GIF]
2.
"*" adalah tanda wildcard menggantikan semua karakter
maksudnya : bila perintahnya cari & tangkaplah "siti"
berarti jika bukan "siti" tidak akan ditangkap
tetapi bila perintahnya tangkaplah "siti*"
maka semua siti (siti-kamarmandi, siti-jamilah, siti-sundari, siti-markonah,
sitisimilikithi, dst
akan ditangkap semuah.
2011/6/13 Rachmad HIDAYAT <rachmad.hidayat@external. >total.com
>
>
> Alhamdulillah,
>
> Boleh di jelasin dikit ngga mas kid,
>
> Untuk rumus
>
> =SumProduct( ( Len( range_datanya ) > 0 ) / CountIF( range_datanya ,
> range_datanya & "*" ) )
>
> Di akhirnya ada *……&â€*†*fungsinya apa ya ?
>
>
>
> Terima Kasih,
>
> Rachmad Hidayat
>
> Inspection Method
>
> 3487
>
>
>
- 8.
-
FW: [belajar-excel] Re: Hitung Jml Bln Penyusutan pke Excel
Posted by: "Sudarsono Suhenk" jkssbma@live.com jkssbma
Sun Jun 12, 2011 7:15 pm (PDT)
ketinggalan file excel nya . sori ya.
From: jkssbma@live.com
To: belajar-excel@yahoogroups. com
Subject: RE: [belajar-excel] Re: Hitung Jml Bln Penyusutan pke Excel
Date: Mon, 13 Jun 2011 09:14:15 +0700
Pak ini file yang sudah saya modif . semoga sesuai .
eeeh , saya baru ikut milis ini. Jadi salam kenal juga ya ......
To: belajar-excel@yahoogroups. com
From: duccio_inocenti@yahoo.com
Date: Sat, 11 Jun 2011 04:01:07 +0000
Subject: [belajar-excel] Re: Hitung Jml Bln Penyusutan pke Excel
itu macro ya pak, jika bapak berkenan tolong diaplikasikan pada attachmentsnya..btw makasi banyak pak atas bantuanny, Wassalam
--- In belajar-excel@yahoogroups. , Sudarsono Suhenk <jkssbma@...com >
- 9a.
-
Re: Hitung Jml Bln Penyusutan pke Excel
Posted by: "Sudarsono Suhenk" jkssbma@live.com jkssbma
Sun Jun 12, 2011 7:18 pm (PDT)
Pak ini file yang sudah saya modif . semoga sesuai .
eeeh , saya baru ikut milis ini. Jadi salam kenal juga ya ......
To: belajar-excel@yahoogroups. com
From: duccio_inocenti@yahoo.com
Date: Sat, 11 Jun 2011 04:01:07 +0000
Subject: [belajar-excel] Re: Hitung Jml Bln Penyusutan pke Excel
itu macro ya pak, jika bapak berkenan tolong diaplikasikan pada attachmentsnya..btw makasi banyak pak atas bantuanny, Wassalam
--- In belajar-excel@yahoogroups. , Sudarsono Suhenk <jkssbma@...com >
- 10a.
-
Re: Laporan Akhir Tahun 2011
Posted by: "Muh Nuh Haikal" juz13_9999@yahoo.co.id juz13_9999
Sun Jun 12, 2011 9:27 pm (PDT)
sekali lg terima kasih file sdh oke, sukses selalu bwt pak franz...
nunuh
--- Pada Ming, 12/6/11, Franciscus SOG <jclugbu@gmail.com > menulis:
Dear nunuh,
Mungkin maksud Anda seperti pada attachment, dimana setiap bulan
diinsert sebuah row sebagai pembatas (karena Anda menyertakan
attachment yang berbeda dengan topik). Rumus sudah dimodifikasi dengan
penambahan (LEN(master_data!$D$3: $D$13) pada logika countif.
=IF(ISNA(INDEX(master_data! $D$3:$D$13; MATCH(0;COUNTIF( $B$9:B9;IF( (MONTH(master_ data!$B$3: $B$13)>=$ D$2)*(MONTH( master_data! $B$3:$B$13) <=$D$4)*( LEN(master_ data!$D$3: $D$13)>0) ;master_data! $D$3:$D$13; ""));0))) ;"";INDEX( master_data! $D$3:$D$13; MATCH(0;COUNTIF( $B$9:B9;IF( (MONTH(master_ data!$B$3: $B$13)>=$ D$2)*(MONTH( master_data! $B$3:$B$13) <=$D$4)*( LEN(master_ data!$D$3: $D$13)>0) ;master_data! $D$3:$D$13; ""));0)))
CMIIW
Blessings,
Fran'z
Need to Reply?
Click one of the "Reply" links to respond to a specific message in the Daily Digest.
---------------------------------------------------------------------
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
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe
Tidak ada komentar:
Posting Komentar