9 Messages
Digest #4322
4a
Kasus insert picture ke cell di sheet excel bersama input data tabel by "Christian. SimanjuntakTMJOAN"
4b
Re: Kasus insert picture ke cell di sheet excel bersama input data t by "hendrik karnadi" hendrikkarnadi
Messages
Wed Oct 11, 2017 10:03 pm (PDT) . Posted by:
"Wahyu Eko" abi_escorp
Assalamu'alaikum warrahmatullahi wabarokatuhDear All,
Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift, dengan masing masing shift 4 jam). Hari Minggu Libur.
File terlampir.
MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya ucapkan terima kasih.
Wassalamu'alaikum warrahmatullahi wabarokatuh
Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift, dengan masing masing shift 4 jam). Hari Minggu Libur.
File terlampir.
MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya ucapkan terima kasih.
Wassalamu'
Thu Oct 12, 2017 1:42 am (PDT) . Posted by:
"M.Ade Alfarid" aderyo
Tambahin aja dengan kolom jam nya.
Formatnya dalam jam ya
*From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
*Sent:* Thursday, October 12, 2017 11:23 AM
*To:* belajar-excel@yahoogroups.com
*Subject:* [belajar-excel] Mencari Formula tanggal selesai Produksi
Assalamu'alaikum warrahmatullahi wabarokatuh
Dear All,
Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal
selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta
target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan
informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan
masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift,
dengan masing masing shift 4 jam). Hari Minggu Libur.
File terlampir.
MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya ucapkan
terima kasih.
Wassalamu'alaikum warrahmatullahi wabarokatuh
Formatnya dalam jam ya
*From:* belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
*Sent:* Thursday, October 12, 2017 11:23 AM
*To:* belajar-excel@yahoogroups.com
*Subject:* [belajar-excel] Mencari Formula tanggal selesai Produksi
Assalamu'
Dear All,
Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal
selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta
target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan
informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan
masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift,
dengan masing masing shift 4 jam). Hari Minggu Libur.
File terlampir.
MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya ucapkan
terima kasih.
Wassalamu'
Thu Oct 12, 2017 4:06 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam wr wb
Hai Wahyu,
Mungkin seperti file terlampir.
File terlampipr dengan beberapa kolom bantu.
Wassalamu'alaikum wr wb
Kid
2017-10-12 11:22 GMT+07:00 Wahyu Eko abi_escorp@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Assalamu'alaikum warrahmatullahi wabarokatuh
> Dear All,
>
> Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal
> selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta
> target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan
> informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan
> masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift,
> dengan masing masing shift 4 jam). Hari Minggu Libur.
>
> File terlampir.
>
> MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya
> ucapkan terima kasih.
>
> Wassalamu'alaikum warrahmatullahi wabarokatuh
>
>
>
Hai Wahyu,
Mungkin seperti file terlampir.
File terlampipr dengan beberapa kolom bantu.
Wassalamu'alaikum wr wb
Kid
2017-10-12 11:22 GMT+07:00 Wahyu Eko abi_escorp@yahoo.com [belajar-excel] <
belajar-excel@yahoogroups.com>:
>
>
> Assalamu'
> Dear All,
>
> Berikut ini saya ingin bertanya cara membuat formula untuk mencari tanggal
> selesai Produksi, jika sudah diketahui tanggal dan jam awal produksi serta
> target shift yang dibutuhkan untuk waktu produksi. sebagai tambahan
> informasi hari Senin sampai Jum'at produksi 24 Jam (3 Shift dengan
> masing-masing shift 8 Jam) sedangkan untuk hari sabtu 12 Jam (3 Shift,
> dengan masing masing shift 4 jam). Hari Minggu Libur.
>
> File terlampir.
>
> MInta share ilmunya, dan atas bantuan saudara-saudara sekalian saya
> ucapkan terima kasih.
>
> Wassalamu'
>
>
>
Thu Oct 12, 2017 2:40 am (PDT) . Posted by:
"nangagus"
Waalaikumsalam warahmatullah,
Dear Pao-pao,
Bagaimana jika perintahnya diubah?
pada waktu sebelum diprint, baris yang tidak akan diprint disembunyikan
dahulu, kemudian setelah diprint baris tersebut dimunculkan lagi.
Mungkin begini perintahnya:
Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Me.Hide
Rows("6:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox2.Value = True Then
Me.Hide
Rows("11:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox3.Value = True Then
Me.Hide
Sheet1.PrintOut
End If
End Sub
Wasalamualaikum warahmatullahi wabarakatuh.
NangAgus
On 11/10/2017 12:24, paopao daeng daeng_paopao@yahoo.com [belajar-excel]
wrote:
> assalamualaikum.wr.wb
> dear para suhu "be excel"
>
> Mohon Bantuannya...
> rumus untuk perintah macro untuk print otomatis beberapa range yang
> ada dalam satu sheet.
> saya udah puyeng utak atik rumusnya g pernah jadi2...
> jadi streess saya...
> maklum baru belajar dari group ini jg...
> file terlampir
> terima kasih
>
>
Dear Pao-pao,
Bagaimana jika perintahnya diubah?
pada waktu sebelum diprint, baris yang tidak akan diprint disembunyikan
dahulu, kemudian setelah diprint baris tersebut dimunculkan lagi.
Mungkin begini perintahnya:
Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Me.Hide
Rows("6:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox2.Value = True Then
Me.Hide
Rows("11:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox3.Value = True Then
Me.Hide
Sheet1.PrintOut
End If
End Sub
Wasalamualaikum warahmatullahi wabarakatuh.
NangAgus
On 11/10/2017 12:24, paopao daeng daeng_paopao@yahoo.com [belajar-excel]
wrote:
> assalamualaikum.
> dear para suhu "be excel"
>
> Mohon Bantuannya..
> rumus untuk perintah macro untuk print otomatis beberapa range yang
> ada dalam satu sheet.
> saya udah puyeng utak atik rumusnya g pernah jadi2...
> jadi streess saya...
> maklum baru belajar dari group ini jg...
> file terlampir
> terima kasih
>
>
Thu Oct 12, 2017 2:52 am (PDT) . Posted by:
"paopao daeng"
terima kasih banyak pak nangagus atas responnya...untuk sementara saya mau coba dulu pak agus....
On Thursday, October 12, 2017 4:40 PM, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Waalaikumsalam warahmatullah, Dear Pao-pao, Bagaimana jika perintahnya diubah? pada waktu sebelum diprint, baris yang tidak akan diprint disembunyikan dahulu, kemudian setelah diprint baris tersebut dimunculkan lagi. Mungkin begini perintahnya: Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Me.Hide
Rows("6:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox2.Value = True Then
Me.Hide
Rows("11:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox3.Value = True Then
Me.Hide
Sheet1.PrintOut
End If
End Sub
Wasalamualaikum warahmatullahi wabarakatuh. NangAgus
On 11/10/2017 12:24, paopao daeng daeng_paopao@yahoo.com [belajar-excel] wrote:
assalamualaikum.wr.wb dear para suhu "be excel"
Mohon Bantuannya... rumus untuk perintah macro untuk print otomatis beberapa range yang ada dalam satu sheet. saya udah puyeng utak atik rumusnya g pernah jadi2... jadi streess saya... maklum baru belajar dari group ini jg... file terlampir terima kasih
#yiv0251404897 #yiv0251404897 -- #yiv0251404897ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0251404897 #yiv0251404897ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0251404897 #yiv0251404897ygrp-mkp #yiv0251404897hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv0251404897 #yiv0251404897ygrp-mkp #yiv0251404897ads {margin-bottom:10px;}#yiv0251404897 #yiv0251404897ygrp-mkp .yiv0251404897ad {padding:0 0;}#yiv0251404897 #yiv0251404897ygrp-mkp .yiv0251404897ad p {margin:0;}#yiv0251404897 #yiv0251404897ygrp-mkp .yiv0251404897ad a {color:#0000ff;text-decoration:none;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ygrp-lc {font-family:Arial;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ygrp-lc #yiv0251404897hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ygrp-lc .yiv0251404897ad {margin-bottom:10px;padding:0 0;}#yiv0251404897 #yiv0251404897actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0251404897 #yiv0251404897activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0251404897 #yiv0251404897activity span {font-weight:700;}#yiv0251404897 #yiv0251404897activity span:first-child {text-transform:uppercase;}#yiv0251404897 #yiv0251404897activity span a {color:#5085b6;text-decoration:none;}#yiv0251404897 #yiv0251404897activity span span {color:#ff7900;}#yiv0251404897 #yiv0251404897activity span .yiv0251404897underline {text-decoration:underline;}#yiv0251404897 .yiv0251404897attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv0251404897 .yiv0251404897attach div a {text-decoration:none;}#yiv0251404897 .yiv0251404897attach img {border:none;padding-right:5px;}#yiv0251404897 .yiv0251404897attach label {display:block;margin-bottom:5px;}#yiv0251404897 .yiv0251404897attach label a {text-decoration:none;}#yiv0251404897 blockquote {margin:0 0 0 4px;}#yiv0251404897 .yiv0251404897bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv0251404897 .yiv0251404897bold a {text-decoration:none;}#yiv0251404897 dd.yiv0251404897last p a {font-family:Verdana;font-weight:700;}#yiv0251404897 dd.yiv0251404897last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0251404897 dd.yiv0251404897last p span.yiv0251404897yshortcuts {margin-right:0;}#yiv0251404897 div.yiv0251404897attach-table div div a {text-decoration:none;}#yiv0251404897 div.yiv0251404897attach-table {width:400px;}#yiv0251404897 div.yiv0251404897file-title a, #yiv0251404897 div.yiv0251404897file-title a:active, #yiv0251404897 div.yiv0251404897file-title a:hover, #yiv0251404897 div.yiv0251404897file-title a:visited {text-decoration:none;}#yiv0251404897 div.yiv0251404897photo-title a, #yiv0251404897 div.yiv0251404897photo-title a:active, #yiv0251404897 div.yiv0251404897photo-title a:hover, #yiv0251404897 div.yiv0251404897photo-title a:visited {text-decoration:none;}#yiv0251404897 div#yiv0251404897ygrp-mlmsg #yiv0251404897ygrp-msg p a span.yiv0251404897yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0251404897 .yiv0251404897green {color:#628c2a;}#yiv0251404897 .yiv0251404897MsoNormal {margin:0 0 0 0;}#yiv0251404897 o {font-size:0;}#yiv0251404897 #yiv0251404897photos div {float:left;width:72px;}#yiv0251404897 #yiv0251404897photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv0251404897 #yiv0251404897photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0251404897 #yiv0251404897reco-category {font-size:77%;}#yiv0251404897 #yiv0251404897reco-desc {font-size:77%;}#yiv0251404897 .yiv0251404897replbq {margin:4px;}#yiv0251404897 #yiv0251404897ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv0251404897 #yiv0251404897ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0251404897 #yiv0251404897ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0251404897 #yiv0251404897ygrp-mlmsg select, #yiv0251404897 input, #yiv0251404897 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv0251404897 #yiv0251404897ygrp-mlmsg pre, #yiv0251404897 code {font:115% monospace;}#yiv0251404897 #yiv0251404897ygrp-mlmsg * {line-height:1.22em;}#yiv0251404897 #yiv0251404897ygrp-mlmsg #yiv0251404897logo {padding-bottom:10px;}#yiv0251404897 #yiv0251404897ygrp-msg p a {font-family:Verdana;}#yiv0251404897 #yiv0251404897ygrp-msg p#yiv0251404897attach-count span {color:#1E66AE;font-weight:700;}#yiv0251404897 #yiv0251404897ygrp-reco #yiv0251404897reco-head {color:#ff7900;font-weight:700;}#yiv0251404897 #yiv0251404897ygrp-reco {margin-bottom:20px;padding:0px;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ov li a {font-size:130%;text-decoration:none;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv0251404897 #yiv0251404897ygrp-sponsor #yiv0251404897ov ul {margin:0;padding:0 0 0 8px;}#yiv0251404897 #yiv0251404897ygrp-text {font-family:Georgia;}#yiv0251404897 #yiv0251404897ygrp-text p {margin:0 0 1em 0;}#yiv0251404897 #yiv0251404897ygrp-text tt {font-size:120%;}#yiv0251404897 #yiv0251404897ygrp-vital ul li:last-child {border-right:none !important;}#yiv0251404897
On Thursday, October 12, 2017 4:40 PM, "nangagus nangagus@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Waalaikumsalam warahmatullah, Dear Pao-pao, Bagaimana jika perintahnya diubah? pada waktu sebelum diprint, baris yang tidak akan diprint disembunyikan dahulu, kemudian setelah diprint baris tersebut dimunculkan lagi. Mungkin begini perintahnya: Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Me.Hide
Rows("6:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox2.Value = True Then
Me.Hide
Rows("11:16").Hidden = True
Sheet1.PrintOut
Rows("1:17").Hidden = False
End If
If CheckBox3.Value = True Then
Me.Hide
Sheet1.PrintOut
End If
End Sub
Wasalamualaikum warahmatullahi wabarakatuh. NangAgus
On 11/10/2017 12:24, paopao daeng daeng_paopao@yahoo.com [belajar-excel] wrote:
assalamualaikum.
Mohon Bantuannya..
#yiv0251404897 #yiv0251404897 -- #yiv0251404897ygrp-
Thu Oct 12, 2017 8:37 am (PDT) . Posted by:
"nangagus"
Dear Susilo Pratama,
Maaf OOT.
dalam permintaan di excel:
contoh hasil deskripsi,bagiaman jika dimassukan ke rumus
ananda baik dalam memahami karakter , perlu pendampingan dalam bisa
menghitung
Menurut panduan penilaian oleh pendidik dan satuan pendidikan, tidak
boleh mengandung frasa yang benilai kontras (untuk tingkat SMP cetakan
ketiga tahun 2017 terdapat pada halaman 55). sekedar saran agar buku
tersebut dibaca kembali secara keseluruhan.
salam.
Nang Agus.
On 11/10/2017 19:21, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] wrote:
> Salam, saya ingin minta bantuan kepda para master, disini saya
> kesulitan dalam membuat rumus untuk deskripsi nilai rapot kurikulum 13
> dapaun untuk contoh saya lampirkan dlam file.
>
> 1.Pada rapot k13 ini penilaia ada sikap dan spiritual untuk nilai
> sediri di ambil dari 4 aspel untuk spiritual dan dalam deskripsi
> nantinya sapek yg paling tinggi akan berada pada kalimat paling depan
> dngan rentang nilai SB, B, C, PB, ( SANGAT BAIK, BAIK, CUKUP, PERLU
> BIMBINGAN) CONTOH JIKA DALAM ASPEK 1 B, ASPEK 2, C, ASPEK 3, C , ASPEK
> 4 SB, MAKA DESKRIPSINYA sangat baik pada asepk empat, biaik dalam
> aspek 2, aspek 1, cukup dalam aspek tiga. itu asil deskripi yg kira
> kira muncul.
> 2. untuk yg nilai rapot nanti mape deskripsi diambil yg muncul hanya
> nilai tertinggi dan terendh saja , contoh
> ohon bantuanya tks
>
Maaf OOT.
dalam permintaan di excel:
contoh hasil deskripsi,bagiaman jika dimassukan ke rumus
ananda baik dalam memahami karakter , perlu pendampingan dalam bisa
menghitung
Menurut panduan penilaian oleh pendidik dan satuan pendidikan, tidak
boleh mengandung frasa yang benilai kontras (untuk tingkat SMP cetakan
ketiga tahun 2017 terdapat pada halaman 55). sekedar saran agar buku
tersebut dibaca kembali secara keseluruhan.
salam.
Nang Agus.
On 11/10/2017 19:21, Susilo Pratama pratama_susilo@yahoo.com
[belajar-excel] wrote:
> Salam, saya ingin minta bantuan kepda para master, disini saya
> kesulitan dalam membuat rumus untuk deskripsi nilai rapot kurikulum 13
> dapaun untuk contoh saya lampirkan dlam file.
>
> 1.Pada rapot k13 ini penilaia ada sikap dan spiritual untuk nilai
> sediri di ambil dari 4 aspel untuk spiritual dan dalam deskripsi
> nantinya sapek yg paling tinggi akan berada pada kalimat paling depan
> dngan rentang nilai SB, B, C, PB, ( SANGAT BAIK, BAIK, CUKUP, PERLU
> BIMBINGAN) CONTOH JIKA DALAM ASPEK 1 B, ASPEK 2, C, ASPEK 3, C , ASPEK
> 4 SB, MAKA DESKRIPSINYA sangat baik pada asepk empat, biaik dalam
> aspek 2, aspek 1, cukup dalam aspek tiga. itu asil deskripi yg kira
> kira muncul.
> 2. untuk yg nilai rapot nanti mape deskripsi diambil yg muncul hanya
> nilai tertinggi dan terendh saja , contoh
> ohon bantuanya tks
>
Thu Oct 12, 2017 11:09 am (PDT) . Posted by:
"Christian. SimanjuntakTMJOAN"
DH
Dear para master ,saya punya kasus seperti ini, ingin melakukan tambah
data, edti data , hapus data pada kolom di sheet, hanya bedanya di sebuah
kolom ditambahkan picture, bagaimana script vba nya pada form master, mohon
pencerahan, terlampir table nya
trimakasih atas perhatian dan kerjasamanya
salam
Dear para master ,saya punya kasus seperti ini, ingin melakukan tambah
data, edti data , hapus data pada kolom di sheet, hanya bedanya di sebuah
kolom ditambahkan picture, bagaimana script vba nya pada form master, mohon
pencerahan, terlampir table nya
trimakasih atas perhatian dan kerjasamanya
salam
Thu Oct 12, 2017 6:57 pm (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Hai Christian,Terlampir file warisan dari mbak Siti Vi....sila dipelajari dan diupdate.Kalo sdh dan tetap belum bisa, tolong dishare hasil uji cobanya.
Untuk mencoba...download dan extract dulu file .rarnya
Salam,HK
On Friday, 13 October 2017, 1:09:54 AM GMT+7, 'Christian. SimanjuntakTMJOAN' christian.simanjuntak7777@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
DH
Dear para master ,saya punya kasus seperti ini, ingin melakukan tambah data, edti data , hapus data pada kolom di sheet, hanya bedanya di sebuah kolom ditambahkan picture, bagaimana script vba nya pada form master, mohon pencerahan, terlampir table nya
trimakasih atas perhatian dan kerjasamanya
salam
Untuk mencoba...download dan extract dulu file .rarnya
Salam,HK
On Friday, 13 October 2017, 1:09:54 AM GMT+7, 'Christian. SimanjuntakTMJOAN' christian.simanjuntak7777@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
DH
Dear para master ,saya punya kasus seperti ini, ingin melakukan tambah data, edti data , hapus data pada kolom di sheet, hanya bedanya di sebuah kolom ditambahkan picture, bagaimana script vba nya pada form master, mohon pencerahan, terlampir table nya
trimakasih atas perhatian dan kerjasamanya
salam
Thu Oct 12, 2017 4:44 pm (PDT) . Posted by:
"nangagus"
Hai Ambo, ada contoh editan mas Kid di milis misalnya yang ada di sini
<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-mohon-di-koreksi-cara-load-picture-banyak-file-1-Attachment-td5731582.html#a5731596>
On 30/06/2016 22:50, Ambo Ala ambo12ran@gmail.com [belajar-excel] wrote:
>
> Saya punya scrib seperti ini:
>
> Private Sub CommandButton1_Click()
> Dim Awal, Akhir As Integer
> Dim NamaData As String
>
> Awal = Range ("N3") . Value
> Akhir = Range ("N5") . Value
>
> If Awal <= Akhir And Awal >= 1 Then
> For i = Awal To Akhir
> With Sheets ("Bio")
> .Range ("M7") . value = i
> NamaData = Range ("T1")
> Files = ActiveWorkbook.Path & "\Photo\" & NamaData & ".jpg"
> Image1.Picture = LoadPicture (Files)
> End With
> ActiveSheet . PrintOut
> Next i
> Else
> MsgBox "Cek lagi nomor yang akan dicetak...", vbCritical, "Error Cetak"
> End If
>
> End Sub
>
>
> Niatnya scrib ini bisa print data sekaligus sesuai nomor urut data...
> Print data sukses, sesuai dg data...
> Tapi untuk fotonya, tidak ikut berubah...
>
> Mohon bantuannya, dimana letak kesalahan scribnya...
> Terimakasih
>
> --
>
> Wassalam,
>
> _*Ambo Ala*_
> 0853 1170 2112
> PIN BB ** 7E A1A1 37 **
>
>
<http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-mohon-di-koreksi-cara-load-picture-banyak-file-1-Attachment-td5731582.html#a5731596>
On 30/06/2016 22:50, Ambo Ala ambo12ran@gmail.com [belajar-excel] wrote:
>
> Saya punya scrib seperti ini:
>
> Private Sub CommandButton1_
> Dim Awal, Akhir As Integer
> Dim NamaData As String
>
> Awal = Range ("N3"
> Akhir = Range ("N5"
>
> If Awal <= Akhir And Awal >= 1 Then
> For i = Awal To Akhir
> With Sheets ("Bio"
> .Range ("M7"
> NamaData = Range ("T1"
> Files = ActiveWorkbook.
> Image1.Picture = LoadPicture (Files)
> End With
> ActiveSheet . PrintOut
> Next i
> Else
> MsgBox "Cek lagi nomor yang akan dicetak..."
> End If
>
> End Sub
>
>
> Niatnya scrib ini bisa print data sekaligus sesuai nomor urut data...
> Print data sukses, sesuai dg data...
> Tapi untuk fotonya, tidak ikut berubah...
>
> Mohon bantuannya, dimana letak kesalahan scribnya...
> Terimakasih
>
> --
>
> Wassalam,
>
> _*Ambo Ala*_
> 0853 1170 2112
> PIN BB ** 7E A1A1 37 **
>
>
============================================================
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
---------------------------------------------------------------------
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