Jumat, 18 November 2016

[belajar-excel] Digest Number 4020

4 Messages

Digest #4020

Messages

Thu Nov 17, 2016 3:45 pm (PST) . Posted by:

"asam gatal"

Terima kasih Pak Eira. Code-nya berjalan dengan baik dan memudahkan
pekerjaan saya

On Wed, Nov 16, 2016 at 3:27 PM, Eira I Arie cheivory_bridge@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Hi Asam Gatal :
>
> saya mencoba belajar menjawab , semoga sesuai dengan keinginan ..
>
> silakan masukkan code vba sbb :
>
> *Sub Button1_Click()*
> *mulai = Range("j13").Value*
> *sampai = Range("m13").Value*
>
> *For i = mulai To sampai*
>
> * Worksheets("SK").Range("h5").Value = Worksheets("DATA").Cells(1 + i,
> 1).Value*
>
> * Worksheets("sk").PrintOut*
>
> *Next i*

>
> *End Sub*
>
> jangan lupa save as ke macro enabled ..
>
> file terlampir
>
>
> On Wednesday, November 16, 2016 3:02 PM, "asam gatal asamgatal@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Kepada para Master dan segenap anggota milis.
>
> Mohon saya dibantu kode VBA. Mohon dilihat pada sheet SK. Selama ini saya
> mencetak secara satu per satu. Saya ingin ketika kolom J13 dan M13 diisi
> angka dan tombol CETAK di-klik, maka yang dicetak adalah sesuai dengan
> nomor yang dimasukkan pada kolom J13 dan M13 itu dan datanya sesuai dengan
> apa yang ada pada sheet DATA.
>
> Misalnya pada cell J13 diisi dengan angka 1 dan pada cell M13 diisi angka
> 4, maka ketika tombol CETAK di-klik, maka yang tercetak adalah SK-SK dari
> pegawai nomor urut 1 sampai dengan nomor urut 4. Jadi saya tidak perlu lagi
> mencetak satu per satu. Terima kasih
>
>
>
>

Thu Nov 17, 2016 3:45 pm (PST) . Posted by:

"Melyana Silaban"

Pak Hendrik,
Terima kasih atas pencerahan yg diberikan. Sudah saya praktekkan & sangat
membantu.
Terlampir ini adalah hasil percobaan saya, lalu jika saya ingin membuat
file hasil olahan macronya dipindahkan ke sheet baru dengan ketentuan
setiap data BARU yg ditambahkan harus selalu TOP UP pada bagian baris akhir
dari data sebelumnya. Bagaimana cara membuat bahasa perintahnya dalam macro
ini, pak.

Sekali lagi terima kasih atas ilmu yg diberikan bapak-bapak semua (bapak
Susilo, bapak Toby & bapak Hendrik).

Salam,
Mely

On Mon, Nov 14, 2016 at 4:19 PM, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Hai Mely,
>
> Kalo mau pake Macro coba copas codes ini di VBE Sheet, Sheet 1.
> Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
> Boolean)

> Dim brs As Integer
> brs = Range("A2").Value
> Range("B2:B" & brs + 1).ClearContents
> Range("B2:B" & brs + 1).FormulaR1C1 = "=N(R[-1]C)+1"
> Cancel = True
> End Sub
>
> Untuk menjaankan...double klik mouse pada sel B2.
> Untuk mengubah No Urut Terakhir cukup ganti sel A2.
>
> Selamat mencoba.
>
> Salam,
> HK
>
>
> ------------------------------
> *From:* "Melyana Silaban melyana.2012@gmail.com [belajar-excel]" <
> belajar-excel@yahoogroups.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Monday, 14 November 2016, 9:58
> *Subject:* [belajar-excel] Membuat cell dalam baris terisi secara
> otomatis dalam 1kolom
>
>
> Yang terhormat para guru excel & macro,
> Mohon bantuannya untuk cara membuat cell dalam baris secara otomatis
> terisi angka, yang mana jumlah baris/cell yg terisi tsb akan ditentukan
> oleh jumlah angka yg diinput ke dalam cell A2. Angka yg diinput berkisar
> dibawah 10ribu.
> Terima kasih atas bantuan & pencerahan yg diberikan.
>
> Salam,
> Mely
>
>
>
>

Thu Nov 17, 2016 3:53 pm (PST) . Posted by:

"Eira I Arie" cheivory_bridge

Terima kasih mas nang 
ada trik lain .. 

On Thursday, November 17, 2016 1:08 PM, "Nang Agus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:


  Beginikah yang dimaksud?

2016-11-16 12:09 GMT+07:00 asam gatal asamgatal@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com>:

  Kepada para Master dan segenap anggota milis. Mohon saya dibantu kode VBA. Mohon dilihat pada sheet SK. Selamaini saya mencetak secara satu per satu. Saya ingin ketika kolom J13 dan M13 diisiangka dan tombol CETAK di-klik, maka yang dicetak adalah sesuai dengan nomoryang dimasukkan pada kolom J13 dan M13 itu dan datanya sesuai dengan apa yangada pada sheet DATA.
Misalnya pada cell J13 diisi dengan angka 1 dan pada cellM13 diisi angka 4, maka ketika tombol CETAK di-klik, maka yang tercetak adalahSK-SK dari pegawai nomor urut 1 sampai dengan nomor urut 4. Jadi saya tidakperlu lagi mencetak satu per satu. Terima kasih 

#yiv3507278036 #yiv3507278036 -- #yiv3507278036ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv3507278036 #yiv3507278036ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv3507278036 #yiv3507278036ygrp-mkp #yiv3507278036hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv3507278036 #yiv3507278036ygrp-mkp #yiv3507278036ads {margin-bottom:10px;}#yiv3507278036 #yiv3507278036ygrp-mkp .yiv3507278036ad {padding:0 0;}#yiv3507278036 #yiv3507278036ygrp-mkp .yiv3507278036ad p {margin:0;}#yiv3507278036 #yiv3507278036ygrp-mkp .yiv3507278036ad a {color:#0000ff;text-decoration:none;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ygrp-lc {font-family:Arial;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ygrp-lc #yiv3507278036hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ygrp-lc .yiv3507278036ad {margin-bottom:10px;padding:0 0;}#yiv3507278036 #yiv3507278036actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv3507278036 #yiv3507278036activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv3507278036 #yiv3507278036activity span {font-weight:700;}#yiv3507278036 #yiv3507278036activity span:first-child {text-transform:uppercase;}#yiv3507278036 #yiv3507278036activity span a {color:#5085b6;text-decoration:none;}#yiv3507278036 #yiv3507278036activity span span {color:#ff7900;}#yiv3507278036 #yiv3507278036activity span .yiv3507278036underline {text-decoration:underline;}#yiv3507278036 .yiv3507278036attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv3507278036 .yiv3507278036attach div a {text-decoration:none;}#yiv3507278036 .yiv3507278036attach img {border:none;padding-right:5px;}#yiv3507278036 .yiv3507278036attach label {display:block;margin-bottom:5px;}#yiv3507278036 .yiv3507278036attach label a {text-decoration:none;}#yiv3507278036 blockquote {margin:0 0 0 4px;}#yiv3507278036 .yiv3507278036bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv3507278036 .yiv3507278036bold a {text-decoration:none;}#yiv3507278036 dd.yiv3507278036last p a {font-family:Verdana;font-weight:700;}#yiv3507278036 dd.yiv3507278036last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv3507278036 dd.yiv3507278036last p span.yiv3507278036yshortcuts {margin-right:0;}#yiv3507278036 div.yiv3507278036attach-table div div a {text-decoration:none;}#yiv3507278036 div.yiv3507278036attach-table {width:400px;}#yiv3507278036 div.yiv3507278036file-title a, #yiv3507278036 div.yiv3507278036file-title a:active, #yiv3507278036 div.yiv3507278036file-title a:hover, #yiv3507278036 div.yiv3507278036file-title a:visited {text-decoration:none;}#yiv3507278036 div.yiv3507278036photo-title a, #yiv3507278036 div.yiv3507278036photo-title a:active, #yiv3507278036 div.yiv3507278036photo-title a:hover, #yiv3507278036 div.yiv3507278036photo-title a:visited {text-decoration:none;}#yiv3507278036 div#yiv3507278036ygrp-mlmsg #yiv3507278036ygrp-msg p a span.yiv3507278036yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv3507278036 .yiv3507278036green {color:#628c2a;}#yiv3507278036 .yiv3507278036MsoNormal {margin:0 0 0 0;}#yiv3507278036 o {font-size:0;}#yiv3507278036 #yiv3507278036photos div {float:left;width:72px;}#yiv3507278036 #yiv3507278036photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv3507278036 #yiv3507278036photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv3507278036 #yiv3507278036reco-category {font-size:77%;}#yiv3507278036 #yiv3507278036reco-desc {font-size:77%;}#yiv3507278036 .yiv3507278036replbq {margin:4px;}#yiv3507278036 #yiv3507278036ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv3507278036 #yiv3507278036ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv3507278036 #yiv3507278036ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv3507278036 #yiv3507278036ygrp-mlmsg select, #yiv3507278036 input, #yiv3507278036 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv3507278036 #yiv3507278036ygrp-mlmsg pre, #yiv3507278036 code {font:115% monospace;}#yiv3507278036 #yiv3507278036ygrp-mlmsg * {line-height:1.22em;}#yiv3507278036 #yiv3507278036ygrp-mlmsg #yiv3507278036logo {padding-bottom:10px;}#yiv3507278036 #yiv3507278036ygrp-msg p a {font-family:Verdana;}#yiv3507278036 #yiv3507278036ygrp-msg p#yiv3507278036attach-count span {color:#1E66AE;font-weight:700;}#yiv3507278036 #yiv3507278036ygrp-reco #yiv3507278036reco-head {color:#ff7900;font-weight:700;}#yiv3507278036 #yiv3507278036ygrp-reco {margin-bottom:20px;padding:0px;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ov li a {font-size:130%;text-decoration:none;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv3507278036 #yiv3507278036ygrp-sponsor #yiv3507278036ov ul {margin:0;padding:0 0 0 8px;}#yiv3507278036 #yiv3507278036ygrp-text {font-family:Georgia;}#yiv3507278036 #yiv3507278036ygrp-text p {margin:0 0 1em 0;}#yiv3507278036 #yiv3507278036ygrp-text tt {font-size:120%;}#yiv3507278036 #yiv3507278036ygrp-vital ul li:last-child {border-right:none !important;}#yiv3507278036

Fri Nov 18, 2016 12:57 am (PST) . Posted by:

"asam gatal"

Terima Pak Nang. Setelah saya coba code VBA dari Pak Nang Agus juga
berjalan dengan baik. Sangat bermanfaat bagi saya.

On Thu, Nov 17, 2016 at 1:15 PM, Eira I Arie cheivory_bridge@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> Terima kasih mas nang
>
> ada trik lain ..
>
>
> On Thursday, November 17, 2016 1:08 PM, "Nang Agus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Beginikah yang dimaksud?
>
> 2016-11-16 12:09 GMT+07:00 asam gatal asamgatal@gmail.com [belajar-excel]
> <belajar-excel@yahoogroups.com>:
>
>
> Kepada para Master dan segenap anggota milis.
>
> Mohon saya dibantu kode VBA. Mohon dilihat pada sheet SK. Selama ini saya
> mencetak secara satu per satu. Saya ingin ketika kolom J13 dan M13 diisi
> angka dan tombol CETAK di-klik, maka yang dicetak adalah sesuai dengan
> nomor yang dimasukkan pada kolom J13 dan M13 itu dan datanya sesuai dengan
> apa yang ada pada sheet DATA.
>
> Misalnya pada cell J13 diisi dengan angka 1 dan pada cell M13 diisi angka
> 4, maka ketika tombol CETAK di-klik, maka yang tercetak adalah SK-SK dari
> pegawai nomor urut 1 sampai dengan nomor urut 4. Jadi saya tidak perlu lagi
> mencetak satu per satu. 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
---------------------------------------------------------------------

Tidak ada komentar:

Poskan Komentar