Kamis, 18 Juni 2015

[belajar-excel] Digest Number 3479

15 Messages

Digest #3479
1a
Re: Mengaktifkan CommandBars Undo and Redo by "Mr. Kid" nmkid.family@ymail.com
1b
Re: Mengaktifkan CommandBars Undo and Redo by "nurani alkena" alkenanurani
3a
Re: Tidak bisa Locked Range [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
4a
5a
Re: #Ask/Help :Hidden ROW otomatis [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
6b
Re: Tidak bisa Locked Range by "Toby kenzo" tobykenzo
6d
Re: Tidak bisa Locked Range by "Toby kenzo" tobykenzo

Messages

Thu Jun 18, 2015 3:04 am (PDT) . Posted by:

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

Hai Nurani,

Setiap* proses VBA yang melakukan pengubahan* terhadap suatu object tidak
bisa di-Undo karena Excel akan menghapus daftar kegiatan yang bisa di-Undo.

Untuk bisa meng-Undo 1 (satu) proses oleh VBA bisa dilakukan dengan :
1. membuat sebuah prosedur VBA berisi proses menata ulang balik proses oleh
VBA yang akan di-Undo
atau
2. save workbook ke nama lain sebelum proses dilakukan, menyediakan tombol
Undo sendiri yang berisi proses meload file yang telah di save sebelumnya
dan menutup file yang ada tanpa di save.

Bahasa singkatnya :
Kalau mengubah sesuatu dengan VBA, pastikan prosesnya tidak untuk bisa
di-undo, karena tidak disediakan oleh Excel atau mau repot membuat proses
baliknya sendiri.

Catatan :
Hal ini sungguh tidak menyenangkan, tetapi jika Anda ingin hidup bersama
Excel yang ada sekarang ini, maka hiduplah dengan keterbatasan Excel
tersebut secara rela maupun tidak rela.

Wassalam,
Kid

On Thu, Jun 18, 2015 at 6:24 PM, alkenanurani@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com> wrote:

>
>
> Mister bagaimana cara mengaktifkan CommandBars Undo and Redo pada event
> workbook_sheetchange
>
> berikut kodenya
>
> Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
>
> Target.Font.Color = vbBlue
>
> Dim ctl As CommandBarControl
>
> 'Undo
>
> For Each ctl In Application.CommandBars.FindControls(ID:=128)
>
> ctl.Enabled = True
>
> Next ctl
>
> 'Redo
>
> For Each ctl In Application.CommandBars.FindControls(ID:=129)
>
> ctl.Enabled = True
>
> Next ctl
>
> End Sub
>
>
> tapi tetap ndak bsa
>
>
>
>

Thu Jun 18, 2015 4:20 am (PDT) . Posted by:

"nurani alkena" alkenanurani



Ok terima kasih mister.

Saya hapus saja prosedur workbook_sheetchange nya. 

Karena lebih memprioritaskan undo dibandingkan prosedur ubah font colour 

Sent from Yahoo Mail on Android

From:"'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com>
Date:Thu, Jun 18, 2015 at 17:04
Subject:Re: [belajar-excel] Mengaktifkan CommandBars Undo and Redo

 

Hai Nurani,

Setiap proses VBA yang melakukan pengubahan terhadap suatu object tidak bisa di-Undo karena Excel akan menghapus daftar kegiatan yang bisa di-Undo.

Untuk bisa meng-Undo 1 (satu) proses oleh VBA bisa dilakukan dengan :

1. membuat sebuah prosedur VBA berisi proses menata ulang balik proses oleh VBA yang akan di-Undo

atau

2. save workbook ke nama lain sebelum proses dilakukan, menyediakan tombol Undo sendiri yang berisi proses meload file yang telah di save sebelumnya dan menutup file yang ada tanpa di save.

Bahasa singkatnya :

Kalau mengubah sesuatu dengan VBA, pastikan prosesnya tidak untuk bisa di-undo, karena tidak disediakan oleh Excel atau mau repot membuat proses baliknya sendiri.

Catatan :

Hal ini sungguh tidak menyenangkan, tetapi jika Anda ingin hidup bersama Excel yang ada sekarang ini, maka hiduplah dengan keterbatasan Excel tersebut secara rela maupun tidak rela.

Wassalam,

Kid

On Thu, Jun 18, 2015 at 6:24 PM, alkenanurani@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

 

Mister bagaimana cara mengaktifkan CommandBars Undo and Redo pada event workbook_sheetchange

berikut kodenya 

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Target.Font.Color = vbBlue

Dim ctl As CommandBarControl

'Undo

    For Each ctl In Application.CommandBars.FindControls(ID:=128)

        ctl.Enabled = True

    Next ctl

'Redo

    For Each ctl In Application.CommandBars.FindControls(ID:=129)

        ctl.Enabled = True

    Next ctl

End Sub

tapi tetap ndak bsa 

Thu Jun 18, 2015 3:26 am (PDT) . Posted by:

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

Hai Agusti,

File terlampir dengan beberapa kolom bantu

Regard,
Kid

2015-06-18 17:23 GMT+10:00 Agusti Dartius adartius@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> Selamat siang
> para ahli excel semua, saya mau bertanya lagi nie.
> pertanyaan saya ini masih ada hubungannya dengan pertanyaan saya yg
> sebelumnya yaitu dengan subject menghitung lama akese seorang user dalams
> ehari.
>
> Pertanyaan berikutnya adalah, bagaimana kita menghitung banyaknya hari
> kerja dimana dalam data tersebut adanya dua atau lebih data tanggal yang
> sama.
>
> Untuk selengkapnya ada di file terlampir.
>
> Terima kasih
> agusti
>
>
>
>
>
>
>

Thu Jun 18, 2015 10:57 pm (PDT) . Posted by:

"Agusti Dartius"

Hi Pak Kid
Terma kasih banyak, sangat membantu.You are the man.

On Thursday, June 18, 2015 6:26 PM, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:


  Hai Agusti,

File terlampir dengan beberapa kolom bantu

Regard,
Kid

2015-06-18 17:23 GMT+10:00 Agusti Dartius adartius@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:

  Selamat siang
para ahli excel semua, saya mau bertanya lagi nie.
pertanyaan saya ini masih ada hubungannya dengan pertanyaan saya yg sebelumnya yaitu dengan subject menghitung lama akese seorang user dalams ehari.
Pertanyaan berikutnya adalah, bagaimana kita menghitung banyaknya hari kerja dimana dalam data tersebut adanya dua atau lebih data tanggal yang sama.
Untuk selengkapnya ada di file terlampir.
Terima kasihagusti

 

#yiv7883372071 #yiv7883372071 -- #yiv7883372071ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7883372071 #yiv7883372071ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7883372071 #yiv7883372071ygrp-mkp #yiv7883372071hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7883372071 #yiv7883372071ygrp-mkp #yiv7883372071ads {margin-bottom:10px;}#yiv7883372071 #yiv7883372071ygrp-mkp .yiv7883372071ad {padding:0 0;}#yiv7883372071 #yiv7883372071ygrp-mkp .yiv7883372071ad p {margin:0;}#yiv7883372071 #yiv7883372071ygrp-mkp .yiv7883372071ad a {color:#0000ff;text-decoration:none;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ygrp-lc {font-family:Arial;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ygrp-lc #yiv7883372071hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ygrp-lc .yiv7883372071ad {margin-bottom:10px;padding:0 0;}#yiv7883372071 #yiv7883372071actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7883372071 #yiv7883372071activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7883372071 #yiv7883372071activity span {font-weight:700;}#yiv7883372071 #yiv7883372071activity span:first-child {text-transform:uppercase;}#yiv7883372071 #yiv7883372071activity span a {color:#5085b6;text-decoration:none;}#yiv7883372071 #yiv7883372071activity span span {color:#ff7900;}#yiv7883372071 #yiv7883372071activity span .yiv7883372071underline {text-decoration:underline;}#yiv7883372071 .yiv7883372071attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7883372071 .yiv7883372071attach div a {text-decoration:none;}#yiv7883372071 .yiv7883372071attach img {border:none;padding-right:5px;}#yiv7883372071 .yiv7883372071attach label {display:block;margin-bottom:5px;}#yiv7883372071 .yiv7883372071attach label a {text-decoration:none;}#yiv7883372071 blockquote {margin:0 0 0 4px;}#yiv7883372071 .yiv7883372071bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7883372071 .yiv7883372071bold a {text-decoration:none;}#yiv7883372071 dd.yiv7883372071last p a {font-family:Verdana;font-weight:700;}#yiv7883372071 dd.yiv7883372071last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7883372071 dd.yiv7883372071last p span.yiv7883372071yshortcuts {margin-right:0;}#yiv7883372071 div.yiv7883372071attach-table div div a {text-decoration:none;}#yiv7883372071 div.yiv7883372071attach-table {width:400px;}#yiv7883372071 div.yiv7883372071file-title a, #yiv7883372071 div.yiv7883372071file-title a:active, #yiv7883372071 div.yiv7883372071file-title a:hover, #yiv7883372071 div.yiv7883372071file-title a:visited {text-decoration:none;}#yiv7883372071 div.yiv7883372071photo-title a, #yiv7883372071 div.yiv7883372071photo-title a:active, #yiv7883372071 div.yiv7883372071photo-title a:hover, #yiv7883372071 div.yiv7883372071photo-title a:visited {text-decoration:none;}#yiv7883372071 div#yiv7883372071ygrp-mlmsg #yiv7883372071ygrp-msg p a span.yiv7883372071yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7883372071 .yiv7883372071green {color:#628c2a;}#yiv7883372071 .yiv7883372071MsoNormal {margin:0 0 0 0;}#yiv7883372071 o {font-size:0;}#yiv7883372071 #yiv7883372071photos div {float:left;width:72px;}#yiv7883372071 #yiv7883372071photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv7883372071 #yiv7883372071photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7883372071 #yiv7883372071reco-category {font-size:77%;}#yiv7883372071 #yiv7883372071reco-desc {font-size:77%;}#yiv7883372071 .yiv7883372071replbq {margin:4px;}#yiv7883372071 #yiv7883372071ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7883372071 #yiv7883372071ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7883372071 #yiv7883372071ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7883372071 #yiv7883372071ygrp-mlmsg select, #yiv7883372071 input, #yiv7883372071 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7883372071 #yiv7883372071ygrp-mlmsg pre, #yiv7883372071 code {font:115% monospace;}#yiv7883372071 #yiv7883372071ygrp-mlmsg * {line-height:1.22em;}#yiv7883372071 #yiv7883372071ygrp-mlmsg #yiv7883372071logo {padding-bottom:10px;}#yiv7883372071 #yiv7883372071ygrp-msg p a {font-family:Verdana;}#yiv7883372071 #yiv7883372071ygrp-msg p#yiv7883372071attach-count span {color:#1E66AE;font-weight:700;}#yiv7883372071 #yiv7883372071ygrp-reco #yiv7883372071reco-head {color:#ff7900;font-weight:700;}#yiv7883372071 #yiv7883372071ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ov li a {font-size:130%;text-decoration:none;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7883372071 #yiv7883372071ygrp-sponsor #yiv7883372071ov ul {margin:0;padding:0 0 0 8px;}#yiv7883372071 #yiv7883372071ygrp-text {font-family:Georgia;}#yiv7883372071 #yiv7883372071ygrp-text p {margin:0 0 1em 0;}#yiv7883372071 #yiv7883372071ygrp-text tt {font-size:120%;}#yiv7883372071 #yiv7883372071ygrp-vital ul li:last-child {border-right:none !important;}#yiv7883372071

Thu Jun 18, 2015 3:29 am (PDT) . Posted by:

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

Hai DD,

Coba hapus baris ini :
*On Error Resume Next*

Tujuan :
Supaya Anda bisa tahu letak error yang menyebabkan hasil kerja si script
tidak sesuai harapan Anda.

Langkah berikutnya :
Perbaiki baris yang error tersebut.

Langkah lanjutannya :
Sederhanakan prosesnya agar tanpa proses Select

Wassalam,
Kid

On Thu, Jun 18, 2015 at 12:36 PM, Dede pmaho_log4@nabatisnack.co.id
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Dear Be Exceller,
>
>
>
> Mohon bantuannya untuk koreksi makro ini :
>
>
>
> *Sub Macro4()*
>
> * Jmlhbrs = Range("a1").Value*
>
> * Range("a2").Select*
>
> *For i = 1 To Jmlhbrs*
>
> * ActiveCell.Offset(1, 0).Select*
>
> * j = ActiveCell.Value*
>
> * On Error Resume Next*
>
> * Workbooks.Open Filename:="D:\BAD STOCK\Master&#92;STD-STM PMA -
> Copy.xlsb"*
>
> * ActiveSheet.Unprotect Password:="a"*
>
> * Range("a6").Value = j*
>
> * Range("c4").Value = s*
>
> * Range("" & s & "+1,1:C100&quot;).Select*
>
> * Selection.Locked = False*
>
> * Selection.FormulaHidden = True*
>
> * Range("c6:" & s & "").Select*
>
> * Selection.Locked = True*
>
> * Selection.FormulaHidden = True*
>
> * ActiveSheet.Protect Password:="a"*
>
> * ChDir "D:\BAD STOCK\Email&quot;*
>
> * ActiveWorkbook.SaveAs Filename:="D:\BAD STOCK\Email&#92;" & j &
> ".xlsb", _*
>
> * FileFormat:=xlExcel12, CreateBackup:=False*
>
> * ActiveWindow.Close*
>
> *Next i*
>
> *End Sub*
>
>
>
> Harapannya pada saat makro dijalankan, kolom C pada file terlampir dimana
> terdapat kode barang maka range tersebut dalam keadaan ter-"Locked".
>
>
>
> Demikian dan terima kasih.
>
>
>
> Salam,
>
> DD
>
> ------------------------------
> This e-mail and any files transmitted with it are confidential and
> intended solely for the use of the individual to whom it is addressed. If
> you have received this email in error please send it back to the person
> that sent it to you. Any views or opinions presented are solely those of
> its author and do not necessarily represent those of NABATI or any of its
> subsidiary companies. Unauthorized publication, use, dissemination,
> forwarding, printing or copying of this email and its associated
> attachments is strictly prohibited.
>
>
>

Thu Jun 18, 2015 3:43 am (PDT) . Posted by:

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

Hai Fajar,

Andaikan gambar yang baru dilakukan berulang juga, yaitu dengan proses
insert picture dari ribbon Insert, coba file yang ada disini
<https://app.box.com/s/vp8lqos5zq0gb4kx94i6>.
File tersebut cukup meminta Anda menginput nama folder dan nama file gambar
yang akan dipasang, serta menunjuk range lokasi penempatan si gambar yang
baru. Jika dilokasi tersebut sudah ada suatu gambar, maka isi gambar lama
akan diganti.
Jadi, inputnya berupa teks nama folder dan file gambar tersebut. Bisa Anda
gunakan dalam suatu daftar. Nama folder dan nama file gambar (teks)
tersebut bisa disusun dengan suatu formula.

Prosedur pengambil gambarnya berupa sebuah function, jadi Anda juga bisa
menggunakannya sebagai UDF, sehingga bisa digunakan secara langsung seperti
sebuah fungsi bawaan Excel lain.

Andai gambar yang baru adalah hasil copas (bukan dari suatu file gambar),
coba kembangkan yang ada dalam file yang ada disini
<https://app.box.com/s/xt9m126qfn7c6znmjrv5>.

Wassalam,
Kid

On Thu, Jun 18, 2015 at 12:26 PM, Fajar Fatahillah
fajar.fatahillah@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>
wrote:

>
>
> Dear Para Master Excel,
> sebelumnya saya ucapkan selamat menjalankan puasa ramadhan
>
> saya ada kasus tentang gambar di excel nih, dan ini pekerjaan berulang,
> yaitu delete gambar existing dengan gambar baru dengan cara paste value
> picture..
> caranya gimana ya?
>
> :D
>
>
> Best Regards,
> Fajar Fatahillah
>
>
>
> On Thursday, June 18, 2015 1:04 AM, "nurani alkena
> alkenanurani@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com>
> wrote:
>
>
>
> mister makasih banyak atas jawaban2 nya. saya minta maaf pertanyaan
> diatas tidak jadi saya tanyakan...
> sudah ketemu solusinya
> mohon maaf lahir batin.....
>
>
>
>
>
> On Wednesday, June 17, 2015 2:45 PM, "alkenanurani@yahoo.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Terima kasih atas jawaban yang sudah diberikan dari topik-topik
> sebelumnya.
> Mr saya mau tanya lagi... saya memiliki sheet yang terproteksi dan saya
> memiliki commandbutton untuk perintah copy. ketika saya mencopy data
> tersebut ke deactive workbook kemudian menempelkan data tersebut
> menggunakan perintah paste. saya menginginkan perintah paste nya hanya
> berupa value dgn formatya tetap ???.
> bagaimana code di deactive workbooknya. karena saya sudah mencoba paste
> value and format tetapi hasilnya masih berupa rumus dan format.
>
> Terima Kasih
>
>
>
>
>
>

Thu Jun 18, 2015 3:58 am (PDT) . Posted by:

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

Hai Aza,

Sebenarnya kasus Anda ini perlu penjelasan lebih detil tentang kata
'otomatis terhidden' yang Anda maksud.
1. jika otomatis ter-hidden ketika klik sesuatu, cukup manfaatkan fitur
autofilter
2. jika otomatis ter-hidden jika ada cells yang diubah nilainya, bisa jadi
dibutuhkan VBA untuk mengaktifkan autofilter atau me-reapply si proses
filter oleh autofiter.
3. jika otomatis ter-hidden dilakukan dengan maksud menampilkan suatu nilai
tanpa nilai 0, manfaatkan fitur Excel Pivot Table

Asumsi yang digunakan pada beberapa opsi di atas adalah ketika Anda
memiliki lebih dari 1 record yang bisa jadi diubah satu per satu atau
langsung lebih dari 1 sekaligus dan akan menghasilkan penampakan tanpa
nilai 0.

Wassalam,
Kid

2015-06-18 12:41 GMT+10:00 aza_faza@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Yth. Para Master excel, mohon bantuannya, tolong dibuatin formula agar row
> yang bernilai 0 bisa otomatis di HIDDEN...untuk lebih jelasnya saya
> lampirkan contohnya
>
> Salam
> Terima Kasih
>
>

Thu Jun 18, 2015 7:29 pm (PDT) . Posted by:

"azafaza" aza_faza

Terima kasih untuk semua master ...sudah saya coba trik Commandbutton nya bro Toby...and sukses


Pada Kamis, 18 Juni 2015 17:58, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Hai Aza,

Sebenarnya kasus Anda ini perlu penjelasan lebih detil tentang kata 'otomatis terhidden' yang Anda maksud.
1. jika otomatis ter-hidden ketika klik sesuatu, cukup manfaatkan fitur autofilter
2. jika otomatis ter-hidden jika ada cells yang diubah nilainya, bisa jadi dibutuhkan VBA untuk mengaktifkan autofilter atau me-reapply si proses filter oleh autofiter.
3. jika otomatis ter-hidden dilakukan dengan maksud menampilkan suatu nilai tanpa nilai 0, manfaatkan fitur Excel Pivot Table

Asumsi yang digunakan pada beberapa opsi di atas adalah ketika Anda memiliki lebih dari 1 record yang bisa jadi diubah satu per satu atau langsung lebih dari 1 sekaligus dan akan menghasilkan penampakan tanpa nilai 0.

Wassalam,
Kid

2015-06-18 12:41 GMT+10:00 aza_faza@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:

  Yth. Para Master excel, mohon bantuannya, tolong dibuatin formula agar row yang bernilai 0 bisa otomatis di HIDDEN...untuk lebih jelasnya saya lampirkan contohnya

Salam
Terima Kasih

#yiv1951484742 #yiv1951484742 -- #yiv1951484742ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1951484742 #yiv1951484742ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1951484742 #yiv1951484742ygrp-mkp #yiv1951484742hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1951484742 #yiv1951484742ygrp-mkp #yiv1951484742ads {margin-bottom:10px;}#yiv1951484742 #yiv1951484742ygrp-mkp .yiv1951484742ad {padding:0 0;}#yiv1951484742 #yiv1951484742ygrp-mkp .yiv1951484742ad p {margin:0;}#yiv1951484742 #yiv1951484742ygrp-mkp .yiv1951484742ad a {color:#0000ff;text-decoration:none;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ygrp-lc {font-family:Arial;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ygrp-lc #yiv1951484742hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ygrp-lc .yiv1951484742ad {margin-bottom:10px;padding:0 0;}#yiv1951484742 #yiv1951484742actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1951484742 #yiv1951484742activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1951484742 #yiv1951484742activity span {font-weight:700;}#yiv1951484742 #yiv1951484742activity span:first-child {text-transform:uppercase;}#yiv1951484742 #yiv1951484742activity span a {color:#5085b6;text-decoration:none;}#yiv1951484742 #yiv1951484742activity span span {color:#ff7900;}#yiv1951484742 #yiv1951484742activity span .yiv1951484742underline {text-decoration:underline;}#yiv1951484742 .yiv1951484742attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1951484742 .yiv1951484742attach div a {text-decoration:none;}#yiv1951484742 .yiv1951484742attach img {border:none;padding-right:5px;}#yiv1951484742 .yiv1951484742attach label {display:block;margin-bottom:5px;}#yiv1951484742 .yiv1951484742attach label a {text-decoration:none;}#yiv1951484742 blockquote {margin:0 0 0 4px;}#yiv1951484742 .yiv1951484742bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1951484742 .yiv1951484742bold a {text-decoration:none;}#yiv1951484742 dd.yiv1951484742last p a {font-family:Verdana;font-weight:700;}#yiv1951484742 dd.yiv1951484742last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1951484742 dd.yiv1951484742last p span.yiv1951484742yshortcuts {margin-right:0;}#yiv1951484742 div.yiv1951484742attach-table div div a {text-decoration:none;}#yiv1951484742 div.yiv1951484742attach-table {width:400px;}#yiv1951484742 div.yiv1951484742file-title a, #yiv1951484742 div.yiv1951484742file-title a:active, #yiv1951484742 div.yiv1951484742file-title a:hover, #yiv1951484742 div.yiv1951484742file-title a:visited {text-decoration:none;}#yiv1951484742 div.yiv1951484742photo-title a, #yiv1951484742 div.yiv1951484742photo-title a:active, #yiv1951484742 div.yiv1951484742photo-title a:hover, #yiv1951484742 div.yiv1951484742photo-title a:visited {text-decoration:none;}#yiv1951484742 div#yiv1951484742ygrp-mlmsg #yiv1951484742ygrp-msg p a span.yiv1951484742yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1951484742 .yiv1951484742green {color:#628c2a;}#yiv1951484742 .yiv1951484742MsoNormal {margin:0 0 0 0;}#yiv1951484742 o {font-size:0;}#yiv1951484742 #yiv1951484742photos div {float:left;width:72px;}#yiv1951484742 #yiv1951484742photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1951484742 #yiv1951484742photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1951484742 #yiv1951484742reco-category {font-size:77%;}#yiv1951484742 #yiv1951484742reco-desc {font-size:77%;}#yiv1951484742 .yiv1951484742replbq {margin:4px;}#yiv1951484742 #yiv1951484742ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1951484742 #yiv1951484742ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1951484742 #yiv1951484742ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1951484742 #yiv1951484742ygrp-mlmsg select, #yiv1951484742 input, #yiv1951484742 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1951484742 #yiv1951484742ygrp-mlmsg pre, #yiv1951484742 code {font:115% monospace;}#yiv1951484742 #yiv1951484742ygrp-mlmsg * {line-height:1.22em;}#yiv1951484742 #yiv1951484742ygrp-mlmsg #yiv1951484742logo {padding-bottom:10px;}#yiv1951484742 #yiv1951484742ygrp-msg p a {font-family:Verdana;}#yiv1951484742 #yiv1951484742ygrp-msg p#yiv1951484742attach-count span {color:#1E66AE;font-weight:700;}#yiv1951484742 #yiv1951484742ygrp-reco #yiv1951484742reco-head {color:#ff7900;font-weight:700;}#yiv1951484742 #yiv1951484742ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ov li a {font-size:130%;text-decoration:none;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1951484742 #yiv1951484742ygrp-sponsor #yiv1951484742ov ul {margin:0;padding:0 0 0 8px;}#yiv1951484742 #yiv1951484742ygrp-text {font-family:Georgia;}#yiv1951484742 #yiv1951484742ygrp-text p {margin:0 0 1em 0;}#yiv1951484742 #yiv1951484742ygrp-text tt {font-size:120%;}#yiv1951484742 #yiv1951484742ygrp-vital ul li:last-child {border-right:none !important;}#yiv1951484742

Thu Jun 18, 2015 7:55 pm (PDT) . Posted by:

"Dede"

Dear Mr Toby,

Sukses.....

Terima kasih atas ilmunya.

Sedikit saja saya mau bertanya, ini tentang " Dim jmlhbaris As Integer".

Analisa saya jmlhbaris = dalam bentuk angka

Pertanyaan saya kalau jmlhbaris = dalam bentuk text, "Dim jmlhbaris As .......?"

Saya sedang bereksperimen masalah :

Dim a As String

a = Sheet4.Range("c1").Value

Makro Sukses kalau "Sheet4 cell C1" dalam bentuk angka, tapi begitu saya rubah "Sheet4 cell C1" dalam bentuk text makro tidak berjalan sebagaimana yang diharapkan.

Moho arahannya.

Salam,

DD

From: Toby kenzo tobykenzo@yahoo.co.id [belajar-excel] [mailto:belajar-excel@yahoogroups.com]
Sent: 18 Juni 2015 11:29
To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] Tidak bisa Locked Range

Dear DD,

Coba buat commonButton dan masukan program ini:

Dim jmlhbaris As Integer

jmlhbaris = Sheet4.Range("C4").Value

ActiveSheet.Unprotect Password:="a"

Sheet4.Range(Cells(6, 3), Cells(jmlhbaris, 3)).Select

Selection.Locked = True
Selection.FormulaHidden = True

ActiveSheet.Protect DrawingObjects:=False, _
Contents:=True, Scenarios:=False, _
AllowFormattingCells:=True, _
AllowFormattingColumns:=True, _
AllowFormattingRows:=True, _
AllowInsertingColumns:=True, _
AllowInsertingRows:=True, _
AllowInsertingHyperlinks:=True, _
AllowDeletingColumns:=True, _
AllowDeletingRows:=True, _
AllowSorting:=True, _
AllowFiltering:=True, _
AllowUsingPivotTables:=True

ActiveSheet.Protect Password:="a"

TerimaKasih.

Pada Kamis, 18 Juni 2015 9:37, "Dede pmaho_log4@nabatisnack.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:

Dear Be Exceller,

Mohon bantuannya untuk koreksi makro ini :

Sub Macro4()

Jmlhbrs = Range("a1").Value

Range("a2").Select

For i = 1 To Jmlhbrs

ActiveCell.Offset(1, 0).Select

j = ActiveCell.Value

On Error Resume Next

Workbooks.Open Filename:="D:\BAD STOCK\Master&#92;STD-STM PMA - Copy.xlsb"

ActiveSheet.Unprotect Password:="a"

Range("a6").Value = j

Range("c4").Value = s

Range("" & s & "+1,1:C100&quot;).Select

Selection.Locked = False

Selection.FormulaHidden = True

Range("c6:" & s & "").Select

Selection.Locked = True

Selection.FormulaHidden = True

ActiveSheet.Protect Password:="a"

ChDir "D:\BAD STOCK\Email&quot;

ActiveWorkbook.SaveAs Filename:="D:\BAD STOCK\Email&#92;" & j & ".xlsb", _

FileFormat:=xlExcel12, CreateBackup:=False

ActiveWindow.Close

Next i

End Sub

Harapannya pada saat makro dijalankan, kolom C pada file terlampir dimana terdapat kode barang maka range tersebut dalam keadaan ter-"Locked".

Demikian dan terima kasih.

Salam,

DD

_____

This e-mail and any files transmitted with it are confidential and intended solely for the use of the individual to whom it is addressed. If you have received this email in error please send it back to the person that sent it to you. Any views or opinions presented are solely those of its author and do not necessarily represent those of NABATI or any of its subsidiary companies. Unauthorized publication, use, dissemination, forwarding, printing or copying of this email and its associated attachments is strictly prohibited.

Thu Jun 18, 2015 8:22 pm (PDT) . Posted by:

"Toby kenzo" tobykenzo

coba pake string

Sent from Yahoo Mail on Android

Thu Jun 18, 2015 9:07 pm (PDT) . Posted by:

"Dede"

Dear Mr Toby,

Sukses.....,

Ternyata masalahnya adalah di cell C1 ada karakter "/". Soalnya a = Sheet4.Range("c1").Value saya gunakan sebagai acuan NamaFileBaru.

Mohon koreksi untuk makro ini karena pada saat dijalankan file terSaveAs namun sheet5 yang very hidden tidak tampil, padahal sudah sata tambahkan script seperti warna merah dibawah ini :

Private Sub CommandButton1_Click()

Dim a As String

a = Sheet4.Range("c1").Value

On Error Resume Next

Worksheet.Active

Worksheet("Sheet5").Visible = xlVeryHidden = False

Worksheet("Sheet5").Visible = xlVisible = True

Sheets("Persetujuan Pemusnahan BS").Select

Range("B3:D4").Select

Selection.Copy

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

:=False, Transpose:=False

Application.CutCopyMode = False

ActiveWorkbook.Save

ChDir _

"D:\BAD STOCK\2015\06 Juni 2015\Persetujuan Pemusnahan BS PMA GT-MT Nasional Juni 2015\Email Kirim ke Mr. Tian"

ActiveWorkbook.SaveAs Filename:= _

"D:\BAD STOCK\2015\06 Juni 2015\Persetujuan Pemusnahan BS PMA GT-MT Nasional Juni 2015\Email Kirim ke Mr. Tian\" & a & ".xlsb" _

, FileFormat:=xlExcel12, CreateBackup:=False

ActiveWindow.Close

End Sub

Harapannya adalah di file yang baru sheet tersebut tampil dengan sendirinya, mohon arahannya.

Salam,

DD

From: Toby kenzo tobykenzo@yahoo.co.id [belajar-excel] [mailto:belajar-excel@yahoogroups.com]
Sent: 19 Juni 2015 10:22
To: belajar-excel@yahoogroups.com
Subject: Re: RE: [belajar-excel] Tidak bisa Locked Range

coba pake string

Sent from Yahoo Mail on Android <http://overview.mail.yahoo.com/mobile/?.src=Android>

_____

From: Dede pmaho_log4@nabatisnack.co.id [belajar-excel] <belajar-excel@yahoogroups.com>;
To: <belajar-excel@yahoogroups.com>;
Subject: RE: [belajar-excel] Tidak bisa Locked Range
Sent: Fri, Jun 19, 2015 2:54:50 AM

Dear Mr Toby,

Sukses.....

Terima kasih atas ilmunya.

Sedikit saja saya mau bertanya, ini tentang " Dim jmlhbaris As Integer".

Analisa saya jmlhbaris = dalam bentuk angka

Pertanyaan saya kalau jmlhbaris = dalam bentuk text, "Dim jmlhbaris As .......?"

Saya sedang bereksperimen masalah :

Dim a As String

a = Sheet4.Range("c1").Value

Makro Sukses kalau "Sheet4 cell C1" dalam bentuk angka, tapi begitu saya rubah "Sheet4 cell C1" dalam bentuk text makro tidak berjalan sebagaimana yang diharapkan.

Moho arahannya.

Salam,

DD

From: Toby kenzo tobykenzo@yahoo.co.id [belajar-excel] [mailto:belajar-excel@yahoogroups.com]
Sent: 18 Juni 2015 11:29
To: belajar-excel@yahoogroups.com
Subject: Bls: [belajar-excel] Tidak bisa Locked Range

Dear DD,

Coba buat commonButton dan masukan program ini:

Dim jmlhbaris As Integer

jmlhbaris = Sheet4.Range("C4").Value

ActiveSheet.Unprotect Password:="a"

Sheet4.Range(Cells(6, 3), Cells(jmlhbaris, 3)).Select

Selection.Locked = True
Selection.FormulaHidden = True

ActiveSheet.Protect DrawingObjects:=False, _
Contents:=True, Scenarios:=False, _
AllowFormattingCells:=True, _
AllowFormattingColumns:=True, _
AllowFormattingRows:=True, _
AllowInsertingColumns:=True, _
AllowInsertingRows:=True, _
AllowInsertingHyperlinks:=True, _
AllowDeletingColumns:=True, _
AllowDeletingRows:=True, _
AllowSorting:=True, _
AllowFiltering:=True, _
AllowUsingPivotTables:=True

ActiveSheet.Protect Password:="a"

TerimaKasih.

Pada Kamis, 18 Juni 2015 9:37, "Dede pmaho_log4@nabatisnack.co.id [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:

Dear Be Exceller,

Mohon bantuannya untuk koreksi makro ini :

Sub Macro4()

Jmlhbrs = Range("a1").Value

Range("a2").Select

For i = 1 To Jmlhbrs

ActiveCell.Offset(1, 0).Select

j = ActiveCell.Value

On Error Resume Next

Workbooks.Open Filename:="D:\BAD STOCK\Master&#92;STD-STM PMA - Copy.xlsb"

ActiveSheet.Unprotect Password:="a"

Range("a6").Value = j

Range("c4").Value = s

Range("" & s & "+1,1:C100&quot;).Select

Selection.Locked = False

Selection.FormulaHidden = True

Range("c6:" & s & "").Select

Selection.Locked = True

Selection.FormulaHidden = True

ActiveSheet.Protect Password:="a"

ChDir "D:\BAD STOCK\Email&quot;

ActiveWorkbook.SaveAs Filename:="D:\BAD STOCK\Email&#92;" & j & ".xlsb", _

FileFormat:=xlExcel12, CreateBackup:=False

ActiveWindow.Close

Next i

End Sub

Harapannya pada saat makro dijalankan, kolom C pada file terlampir dimana terdapat kode barang maka range tersebut dalam keadaan ter-"Locked".

Demikian dan terima kasih.

Salam,

DD

_____

This e-mail and any files transmitted with it are confidential and intended solely for the use of the individual to whom it is addressed. If you have received this email in error please send it back to the person that sent it to you. Any views or opinions presented are solely those of its author and do not necessarily represent those of NABATI or any of its subsidiary companies. Unauthorized publication, use, dissemination, forwarding, printing or copying of this email and its associated attachments is strictly prohibited.

Thu Jun 18, 2015 11:17 pm (PDT) . Posted by:

"Toby kenzo" tobykenzo

coba di ganti dari worksheets("Sheet5").visible = xlveryhidden= false di ganti menjadi:
sheet5.visible= true untuk membuka file yg terhidden.

Sent from Yahoo Mail on Android

Thu Jun 18, 2015 10:57 pm (PDT) . Posted by:

"Ristanto Ristanto" ristanto1111

halo rekan rekan Excel
Entah apa nama istilahnya ya saya ada kejadian kayak gini : Terkadang saya menemui masalah pada beberapa file excel yang isinya adalah formula dan lookup (seperti itulah misalnya) nah ketika mengedit formula di dalam file tersebut reaksi nya tidak seketika berubah, namun malah harus di pencet SAVE baru dia ber-reaksi. 
Misal :
Ada formula =B1+5 --> menghasilkan 10 (di cell C1)
Ketika diganti menjadi = B1+6 --> hasilnya tetap 10, namun setelah di Save baru beraksi menjadi 11 (di cell C1)
Pertanyaannya :Yang bermasalah ini apakah file excelnya atau system windows ? apakah ada solusi yg bisa saya coba ?
Mohon info dan solusinya bila ada yg pernah mengalami hal serupa, ini penting bagi saya karena cukup berbahaya jika olah data sangat berbahaya bila reaksinya menunggu pencet tombol SAVE. terimakasih rekan
Regards
RISTANTOFYI : saya menggunakan MS excel 2010 dan 2013 

Thu Jun 18, 2015 11:36 pm (PDT) . Posted by:

"Toby kenzo" tobykenzo

Dear Ristanto, Sudah coba di aktifkan workbook calculation ke Automatic.klick File --> options --> formulas --> Workbook Calculation --> klick Automatic TerimaKasih.

Pada Jumat, 19 Juni 2015 12:58, "Ristanto Ristanto ristanto1111@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  halo rekan rekan Excel
Entah apa nama istilahnya ya saya ada kejadian kayak gini : Terkadang saya menemui masalah pada beberapa file excel yang isinya adalah formula dan lookup (seperti itulah misalnya) nah ketika mengedit formula di dalam file tersebut reaksi nya tidak seketika berubah, namun malah harus di pencet SAVE baru dia ber-reaksi. 
Misal :
Ada formula =B1+5 --> menghasilkan 10 (di cell C1)
Ketika diganti menjadi = B1+6 --> hasilnya tetap 10, namun setelah di Save baru beraksi menjadi 11 (di cell C1)
Pertanyaannya :Yang bermasalah ini apakah file excelnya atau system windows ? apakah ada solusi yg bisa saya coba ?
Mohon info dan solusinya bila ada yg pernah mengalami hal serupa, ini penting bagi saya karena cukup berbahaya jika olah data sangat berbahaya bila reaksinya menunggu pencet tombol SAVE. terimakasih rekan
Regards
RISTANTOFYI : saya menggunakan MS excel 2010 dan 2013  #yiv4111806513 #yiv4111806513 -- #yiv4111806513ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv4111806513 #yiv4111806513ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv4111806513 #yiv4111806513ygrp-mkp #yiv4111806513hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv4111806513 #yiv4111806513ygrp-mkp #yiv4111806513ads {margin-bottom:10px;}#yiv4111806513 #yiv4111806513ygrp-mkp .yiv4111806513ad {padding:0 0;}#yiv4111806513 #yiv4111806513ygrp-mkp .yiv4111806513ad p {margin:0;}#yiv4111806513 #yiv4111806513ygrp-mkp .yiv4111806513ad a {color:#0000ff;text-decoration:none;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ygrp-lc {font-family:Arial;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ygrp-lc #yiv4111806513hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ygrp-lc .yiv4111806513ad {margin-bottom:10px;padding:0 0;}#yiv4111806513 #yiv4111806513actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv4111806513 #yiv4111806513activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv4111806513 #yiv4111806513activity span {font-weight:700;}#yiv4111806513 #yiv4111806513activity span:first-child {text-transform:uppercase;}#yiv4111806513 #yiv4111806513activity span a {color:#5085b6;text-decoration:none;}#yiv4111806513 #yiv4111806513activity span span {color:#ff7900;}#yiv4111806513 #yiv4111806513activity span .yiv4111806513underline {text-decoration:underline;}#yiv4111806513 .yiv4111806513attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv4111806513 .yiv4111806513attach div a {text-decoration:none;}#yiv4111806513 .yiv4111806513attach img {border:none;padding-right:5px;}#yiv4111806513 .yiv4111806513attach label {display:block;margin-bottom:5px;}#yiv4111806513 .yiv4111806513attach label a {text-decoration:none;}#yiv4111806513 blockquote {margin:0 0 0 4px;}#yiv4111806513 .yiv4111806513bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv4111806513 .yiv4111806513bold a {text-decoration:none;}#yiv4111806513 dd.yiv4111806513last p a {font-family:Verdana;font-weight:700;}#yiv4111806513 dd.yiv4111806513last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv4111806513 dd.yiv4111806513last p span.yiv4111806513yshortcuts {margin-right:0;}#yiv4111806513 div.yiv4111806513attach-table div div a {text-decoration:none;}#yiv4111806513 div.yiv4111806513attach-table {width:400px;}#yiv4111806513 div.yiv4111806513file-title a, #yiv4111806513 div.yiv4111806513file-title a:active, #yiv4111806513 div.yiv4111806513file-title a:hover, #yiv4111806513 div.yiv4111806513file-title a:visited {text-decoration:none;}#yiv4111806513 div.yiv4111806513photo-title a, #yiv4111806513 div.yiv4111806513photo-title a:active, #yiv4111806513 div.yiv4111806513photo-title a:hover, #yiv4111806513 div.yiv4111806513photo-title a:visited {text-decoration:none;}#yiv4111806513 div#yiv4111806513ygrp-mlmsg #yiv4111806513ygrp-msg p a span.yiv4111806513yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv4111806513 .yiv4111806513green {color:#628c2a;}#yiv4111806513 .yiv4111806513MsoNormal {margin:0 0 0 0;}#yiv4111806513 o {font-size:0;}#yiv4111806513 #yiv4111806513photos div {float:left;width:72px;}#yiv4111806513 #yiv4111806513photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv4111806513 #yiv4111806513photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv4111806513 #yiv4111806513reco-category {font-size:77%;}#yiv4111806513 #yiv4111806513reco-desc {font-size:77%;}#yiv4111806513 .yiv4111806513replbq {margin:4px;}#yiv4111806513 #yiv4111806513ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv4111806513 #yiv4111806513ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv4111806513 #yiv4111806513ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv4111806513 #yiv4111806513ygrp-mlmsg select, #yiv4111806513 input, #yiv4111806513 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv4111806513 #yiv4111806513ygrp-mlmsg pre, #yiv4111806513 code {font:115% monospace;}#yiv4111806513 #yiv4111806513ygrp-mlmsg * {line-height:1.22em;}#yiv4111806513 #yiv4111806513ygrp-mlmsg #yiv4111806513logo {padding-bottom:10px;}#yiv4111806513 #yiv4111806513ygrp-msg p a {font-family:Verdana;}#yiv4111806513 #yiv4111806513ygrp-msg p#yiv4111806513attach-count span {color:#1E66AE;font-weight:700;}#yiv4111806513 #yiv4111806513ygrp-reco #yiv4111806513reco-head {color:#ff7900;font-weight:700;}#yiv4111806513 #yiv4111806513ygrp-reco {margin-bottom:20px;padding:0px;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ov li a {font-size:130%;text-decoration:none;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv4111806513 #yiv4111806513ygrp-sponsor #yiv4111806513ov ul {margin:0;padding:0 0 0 8px;}#yiv4111806513 #yiv4111806513ygrp-text {font-family:Georgia;}#yiv4111806513 #yiv4111806513ygrp-text p {margin:0 0 1em 0;}#yiv4111806513 #yiv4111806513ygrp-text tt {font-size:120%;}#yiv4111806513 #yiv4111806513ygrp-vital ul li:last-child {border-right:none !important;}#yiv4111806513

Thu Jun 18, 2015 10:58 pm (PDT) . Posted by:

"Salim Jenggot"

Dear Mr. Kid,

Menyambung kembali persoalan yg sama yg pernah saya sampaikan sebelumnya.

Formula dari Mr. Kid sudah saya praktekkan dan berhasil.

Tapi setelah saya crosscheck kembali ternyata ada beberapa data yg error.

Dan data error tersebut adalah data yg hanya ada 1 (tidak ada duplikatnya)

Pada saat dilakukan proses pemisahan, raw dengan hasil 1 dan letaknya
berturutan tidak mau terpisah.

blok seluruh kolom j (klik indeks kolom Excel huruf J) -> aktifkan fotur
GoTo (CTRL G) -> aktifkan fitur goto special (klik Special) -> pilih
Constant -> hilangkan semua centang -> centang item Number -> tekan OK

05 : proses insert row dengan cara :
> lihat cells terpilih hasil no 04 -> klik kanan cells terpilih -> pilih
Insert -> pilih entire row -> tekan OK

--- insert row ke-1 selesai

Mohon suggestnya kembali, terima kasih.

Salam,

Pada 12 Mei 2015 16.20, Salim Jenggot <salim.jenggot@gmail.com> menulis:

> Dear master Win,
>
> terima kasih banyak atas sharing ilmunya, sudah saya praktekkan dan benar
> seperti yg saya maksud.
>
> salam,
> Salim Jenggot
>
> 2015-05-12 14:09 GMT+07:00 Winov X winovx@yahoo.co.id [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> sebelum masternya datang
>>
>> coba yang ini dulu
>>
>> =IF(ISBLANK(J4);"";IF(ISNUMBER(J3);J4-J3;""))
>>
>>
>>
>>
>>
>> *__Winarno__*
>>
>>
>>
>> Pada Senin, 11 Mei 2015 20:31, "Salim Jenggot salim.jenggot@gmail.com
>> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>>
>>
>>
>> Dear master,
>>
>> mohon bantuannya, bagaiman caranya pengurangan dari data yg terpisah2 raw
>> nya.
>> contoh file terlampir.
>> yg akan dikurangi adalah kolom K (lifetime) dimulai pada baris kedua
>> dalam setiap equipment yg sama (kolom D).
>>
>> terima kasih, saya tunggu ilmu bermanfaatnya.
>>
>> Salam,
>> Salim jenggot
>>
>>
>>
>>
>
>
============================================================
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
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar