Kamis, 26 Januari 2017

[belajar-excel] Digest Number 4075

9 Messages

Digest #4075

Messages

Wed Jan 25, 2017 6:02 pm (PST) . Posted by:

"Susilo -"

Dear Davin

Catatan saya terhadap pertanyaan yang diajukan

1. Setiap penghitungan manual payroll diakhir bulan selalu ada salah dalam
penghitungan.
Ini sudah jelas diketahui masalahnya, salah penghitungan. Bisa minta tolong
dituliskan salah yang dimaksud yang mana. Apakah pada total akhir, potongan
pajak, jam lembur, grading, atau yang lainnya. Ditulis dulu semua
permasalahan yang menyebabkan salah perhitungan itu. Atau paling tidak,
saya pengen anda berkomentar "Seharusnya hasilnya gak segini tapi segitu"
pada sebuah sel excel.

Untuk itulah, rekan-rekan di sini pengen lihat dulu bagaimana format excel
yang telah dibuat itu sehingga anda memunculkan statement "selalu ada
kesalahan". Dalam logika dan rumus excel, kesalahan-kesalahan penghitungan
bisa ditelusuri sehingga bisa diperbaiki rumusnya.

2. Contoh pelaporan yang baik
Ini juga sebuah parameter yang tidak jelas. Baik itu yang bagaimana?
masing-masing perusahaan punya komentar sendiri-sendiri terhadap sebuah
laporan. Dan saya yakin, pimpinan pun akan ada "rewel" terhadap laporan
yang diberikan kepadanya, itu sudah biasa dalam dunia kerja. Dari
komentar-komentar pimpinan tersebut, lemparkanlah ke forum ini sehingga
bisa kita pikirkan bersama jalan keluarnya. Sehingga laporanmu itu menjadi
"Baik" di mata pimpinan.

3. Attachment dari rekan Yusuf Roni bisa digunakan sebagai bahan
pertimbangan. Saya tidak bisa menyebutnya Baik. Saya malah pengen anda
berkomentar "Seharusnya ini tidak begitu", "Seharusnya ada kolom ini",
"Saya pengennya ada ini dan itu"

Dari kumpulan seharusnya seharusnya dan pengennya itulah, monggo dilempar
ke forum kembali untuk kita pikirkan bersama bagaimana enaknya.

Mohon maaf panjang
Terima kasih
Susilo

Pada 25 Januari 2017 10.28, y.roni35@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com> menulis:

>
>
> PASSWORD: MASUK
>
>

Wed Jan 25, 2017 6:37 pm (PST) . Posted by:

"Dede Sulaeman"

Dear Be Exceller,

Dapatkan formula excel memecah sebuah kata atau lebih menjadi suku kata?

File terlampir.

Salam,

DD

Wed Jan 25, 2017 6:56 pm (PST) . Posted by:

"Dede Sulaeman"

Dear Be Exceller,

Dapatkan formula excel memecah sebuah kata atau lebih menjadi suku kata?

File terlampir.

Salam,

DD

dede s

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 26 Januari 2017 9:37
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] Suku Kata [1 Attachment]

Dear Be Exceller,

Dapatkan formula excel memecah sebuah kata atau lebih menjadi suku kata?

File terlampir.

Salam,

DD

Wed Jan 25, 2017 8:34 pm (PST) . Posted by:

y.roni35

"Seharusnya ini tidak begitu", "Seharusnya ada kolom ini",???????

Wed Jan 25, 2017 8:47 pm (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Dede,

Jika Anda bisa mendefinisikan seluruh kemungkinan pemenggalan kata menjadi
suku-suku kata, saya pikir bisa dilakukan.
Sedikit (sangat) contoh yang perlu disusun kriterianya :
Rahman
Rahmani
Nyenyak
Menyapu
Anthony
Louis
dan
sebagainya

Regards,
Kid

2017-01-26 9:37 GMT+07:00 'Dede Sulaeman'
dede_sulaeman@pinusmerahabadi.co.id [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Dear Be Exceller,
>
>
>
> Dapatkan formula excel memecah sebuah kata atau lebih menjadi suku kata?
>
> File terlampir.
>
>
>
> Salam,
>
> DD
>
>
>
>
>

Wed Jan 25, 2017 9:06 pm (PST) . Posted by:

"Dede Sulaeman"

Dear Mr Kid,

Hmm....

Kira-kira di Pulau Jawa ini ada berapa bahasa yah....?

Trus di Kalimantan juga berapa yah...?

Itu baru dua Pulau, gimana kalau seluruh Indonesia yah, ada berapa Bahasa Coba......?

Nah Loh, itu baru Indonesia...., Negara tetangga belum diperhitungkan nih.

Hehehehe, Ok deh Mr. Kayaknya untuk menyusun semua kemungkinan pemenggalan mustahal bin mustahil dilakukan nih.

CASE CLOSE.

Terima kasih atas penerangannya.

Salam,

DD

dede s

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 26 Januari 2017 11:47
To: BeExcel
Subject: Re: [belajar-excel] Suku Kata

Hai Dede,

Jika Anda bisa mendefinisikan seluruh kemungkinan pemenggalan kata menjadi suku-suku kata, saya pikir bisa dilakukan.

Sedikit (sangat) contoh yang perlu disusun kriterianya :

Rahman

Rahmani

Nyenyak

Menyapu

Anthony

Louis

dan

sebagainya

Regards,

Kid

2017-01-26 9:37 GMT+07:00 'Dede Sulaeman' dede_sulaeman@pinusmerahabadi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:

Dear Be Exceller,

Dapatkan formula excel memecah sebuah kata atau lebih menjadi suku kata?

File terlampir.

Salam,

DD

Wed Jan 25, 2017 7:50 pm (PST) . Posted by:

"Dede Sulaeman"

Dear Mely,

Coba dengan ini :

Sub Hitung()

Dim rngKlir As Range

ActiveSheet.Unprotect 'ini yang ditambahkan

Set rngKlir = Sheets("Sheet1").Range("F4").CurrentRegion

Set rngKlir = rngKlir.Offset(1, 0).Resize(rngKlir.Rows.Count - 1)

Application.ScreenUpdating = False

rngKlir.ClearContents

Worksheets("Sheet1").Activate

Range("D4").Select

ActiveCell.FormulaR1C1 = _

"=IF(ISERROR((R[1]C[-2]-RC[-2])+1),"""",((R[1]C[-2]-RC[-2])+1))"

'hitung jumlah baris di kolom E mulai dari cell E4

Dim brs As Integer

brs = Range("D4").Value

Range("E4:E" & brs + 3).ClearContents

Range("E4:E" & brs + 3).FormulaR1C1 = "=N(R[-1]C)+1"

Cancel = True

Range("F4").Select

ActiveCell.FormulaR1C1 = "=RC[-4]"

Range("F5").Select

ActiveCell.FormulaR1C1 = "=IF(RC[-1]="""","""",R[-1]C+1)"

Range("F5").Select

Selection.AutoFill Destination:=Range("F5:F10000"), Type:=xlFillDefault

Range("F5:F10000").Select

Range("G4").Select

ActiveCell.FormulaR1C1 = "=IF(ISERROR(DEC2HEX(RC[-1])),"""",DEC2HEX(RC[-1]))"

Range("G4").Select

Selection.AutoFill Destination:=Range("G4:G10000"), Type:=xlFillDefault

Range("G4:G10000").Select

'Hilangkan formula di sheet1

Columns("D:G").Select

Selection.Copy

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

Application.CutCopyMode = False

Range("A1").Select

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True 'ini yang ditambahkan

Application.ScreenUpdating = True 'ini yang ditambahkan

End Sub

Salam,

DD

dede s

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 04 Januari 2017 15:38
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Membuat perintah macro untuk sheet yg areanya terproteksi

Pak Hendrik,

Terima kasih atas responnya.

Sepertinya saya masih belum paham untuk menerapkan script yg bapak berikan.

Dalam contoh cuplikan script macro dibawah ini:

Sub Hitung()

Dim rngKlir As Range

Set rngKlir = Sheets("Sheet1").Range("F4").CurrentRegion

Set rngKlir = rngKlir.Offset(1, 0).Resize(rngKlir.Rows.Count - 1)

Application.ScreenUpdating = False

rngKlir.ClearContents

Worksheets("Sheet1").Activate

Range("D4").Select

ActiveCell.FormulaR1C1 = _

"=IF(ISERROR((R[1]C[-2]-RC[-2])+1),"""",((R[1]C[-2]-RC[-2])+1))"

'hitung jumlah baris di kolom E mulai dari cell E4

Dim brs As Integer

brs = Range("D4").Value

Range("E4:E" & brs + 3).ClearContents

Range("E4:E" & brs + 3).FormulaR1C1 = "=N(R[-1]C)+1"

Cancel = True

perintah diatas sudah langsung stop pada baris berwarna kuning.

ketika saya coba rubah range (F4) pada currentRegion dgn cell nomor yg bapak berikan, hal ini tetap tidak berjalan.

Maklum, pak....masih belajar mengenal script macro, jadi masih perlu banyak belajar.

Terima kasih sebelumnya.

Salam,

Mely

On Wed, Jan 4, 2017 at 2:13 PM, hendrik karnadi hendrikkarnadi@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Hai Mely,

Untuk menghapus sel yang tidak terproteksi gunakan perintah:

Range("rangenya").ClearContents.

Contoh perintahnya:

Range("B2:B3,D4,E4:G1000").ClearContents

Salam,

HK

_____

From: "Melyana Silaban melyana.2012@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
To: belajar-excel@yahoogroups.com
Sent: Friday, 23 December 2016, 14:00
Subject: [belajar-excel] Membuat perintah macro untuk sheet yg areanya terproteksi [1 Attachment]

Dear para master excel & macro,

Mohon pencerahan untuk membuat perintah macro yg berfungsi meng-remove data dari cell tertentu seperti dalam file terlampir ini(warna hijau yg tidak terproteksi)

Dalam file ini beberapa cell terproteksi agar tidak ada tambahan sesuatu apapun di area tsb, sedangkan are yg tidak ter-proteksi adalah area yg akan selalu perlu di-update. Di dalam scrip macro yg saya buat contohnya ini tidak mampu untuk me-remove data di area yg TIDAK TER-PROTEKSI.

Hal ini dikarenakan keterbatasan pengetahuan saya tentang macro ini. Untuk itulah mohon pencerahan dari para pakar macro untuk membantu memberikan

solusi terhadap permasalahan ini.

Sebelumnya saya sampaikan banyak terima kasih atas bantuan yg diberikan.

Salam,

Mely

Wed Jan 25, 2017 8:33 pm (PST) . Posted by:

"Heru Safrudin" heru.safrudin

Alhamdulillah

Terima kasih Mr. Kid

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 25 Januari 2017 14:32
To: BeExcel
Subject: Re: [belajar-excel] Macro-Advanced Filter tidak jalan

Convert menjadi bertipe Long untuk tanggal saja atau Double untuk tanggal dan waktu.

Contoh :

range("a2").value=clng(now)

range("a3").value=cdbl(now)

Jika kriteria filter akan menggunakan operator perbandingan :

range("a2").value=">=" & clng(now)

range("b2").value="<=" & clng(now + 10)

Regards,

Kid

2017-01-25 12:01 GMT+07:00 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:

Dear Mr. Kid,

Benar juga, dan sukses

Satu pertanyaan lagi, bagaimana kode vba untuk menghasilkan Serial date ? karena excel langsung memformat date meski cell udah diformat general

Terima kasih

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 25 Januari 2017 11:53

To: BeExcel
Subject: Re: [belajar-excel] Macro-Advanced Filter tidak jalan

Hai Heru,

Pada dasarnya, advanced filter terhadap date dengan diformat pun bisa ketika nilai kriteria diformat sesuai dengan regional setting komputer setempat.

Terkadang, komputer lain menggunakan regional setting yang berbeda, sehingga konversi nilai kriteria tidak berjalan dengan baik.

Untuk menghindari kegagalan konversi nilai kriteria akibat format yang tidak sesuai regional setting setempat, maka digunakanlah nilai dateserial number.

Penggunaan operator perbandingan dimungkinkan dengan menuliskan operator tersebut. Contohnya >=1 yang berarti lebih dari atau sama dengan 1 jan 1900.

Misalkan di cells T1 berisi suatu nilai bertipe date bernilai 1 jan 1900 yang akan menjadi nilai kriteria, dan range kriteria ada di cells A2, maka di A2 bisa diberi formula berbunyi :

=">=" & T1

agar di A2 menghasilkan teks berbunyi >=1

Jika kriterianya adalah hari ini, bisa juga di A2 diberi formula :

=">=" & today()

Bila waktu (jam menit detik) juga menjadi bagian kriteria, bisa dengan :

=">=" & now()

Contoh lain : (yang kuning dianggap sebagai header worksheet [bukan header tabel kriteria])

A B

1 TGL TGL

2 >=1 <=22

Kriteria di atas berarti memfilter tabel berdasar kolom bernama [TGL] yang bernilai lebih dari atau sama dengan 1 (misal 1 jan 1900) dan kurang dari atau sama dengan 22 (misal 22 jan 1900)

Jika cells A2 di atas diberi formula =">=" & today()

dan cells B2 di atas diberi formula ="<=" & today()+10

maka tabel kriteria akan berarti :

memfilter tabel berdasar kolom bernama [TGL] yang bernilai dari atau sama dengan nilai date serial number hari ini dan kurang dari atau sama dengan nilai date serial number 10 hari setelah hari ini.

Kira-kira demikian.

Regards,

Kid

2017-01-25 11:28 GMT+07:00 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:

Dear Mr. Kid

Kenapa Kalo pake Advaced Filter manual kok bisa ya?

Terus bagaimana cara menggunakan kriteria dengan operator lebih atau sama dengan (>=)

Mohon penjelasannya

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
Sent: 25 Januari 2017 11:01
To: BeExcel
Subject: Re: [belajar-excel] Macro-Advanced Filter tidak jalan

Hai Heru,

Jika ada kriteria filter yang berupa data bertipe date, aturlah agar nilai kriteria menampilkan dateserial number nya alias tanpa format apapun. Jadi, yang tampak adalah nilai 1 untuk kriteria filter 01-Jan-1900.

Regards,

Kid

2017-01-25 10:03 GMT+07:00 'Heru Safrudin' fcprocessing.bisikediri@bisi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>:

Dear Be-Exceller,

Mohon bantuannya kenapa macro hasil record Advanced Filter saya tidak jalan? (file terlampir)

Terima kasih

Heru Safrudin

Wed Jan 25, 2017 9:19 pm (PST) . Posted by:

"Netty Wuryanti" netty.wuryanti

Dear master excel,




saya newbie, masih butuh banyak belajar excel.
permasalahan saya pernah dibahas disni juga tapi saya coba aplikasikan ngga ngerti juga. Kendala saya yaitu menggabungkan beberapa sheet menjadi 1 sheet, tolong dibantu.


atas bantuannya saya ucapkan terima kasih.


salam,
netty

--- Mods ---
File lampiran melebihi 250KB dilepas dari email. Silakan melampirkan ulang file berukuran maksimal 250KB (contoh data saja) dengan cara me-reply email ini.
--------------



On Wednesday, January 25, 2017 8:02 AM, Netty wrote:





Sent from my ASUS


-------- Original Message --------
From:"'Mr. Kid' mr.nmkid@gmail.com mailto:mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com mailto:belajar-excel@yahoogroups.com>
Sent:Wed, 25 Jan 2017 04:59:15 +0700
To:BeExcel <belajar-excel@yahoogroups.com mailto:belajar-excel@yahoogroups.com>
Subject:Re: [belajar-excel] Menggabung beberapa tabel menjadi satu



Hai Yanan,


> cara 1

Akan lebih mudah dan lebih baik jika Anda membuat atau meminta admin mssql db untuk membuat sebuah view yang berisi seluruh data (rekap yang Anda butuhkan). Kemudian Anda bisa membuat data connection (melalui fitur Get External Data di Excel) untuk mengkoneksi view rekap tersebut. Idealnya, tabel data yang ada di mssql db sudah berisi seluruh data rekap yang Anda butuhkan. Sedangkan koneksi data yang ada di Excel Anda sekarang sekadar koneksi ke suatu view yang berisi data dari kota tertentu yang berupa query yang mengambil dari tabel data yang kemudian difilter berdasar kotanya.

Dari koneksi data ke tabel data berisi rekap atau view yang berisi data dari seluruh kota tadi, dapat dibuat berbagai sheet berisi data per kota menggunakan fitur Excel Pivot Table.



Jadi, hal tersebut di atas adalah mengembalikan alur proses menjadi yang lebih wajar, yaitu dari 1 (satu) tabel data atau view di mssql db yang berisi data seluruh kota, lalu dikoneksi oleh Excel, kemudian dibuat sheets lain per kota dengan Excel Pivot Table merujuk ke sheet hasil koneksi seluruh kota tadi. Sedangkan Excel Anda adalah kebalikannya. Anda mengkoneksi setiap view per kota lalu ingin membuat rekapnya.

Cara yang lebih wajar tersebut juga lebih efisien, karena cukup sekali proses mentransfer data melalui koneksi data. Selebihnya (dalam membuat tampilan per kota) adalah kerja Excel.



> cara 2

Cara lainnya adalah mengubah salah satu koneksi data yang ada di Excel Anda. Yang diubah adalah bagian CommandType di set menjadi SQL dan bagian CommandText diisi query union all dari seluruh view per kota yang ada di mssql db. Jika susunan kolom di setiap view per kota adalah sama, maka quey union all nya akan memiliki struktur :

select * from view_kota1

union all
select * from view_kota2

union all
select * from view_kota3

dan seterusnya


Dari hasil koneksi data dengan query union all di atas, kemudian dibuat sheet per kota menggunakan Excel Pivot Table yang merujuk ke sheet hasil koneksi data query union all tersebut.

Cari ini tidak lebih efisien dibanding cara 1 yang ideal, tetapi lebih baik dibanding dengan membuat banyak koneksi per kota per sheet.



Regards,

Kid
















2017-01-19 8:26 GMT+07:00 neoyanan@yahoo.co.id mailto:neoyanan@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com mailto:belajar-excel@yahoogroups.com>:


Dear all,
Bagaimana cara menggabung beberapa tabel ke dalam 1 tabel ? Termasuk apabila tabel-tabel tersebut terupdate (tabel merupakan terkoneksi dengan database sql server) Terima kasih




















============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
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
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 01.54

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)