Asalamualaikum
Ihya, bisa digunakan formula index dan match, pakai if juga bisa pakai
vlookup juga bisa.
sebagai contoh saya gunakan index match sebagai berikut:
Asalamualaikum,
Terima kasih pak bagus atas pemberian formulanya. helper 2 dan 3 mudah
digabung, tapi helper 1 dan 2 ternyata tidak mau digabung, seperti formula
awal.
Terima kasih pak Bagus, hanya kalau boleh tanya apakah fungsi formula
+1/ROW() pada formula
Asalamualaikum warahmatullah
Yak Mr Kid, sesuai keinginan terima kasih sudah memberikan pencerahan.
awalnya tanpa kriteria hasilnya 1 semua
Terima kasih Syukron
Wasalamualaikum warahmatullah
NangAgus
2014-07-11 16:30 GMT+07:00 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
Asalamualaikum,
pakai conditional formating pak,
ketik pada formula conditional formating:
=OR(A1=C;A1=D;A1=K;)
Kemudian pilih warna sesuai keinginnan.
2014-07-14 9:37 GMT+07:00 ihyakulumudi...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
Misal kita punya nilai A, B, C, D,
Waalaikum salam Heru,
Coba script
Private Sub UserForm_Initialize()
Application.WindowState = xlMaximized
Me.Width = Application.Width
Me.Height = Application.Height
End Sub
Salam
KenangAgus
2014-07-13 21:12 GMT+07:00 Heru Adi hr_a...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
coba pak Ody:
Private Sub CommandButton15_Click()
Dim MyPath As String
Dim MyFileName As String
MyFileName = Hasil Pemeriksaan fisik_ Sheets(fisik).Range(E7).Value
_ Format(Date, ddmm) .pdf
ChDir C:\Documents and Settings\SMP1GEBOG\My Documents\ 'This is
where youo set a defult file
Asalaumalaikum pak Ihya,
Yang salah bukan tempat dimana akan paste pak,
coba kirimkan file tempat dimana yang mau dicopy.
Wasalam
NangAgus
2014-07-15 11:54 GMT+07:00 ihyakulumudi...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
mungkin contoh ini bs mewakili, tiap kali copy data
Mungkin bisa menggunakan formula:
=MIN(625000;SUMPRODUCT(($A3:$A16=F1)*($C3:$C16)*($B3:$B162))+SUMPRODUCT(($A3:$A16=F1)*($C3:$C16)*($B3:$B16=2)))
copas ke kanan
2014-07-17 13:50 GMT+07:00 Heri Budianto budiantoher...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Dear, master Excel
Dear Agus,
Asalamualaikum warahmatullah
Sesama Agus dilarang mendahului he he he he ...
Coba di Cell H7 diketik formula:
=IF(WEEKNUM($F7)=COLUMN()+2;$E7/(WEEKNUM($G7)-WEEKNUM($F7));IF(WEEKNUM($G7)=COLUMN()+2;G7;))
Copy ke semua tempat.
Wasalamualaikum
NangAgus
2014-07-17 10:04 GMT+07:00
Asalamualaikum warah matullah,
Mr. Kid ternyata pada VBA ada syntax yang bunyinya OON=on
bisa memberikan penjelasan pada saya tentang syntax ini...? :D
Mungkin maksud penanya, ini hanya mungkin lho [?]
Sheet Input hanya digunakan untuk menginput data, namun bisa mengambil
(load) data
Dear Ferry.
Mungkin dapat menggunakan formula match.
=MATCH(C3,E3:S3)
di C3 diisikan tanggal yang akan dicari.
Salam
NangAgus
2014-07-22 9:04 GMT+07:00 Ferry Ferdian frn...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
Yth
Belajar Excel Team
mohon tanya, bagaimana cara
Dear Hafidz,
ActiveSheet.Range(”$V$7:$W$564”) .AutoFilter Field:=1, Criteria1:=””
ActiveWindow.SmallScroll Down:=-6
Mungkin begini:
Excel, tolongin saya; sheet yang sedang aktif, range $V$7:$W$564
diAutofilter dengan kuci pada baris pertama, dan kriterianya tidak sama
dengan (kosong)
Sesudah
dear Sumodota
coba record macro, dapat diintip di sini
http://b-excel.blogspot.com/2013/07/belajarvba-002-gimana-sih-cara-nulis.html,
di sini
http://macroexcel.wordpress.com/2008/03/24/merekam-sebuah-macro-excel/
atau di sini
Dear pak Ihyak,
Coba baris script:
lBarisAkhir = BarisAkhir(dkn)
diubah menjadi peryataan yang benar, misalnya diganti dengan script dibawah
ini:
lBarisAkhir = WorksheetFunction.Max(Sheets(dkn).Range(A9:A53).Value)
semoga perkiraan saya benar.
Salam
NangAgus
2014-07-26 10:34 GMT+07:00
Asalamualaikum pak Ihyak,
Saya bukan master coba membantu ya...
Coba scriptnya diganti seperti di bawah ini:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim no As Integer
Dim myCell As Long
Dim myCell2 As String
If Not Intersect(Target, Range(A1:A2)) Is Nothing Then
myCell =
http://b-excel.blogspot.com/2014/08/tombol-multi-guna.html
Salam
NangAgus
On Sat, Jul 26, 2014 at 12:41 PM, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com wrote:
Asalamualaikum pak Ihyak,
Saya bukan master coba membantu ya...
Coba scriptnya diganti seperti di
Asalamualaikum Pak Agus,
Sesama agus dilarang mendahului ...
Setahu saya Bisa dibuat pak,
Silahkan diblok dahulu kolom yang mau diberi password. klik Ribbon Review,
pada tab Change silahkan pilih tombol Allow User to Edit Range kemudian
Klik New, Ketik Passwordnya, klik OK, Ketik
Dear Eka,
Coba Gunakan Formula CountIf,
=COUNTIF($A$3:$A$14,=A3)
copas ke bawah.
Salam
NangAgus
2014-08-07 14:56 GMT+07:00 Eka Subyantara ekasubyant...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com:
Para BeExceller yang baik hati,
Untuk urutan sekelompok bilangan kita punya
@yahoogroups.com:
Dear mas nang agus,
Maf pak, bisa dijelaskan kah rumusny?
Ap yg dibaca countif dengan kondisi =
Thx...
br .
odong
--
* From: * Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com;
* To: * BExcel belajar-excel@yahoogroups.com
Menghitung porsentase adalah membandingkan suatu harga dengan harga yang
lain. apabila yang dibandingkan tidak sama berarti nilainya juga tidak
sama,
Maunya hasil porsentasenya berapa? coba kirimkan ulang hasil yang diminta
menggunakan File excel.
agar dapat dibuatkan formulanya
Wasalam
NangAgus
Untuk Bapak Eka
Salam sejahtera untuk kita semua.
bagaimana jika menggunakan formula array
{=MAX((ROW(A5:A31))*(0(A5:A31)))}
gunakan tombol CSE untuk memasukkan Formula
Wasalam
NangAgus
2014-08-09 20:10 GMT+07:00 Eka Subyantara ekasubyant...@gmail.com
[belajar-excel]
Pak Pendi apa maksud pertanyaannya Pak?
apa yang disembunyikan?
apa kreterianya?
2014-08-11 11:10 GMT+07:00 Fendi S fen...@rocketmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
terima kasih sebelumnya kepada Mr. Kid yang telah memberikan solusi kepada
saya. Ada pertanyaan lagi
Hai Agus,
Sebaiknya menggunakan Pivot tabel lebih mudah dan dapat digunakan dengan
banyak kreteria, silahkan belajar pivot di blognya Mr. Kid,
Jika mau mencari list uniq data dengan satu kriteria dapat menggunakan
formula index, match dan countif. silahkan pada H10 diisikan formula:
Dear Leftanded,
Pakai Macro ya...
1. Lihatlah pada baris ketiga kolom ke2
2. Unprotect sheet
3. Jika 1 maka kolom ke 4,5,6 boleh ditulis,
dst
8. Protect sheet
Salam
NangAgus
2014-08-14 17:29 GMT+07:00 Lefthanded Ballerina bloody_kim...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Asalamualaikum Mas Kid,
Sekedar bertanya, bagaimana caranya agar data validation yang kita
buat dapat terhindar dari paste, apakah fitur paste harus kita
matikan?
atau ada cara lain agar cell yang sudah data validation terhindar dari paste.
Terima kasih syukron.
Wasalamualaikum warahmatullah
Asalamualaikum warahmatullah
Mas Kid,
Setelah Sheet disembunyikan menggunakan properti sheet milik VBE akan
dapat ditampilkan lagi menggunakan cara yang sama.
agar lebih aman dapat di gunakan password pada VBA Project Properties.
meskipun sudah di password juga dengan mudahnya dibuka.
Bagaimanakah
Haaa... ha... ha.ha.
Biar tambah heboh,
saya ikut nimbrung yaak Mr Kid.
Maksudnya kolom yang mana yaa... kolom pada cell apa pada status Bar
Kalau diselect range tertentu maka muncul tulisan Sum pada status Bar
pojok kanan Bawah
kalau hal ini yang dimaksudkan berarti tinggal klik
ketat, jangan gunakan
Excel ;)
Wassalamu'alaikum Wr. Wb.
Kid.
2014-08-16 12:43 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikum warahmatullah
Mas Kid,
Setelah Sheet disembunyikan menggunakan properti sheet milik VBE akan
dapat
Pak pendi coba jalan-jalan ke Sini
http://jago-office.blogspot.com/2013/01/aplikasi-data-base-siswa-dengan-excel.html
2014-08-17 14:25 GMT+07:00 Fendi S fen...@rocketmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
maaf bro, adakah yang punya aplikasi buku induk siswa. biar
Dear Nanang!
Asalamualaikum warahmatullah.
Coba di AG3 diketik Rumus
=SL/MB-SBY-008/RIGHT(YEAR(TODAY());2)/TEXT(MONTH(TODAY());00)/TEXT(AQ1;00)
sedangkan di macro Print out tambahkan cekrip:
Dim a As Integer
a = Range(AQ1).Value
a = a + 1
Range(AQ1).Value = a
Wasalam
Asalamualaikum Mr. Kid
Apakah mungkin data seperti ini digunakan formula?
jika memungkinkan apakah perlu dummi?
Bisa gak ya... kalau pakai formula tanpa dummi?
Menurut saya yang paling logis adalah menggunakan text to column kemudian
baru digunakan formula.
Kalau menggunakan dummi 31 kolom
mencoba tanpa helper formula.
Yang suka VBA kok ya belum muncul ya...
Wassalamu'alaikum Wr. Wb.
Kid.
2014-08-23 12:43 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikum Mr. Kid
Apakah mungkin data seperti ini digunakan formula?
jika
Asalamualaikum warahmatullah;
Saya mau mencari alamat cell (Range) dengan vba, saya terbiasa
menggunakan alamat range menggunakan syntax : Range(A1),
karena cekrip yang mau dibuat perintahnya membaca Range(A1) sampai
Range(AZ1) berturut-turut satu persatu. (bukan A1:AZ1). Hal ini akan
mudah jika
Tambahkan cekrip:
Sheets(form).Activate
di baris paling bawah
On 8/27/14, Dody Irawan dodyirawa...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com wrote:
Sip, mantab mas Agung,
Mas saya bener-bener pemula, bisa minta tolong kasih penjelasan per baris
dari rumus nya mas, biar saya
Dear Pak Liem,
Cekrip yang dibuat sudah betul pak, tapi si Excel bingung, disuruh
mem-Paste special dengan masakan yang paling enak, tetapi bahan yang
untuk masak belum ada. belikan dulu dong pak!
Tambahkan cekrip Kopi di atasnya baru si excel bis kerja.
Saya pernah dipesen sama Mr. Kid,
-27 12:10 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikum warahmatullah;
Saya mau mencari alamat cell (Range) dengan vba, saya terbiasa
menggunakan alamat range menggunakan syntax : Range(A1),
karena cekrip yang mau dibuat perintahnya
panah bawah...lalu saya pilih satu
cell dibawahnya
lalu saya paste spesial value.
tapi sepertinya waktu jalankan sekrip, proses kopi di workbok A sudah tidah
aktip.
Pada Rabu, 27 Agustus 2014 9:35, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis
...@yahoo.co.id [belajar-excel]
belajar-excel@yahoogroups.com wrote:
ini saya coba lampirkan file yang sudah saya dumi kan.
Pada Rabu, 27 Agustus 2014 10:11, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis:
Dear Pak Liem.
Bagaimana apabila perintah
xldown baru di kopy.
untuk yang dari pak kid belum saya coba
salam
liem
Pada Rabu, 27 Agustus 2014 12:19, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis:
Dear Pak Liem!
Coba Macronya dicoba dahulu seperti ini:
Private Sub CommandButton2_Click
Dear Haris,
Cetak dimana ya?
coba cekrip:
a = Range(A1).Value
b = Range(A2).Value
If a = 0 Then MsgBox ISI DULU DATA A1
If b = 0 Then MsgBox ISI DULU DATA A2
If (a b And a 0) Then MsgBox ANDA BENAR
Exit Sub
If a b Then MsgBox A1 harus lebih kecil dari A2
Exit Sub
If a = b Then MsgBox
data tidak selalu sampai N16 atau bahkan lebih dari N16 bisa nggak
kalo yang di copy itu
B3:N3 lalu di xldown baru di kopy.
untuk yang dari pak kid belum saya coba
salam
liem
Pada Rabu, 27 Agustus 2014 12:19, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com
file yang sudah solved
liem
Pada Kamis, 28 Agustus 2014 13:12, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis:
Pak Liem,
Dicoba cekrip begini pak.
Private Sub CommandButton2_Click()
Dim pileku As String
Dim celladd As String
pileku = InputBox
Range(F Rows.Count).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValues
Exit Sub
Err:
MsgBox Mboten Tamtu Mbikak, vbExclamation, Error
End Sub
salam
liem
Pada Sabtu, 30 Agustus 2014 10:41, Nang Agus nanga...@gmail.com
[belajar-excel] menulis:
Dear Pak Liem,
Cekripttt yang baru
Mbak, Risma
Asalamualaikum warahmatullah
Rumus yang anda buat adalah rumus array, cara memasukkan rumus tersebut
menggunakan jurus pamungkas CSE bukan hanya di cange selection saja.
Coba klik kembali di formulabar, sehingga kursor berkedip di formula bar
tekan tombol CSE (Ctrl + Shift + Enter)
Coba di H4 diketik Rumus:
=IF(G4E4+1/72;G4-E4-IF(G419/24;1/48;IF(MOD(DATE(RIGHT(C4;4);LEFT(C4;FIND(/;C4)-1);MID(C4;FIND(/;C4)+1;FIND(/;C4;3)-FIND(/;C4)-1));7)=0;1/24;0)))
Rumus ini belum pembulatan. silahkan dibulatkan dahulu, kalau gagal di
kirim lagi ke milis.
Ingat, formula saya menggunakan
Dear Lazuardi,
Asalamualaikum warahmatullah.
Bisa dicoba:
1. Matikan Tombol Save As
2. Perintahkan Excel pada prosedur Workbook open, Untuk membandingkan nama
file dengan nama yang sudah ditentukan. Jika namanya tidak sama beri
peringatan bahwa nama file sudah diubah, Mohon untuk dikembalikan
Dear Mas Agung,
Di Kompie Aku formula berjalan normal.
agar false hilang, silahkan ubah kreteria If yang pertama dengan memberi
nilai pada False, silahkan diisi nol atau vbNullstring.
(silahkan ubah pada formula pada kurung treakhir ))) menjadi ));0) atau
));) gityuu)
Wasalam
NangAgus
Dear Pak Purnomo,
Coba jalan-jalan ke sini
http://www.excel-easy.com/vba/examples/multiple-list-box-selections.html
2014-09-03 8:05 GMT+07:00 SUYONO reza.suy...@lge.com [belajar-excel]
belajar-excel@yahoogroups.com:
Pagi Pa Pysa
Coba ini pa, untuk memilih lebih dari satu bisa tekan
Dear Mas Agung.
Asalamualaikum
Mungkin rumusnya dibuat begini:
Mas Agung, Rumus untuk pembulatan mungkin dapat digunakan rumus:
=TIME(HOUR(B2);VLOOKUP(MINUTE(B2);{0\0;20\30;50\60};2);)
(yang dibulatkan di B2)
Wasalam
NangAgus
2014-09-03 12:50 GMT+07:00 agungdotco...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
Walaikumsalam. . Wr.wb
Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis:
Dear Lazuardi,
Asalamualaikum warahmatullah.
Bisa dicoba:
1. Matikan Tombol Save As
2. Perintahkan Excel pada prosedur Workbook open, Untuk membandingkan nama
file dengan nama yang sudah ditentukan. Jika namanya
Asalamualaikum,
Pak Lukman.
Setahu saya proteksi seperti itu hanya memproteksi Struktur worksheet dan
Nama worksheet, Belum memproteksi nama file.
Saya sendiri tidak bisa memproteksi nama file.
Bagaimana kalau file dicopy pakai explorer kemudian di rename?
Wasalam
NangAgus
2014-09-04 8:13
Pak Hendrik,
Saya ikut daftar,
Semoga ada waktu untuk mempraktekkannya,
Terima kasih
Wasalam
NangAgus
2014-09-06 15:12 GMT+07:00 Hendrik Karnadi hendrikkarn...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Buat rekan yang tertarik untuk mendonload buku2 saya (front cover
Dear, Dicky
Coba di F4 diketik Formula:
=IF(MOD(F$3-YEAR($B4);$D4/12)=0;$E4;)
Saya suka Indonesian Country.
Salam
NangAgus
2014-09-09 10:26 GMT+07:00 dicky zulkifli dicky.zulki...@yahoo.co.id
[belajar-excel] belajar-excel@yahoogroups.com:
Dear All Master,
Kami mempunyai data untuk
dengan baik, akan tetapi,
untuk yang luasan 5000(data ke 5 dari atas) angkanya tidak timbul di tahun
yang dimaksud, kira-kira apa permasalahannya ya.
terimakasih
Dicky
Pada Selasa, 9 September 2014 11:33, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com menulis
Tools, lalu pilih Add-Ins, maka akan muncul dialog
baru...
contreng pada Analysis ToolPak
lalu tekan OK
Wassalam
~ Bagus ~
- Original Message -
*From:* Nang Agus nanga...@gmail.com [belajar-excel]
nanga...@gmail.com+[belajar-excel]
*To:* BExcel belajar-excel@yahoogroups.com
Dear Vina,
Menambah Rumusnya Pak Hendrik:
Di K6 Ketik formula:
=if(J6H6;G6-I6-1;G6-I6)
dan di L6 ketik Formula:
=if(J6H6;60+H6-J6;H6-J6)
Salam
NangAgus
2014-09-10 11:04 GMT+07:00 hendrik karnadi hendrikkarn...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Hai Vina,
Pada sel
Asalamualaikum warah matullah.
Pak Leo
Sebaiknya semua bulan dibuat dua angka pak. jadi kalau 1 bulan menjadi 01,
sehingga 3 tahun 2 bulan menjadi 3,02 bukan 3,2 sehingga komputer mudah
membedakan bulan ke 2 dan bulan ke 12. biar lebih mudah tahunnya juga bisa
di jadikan 2 karakter. tambahkan
=IF(D6=F6,C6-E6,C6-E6-1)
Jika Pieces Loading lebih besar dari UnLoading (barang satuan yang diambil
lebih besar dari barang yang dikembalikan) (dirumus diketik =IF(D6=F6) maka
kurangi saja Kartonnya (C6-E6), jika tidak (barang satuan yang diambil
lebih kecil dari barang yang dikembalikan) berarti
Coba begini:
Private Sub UserForm_Activate()
TextBox1.Value = Format(Date, dd )
End Sub
2014-09-11 11:07 GMT+07:00 yudha cahayaoptikmand...@yahoo.co.id
[belajar-excel] belajar-excel@yahoogroups.com:
salam untuk semua master
mau nanya nih..
bagaimana macronya untuk
2014-09-11 11:59 GMT+07:00 yudha cahayaoptikmand...@yahoo.co.id
[belajar-excel] belajar-excel@yahoogroups.com:
berhasil mas Agus..
cuman ketika ganti transaksi ( entry data selanjutnya ) kok hilang lagi
ya..
yudha
Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com
Dear Pak Kid,
Saya coba pakai delete content tidak bisa, saya format cell general juga
tidak mau, saya delete column file 32 MB menjadi 9 MB,
Terakhir saya delete Row hanya menjadi 13 KB.
kira-kira apa ya penyebabnya, apakah format row dan column ya? apa
conditional formating?
saya coba buka
Asalamualaikumwarahmatullah,
Mas Agung
Coba cekript ditulis pada Object Combo box1 dibuat prosedur Change.
Selengkapnya:
Private Sub ComboBox1_Change()
Dim dTabel As Range, Tampil As Range
Dim r As Long, n As Long
Application.Calculation = xlCalculationManual
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Kepada member B-Excel
Mohon bantuannya untuk mengubah cekrip.
Saya belajar membuat cekrip mencari cell kosong terakhir pada kolom C.
Judul kolom terletak pada baris 2 (“C2”).
Saya membutuhkan nomor baris dengan bantuan cekript:
baris
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Kagem Mas kid.
Nyuwun pangapunten boten nyambung kaliayan thread
wonten seratan:
range(alamat cell nya data validation).value=
namacomboboxnya.text
punapa bentenipun namacomboboxnya.text kaliyan namacomboboxnya.Value?
Maturnuwun
وَ
Asalamualaikum mas Zaenul,
Masih belum bisa;
Jika digunakan:
baris = Cells(ActiveSheet.Rows.Count, C).End(xlUp).Row
hasilnya sama dengan:
baris = Range(c1).End(xlDown).Offset(1).Row
Wasalam
NangAgus
2014-09-17 8:05 GMT+07:00 'zainul_ulum[at]yahoo[dot]com'
zainul_u...@yahoo.com [belajar-excel]
Coba gunakan formula:
=SUBSTITUTE(SUBSTITUTE(A1, ,),0,)
Format cell untuk memunculkan nol didepan
2014-09-22 8:33 GMT+07:00 ris ha har1sn.ex...@yahoo.com [belajar-excel]
belajar-excel@yahoogroups.com:
Assalamu'alaikum.
Sukses selalu bagi para master semua.
Bagaimana caranya menghilangkan
hendrik karnadi hendrikkarn...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Coba oprek2 file terlampir.
Salam,
HK
On Wednesday, 17 September 2014, 8:13, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com wrote:
Asalamualaikum mas Zaenul,
Masih
Kepada Rekan Be-Excel
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
saya me-lookup nilai dengan menggunakan match, namun match tidak bekerja
karena ada nilai yang sama. Bagaimana cara mengubah rumus tersebut agar
dapat melihar dua kreteria berbeda dengan nilai yang sama? dan apakah ganti
) pada F$3
Wassalamu'alaikum Wr. Wb.
Kid.
2014-09-24 10:00 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Kepada Rekan Be-Excel
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
saya me-lookup nilai dengan menggunakan match, namun match tidak
Hai Yudi,
Coba jalan jalan ke sini.
http://excel-mr-kid.blogspot.com/2011/04/formula-filter-data-filtering-formula.html
Salam
NangAgus
2014-09-23 10:37 GMT+07:00 Yudi Dwiyono yudidwiy...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com:
Dear Master Excel,
Bagaimana langkah membuat
Bisa dicoba Begini:
Sub pindahan()
Dim BarisTerakhir, BarisTujuan As Integer
Sheets(Sheet Asal).Range(B2:B5).Copy
Sheets(Sheet Tujuan).Select
BarisTerakhir = .cell(.Rows.Count, 1).End(x1up).Row
BarisTujuan = BarisTerakhir + 1
Cells(BarisTujuan, 1).PasteSpecial Paste:=xlPasteValues,
-ulang terhadap setiap nilai kualitatif. Andai
materinya hanya sedikit, mungkin ndak terlalu panjang formulanya. Tapi jika
materinya banyak, maka akan menjadi panjang formulanya.
Wassalamu'alaikum Wr. Wb.
Kid.
2014-09-24 15:02 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar
Asalamualaikum warah matullah,
Pak Rasyid, sudah dibuatkan rumusnya oleh Mr. Kid
Disesuaikan sendiri cellnya yaaa, karena file yang dikirim ke mr kid file
buatan saya bukan file pak Rasyid.
atau kelihatannya lebih ringkas jika menggunakan UDF, (walaupun rumusnya
panjang juga di VBA).
silahkan
Asalamualaikumwarahmatullah,
Salam sejahtera untuk seluruh milis B-Excel,
Saya memiliki beberapa variabel yang saya beri nama var1, var2 var3, var4
dst.
saya berkeinginan untuk membandingkan masing masing variabel menggunakan
Loop. bagaimana cara penulisan syntax di VBA?
For a = 1 to 40
IF var1
, Baik -- dan seturusnya .
Salam
Lukman
NB : banyak istilah yg tidak saya ingat atau tau .
maklum saja . bisanya hanya untuk praktek .
2014-09-25 13:06 GMT+07:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikumwarahmatullah
praktek .
2014-09-25 13:06 GMT+07:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikumwarahmatullah,
Salam sejahtera untuk seluruh milis B-Excel,
Saya memiliki beberapa variabel yang saya beri nama var1, var2 var3, var4
dst.
saya
abaikan .
bertahap selanjutnya , Baik -- dan seturusnya .
Salam
Lukman
NB : banyak istilah yg tidak saya ingat atau tau .
maklum saja . bisanya hanya untuk praktek .
2014-09-25 13:06 GMT+07:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com
/s/k4o6y3bz9preybu0rnu4.
Wassalam,
Kid.
2014-09-26 12:38 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
Asalamualaikum, Mas Zainul
Terima kasih
Sesuai yang diinginkan
2014-09-26 9:25 GMT+07:00 'zainul_ulum[at]yahoo[dot]com'
zainul_u
sendiri menggunakan VBA. Ketika UDF yang
dibuat bisa lebih luwes dalam menerima inputan, maka area kerja UDF
tersebut juga akan semakin luas.
Wassalamu'alaikum wr. wb.,
Kid.
2014-09-27 13:16 GMT+10:00 Nang Agus nanga...@gmail.com [belajar-excel]
belajar-excel@yahoogroups.com:
*Tentu
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Saya mencoba mengubah UDF buatan Mr. Kid menjadi 5 range yang
melompat. (udf aslinya hanya dapat menjangkau 1 range)
karena keterbatasan pengetahuan saya tentang VBA, masih terdapat
kesalahan peletakan delimiternya.
Mohon dapat diperbaiki
Dear Derry,
Apakah seperti ini yang dimaksud?
Salam,
NangAgus
2014-10-03 0:06 GMT+07:00 Ferdinan Imers ferdina...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com:
Mohon bantuan knapa ya error use form ? sdh search google gagal nemu
jawabannya
terima kasih sebelumnya
Derry
Dear Bapak Topenk
apakah yang dimaksud menjumlah anggaran yang digunakan sesuai peruntukan
pada BOS?
coba gunakan rumus:
=SUMPRODUCT(($D$3:$D$22=K1)*($C$3:$C$22))
Wasalam
NangAgus
2014-10-02 11:56 GMT+07:00 Topenk Baday topenk_ba...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Asalamualaikum Warahmatullah,
Pak Firman, apakah yang dimaksud untuk menghitung banyaknya bilangan yang
berada pada rentang ratusan terdekat?
coba gunakan formula:
=COUNTIFS($C$2:$D$49,=INT(F2/100)*100,$C$2:$D$49,(INT(F2/100)+1)*100)
Waslaam
NangAgus
2014-10-03 9:24 GMT+07:00 Firman Setiawan
Walaikumsalam
Pak Kausar, bagaimana kalau pada Private Sub CommandButton1_Click()
BukaFormPesan diganti dengan frmPesan.Show.
atau pada module 2 silahkan sub:
Private Sub Buka*From*Pesan()
diubah menjadi
Sub Buka*Form*Pesan()
wasalam
NangAgus
2014-10-02 22:14 GMT+07:00 Abid Kausar
Mas Prazt
Bagaimana jika dibuat pada object worksheet dan prosedur change atau
prosedur selectionChange ?
sehingga macro dijalankan apabila worksheet berpindah, atau cellnya
berpindah macronya dijalankan.
Wasalam
NangAgus
2014-10-03 11:22 GMT+07:00 'prazt' praztm...@gmail.com [belajar-excel]
Dear Nicky;
Ubah dahulu A19 menjadi 5 dan B19 menjadi 5000,
sehingga tabel listing menjadi:
Kemudian ketik formulanya di G4 sebagai berikut:
=IF(AND(F4=25E7;F45E8);INT((F4-2E8)/5E7)*25E5;IF(F4=1E9;INT((F4-5E8)/5E8)*5E7;0))+VLOOKUP(F4;$A$14:$B$19;2;1)
Jangan lupa ganti tanda ;
Asalamualaikum warahmatullah,
Pak Rasyid,
Mohon maaf, bukankah penggabungan cell tersebut sudah dibuatkan formulanya
oleh Mr Kid? juga sudah dibuatkan VBAnya oleh pak Lukman, serta sudah ada
UDFnya Juga di milis.
Apakah belum dibuka atau tidak pernah dilihat atau dicoba Jawaban dari
Asalamualaikum warahmatullah,
mbak Fatimah,
Mohon denga hormat untuk kesempatan lain, apabila mengirimkan file yang
berisi UDF atau VBA menggunakan file bereksistensi *.XLSM atau *.XLB jangan
menggunakan *.XLSX seperti yang disertakan dalam email ini.
JIka menggunakan *.XLSX maka UDF atau VBA
Dear Nando,
Formula =Max( {0.05;0.15;0.25;0.3} * B2 ) - {0;5e6;30e6;55e6}
merupakan formula array dengan kriteria,
Cara membaca formula tersebut adalah sbb:
1. array pertama dikalikan dengan B2 dan dikurangi dengan nilai array kedua
0.05 X B2 - 0
0.15 X B2 - 5E6 (5E6 = 5 X 10^6 = 5
Untuk Looping yang berisi kata baik pada sampai kurang pada (yang
tadinya terdapat 4 loop diganti dengan satu loop (for e ). cekript
selengkapnya :
For e = 1 To 4
bagian =
For c = 1 To 6
If (anu(c) = batasb(e) And anu(c) batasa(e)) Then *bagian =
kata(e)*
Next c
...
Next e
Walaikumsalam warahmatullah.
Mas Haris, Coba gunakan formula:
=INDEX(Pjs!R2:R10;MATCH(DAY(OutPut!B2);Pjs!Q2:Q10;0))
Jangan lupa mengubah ; menjadi , apabila komputer anda m,enggunakan
regional setting english atau usa.
Wasalam
KenangAgus
2014-10-07 14:51 GMT+07:00 ris ha har1sn.ex...@yahoo.com
Walaikumsalam warahmatullah,
Dear Agus,
Coba di H7 gunakan formula:
=IF(AND(H$4=$E7;H$4=$F7);$G7/(WEEKNUM($F7)-WEEKNUM($E7)+1);0)
Wasalam
Agus
2014-10-07 15:06 GMT+07:00 'Agus Ramiyanto' aramiya...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com:
Assalaamu ‘alaikum wr wb
Para
tatkala bulan berganti oktober (10) maka secara otomatis dia akan mencari
pada kolom oktober dan mencocokan tanggal pada kolom oktober tersebut.
On Tuesday, October 7, 2014 3:58 PM, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com wrote:
Walaikumsalam warahmatullah
Waalaikumsalam warahmatullah.
Mas Naidir dicoba formula:
=SUMPRODUCT((MONTH(List!$D$3:$D$13)=ROW(1:1))*(List!$E$3:$E$13))
Wasalam
NangAgus
2014-10-07 21:12 GMT+07:00 Naidir Ali naidir.ali1...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com:
Assalamu'alaikum Wr. wb.
Selamat malam,
Asalamualaikum warahmatullah.
Mas Nadir,
Mohon maaf mungkin saya salah mengartikan pertanyaan anda, karena di
komputer saya rumus tersebut dapat menghitung dengan baik,
Coba lihat lampiran,
Wasalam
NangAgus
Contoh1(1).xlsx
Description: MS-Excel 2007 spreadsheet
bulannya, tapi tidak apa itu buat
tambahan saya mas. Terimakasih
On 09/10/14 09:40, Nang Agus nanga...@gmail.com [belajar-excel] wrote:
Asalamualaikum warahmatullah.
Mas Nadir,
Mohon maaf mungkin saya salah mengartikan pertanyaan anda, karena di
komputer saya rumus tersebut dapat
Dear Belajar Excel,
1. Coba dibuat pada object workbook dengan prosedur open:
Private Sub Workbook_Open()
Sheet1.visible = xlSheetVeryHidden
Sheet3.visible = xlSheetVeryHidden
Sheet4.visible = xlSheetVeryHidden
Sheet5.visible = xlSheetVeryHidden
Sheet6.visible = xlSheetVeryHidden
end sub
2.
pada user name Pak, jadi pada
saat kita klik tanda x itu, workbook akan otomatis tertutup dengan
sendirinya,
Mohon bantuannya ya Pak..
Regards
Ronny S
On Monday, October 13, 2014 8:30 AM, Nang Agus nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com wrote:
Dear Belajar
nanga...@gmail.com
[belajar-excel] belajar-excel@yahoogroups.com wrote:
Bagaimana kalau loginUsernya tidak di share, tetapi ada disetiap
komputer client, tetapi file data yang di share sehingga dapat menyimpan
dari multi user.
2014-10-14 18:56 GMT+07:00 belajar excell belajar.exc
1 - 100 dari 404 matches
Mail list logo