Senin, 14 Desember 2015

[belajar-excel] Digest Number 3683

3 Messages

Digest #3683

Messages

Mon Dec 14, 2015 12:25 am (PST) . Posted by:

"Liem Suliem" liemsuliem

dhdear mastersaya coba rekam macro untuk filter data selanjutnya data yang di filter di prin area
Public Sub Aan()   ActiveSheet.Range("$B$1:$J$1048576").AutoFilter Field:=9,Criteria1:="Aan"
    Range("C1:H1").Select    Range(Selection,Selection.End(xlDown)).Select    ActiveSheet.PageSetup.PrintArea ="$C$1:$H$112"    ActiveWindow.SelectedSheets.PrintPreviewEnd Sub
masalahnya bunyi skrip yang wa merah rangenya ber ubah2.mohon petunjuknya untuk membetulkan
untuk jelasnya data terlampir.

salam
liem

Mon Dec 14, 2015 12:41 am (PST) . Posted by:

"odong nando"

wah, tanyakan pada ahlinya klo begitu,haha... br,

odong nando


Pada Senin, 14 Desember 2015 15:17, "ieka sulis ieka.listy@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Kalau warning nya bukan dikasih warna, tp warning yg pke script VB itu gmn kak.?
On Mon, Dec 14, 2015 at 3:03 PM, odong nando odongnando@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  yoo ieka,
saya sering membuat warning di di sheet excel seperti kasus anda, dengan batuan kolom bantu dan conditional formating.
1. buat kolom bantu berheader warning dengan isi cell berformula     =IF ( _tgl pengembalian_ - TODAY ( ) > 6 ; "harus segera dikembalikan" ; "")
    kopi cells yang membutuhkan, disarankan menggunakan table excel agar penggunaan     formulanya hanya pada cells yang membutuhkan saja

    ganti karakter titik koma ";" dengan koma "," bila regional kompi anda english

2. blok seluruh data tanpa header termasuk kolom bantu berheader warning3. klik home --> conditional formating --> new rule --> use a formula to .... -->     masukan formula pada " format values where .... "     =$E10="harus segera dikembalikan"
    --> klik format --> klik fill --> pilih warna --> OK

br,

odong nando


Pada Senin, 14 Desember 2015 12:07, "ieka sulis ieka.listy@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  Dear Master Excel,
Saya mohon bantuan nya bagaimana untuk Menampilkan Warning Surat yang harus segera dikembalikan H-7 dari kolom Tgl Pengembalian yang bahkan saat file tersebut tidak dibuka, warning tersebut tetap bisa muncul.
Terima kasih sebelumnya..File terlampir

#yiv8055323634 #yiv8055323634 -- #yiv8055323634ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv8055323634 #yiv8055323634ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv8055323634 #yiv8055323634ygrp-mkp #yiv8055323634hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv8055323634 #yiv8055323634ygrp-mkp #yiv8055323634ads {margin-bottom:10px;}#yiv8055323634 #yiv8055323634ygrp-mkp .yiv8055323634ad {padding:0 0;}#yiv8055323634 #yiv8055323634ygrp-mkp .yiv8055323634ad p {margin:0;}#yiv8055323634 #yiv8055323634ygrp-mkp .yiv8055323634ad a {color:#0000ff;text-decoration:none;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ygrp-lc {font-family:Arial;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ygrp-lc #yiv8055323634hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ygrp-lc .yiv8055323634ad {margin-bottom:10px;padding:0 0;}#yiv8055323634 #yiv8055323634actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv8055323634 #yiv8055323634activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv8055323634 #yiv8055323634activity span {font-weight:700;}#yiv8055323634 #yiv8055323634activity span:first-child {text-transform:uppercase;}#yiv8055323634 #yiv8055323634activity span a {color:#5085b6;text-decoration:none;}#yiv8055323634 #yiv8055323634activity span span {color:#ff7900;}#yiv8055323634 #yiv8055323634activity span .yiv8055323634underline {text-decoration:underline;}#yiv8055323634 .yiv8055323634attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv8055323634 .yiv8055323634attach div a {text-decoration:none;}#yiv8055323634 .yiv8055323634attach img {border:none;padding-right:5px;}#yiv8055323634 .yiv8055323634attach label {display:block;margin-bottom:5px;}#yiv8055323634 .yiv8055323634attach label a {text-decoration:none;}#yiv8055323634 blockquote {margin:0 0 0 4px;}#yiv8055323634 .yiv8055323634bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv8055323634 .yiv8055323634bold a {text-decoration:none;}#yiv8055323634 dd.yiv8055323634last p a {font-family:Verdana;font-weight:700;}#yiv8055323634 dd.yiv8055323634last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv8055323634 dd.yiv8055323634last p span.yiv8055323634yshortcuts {margin-right:0;}#yiv8055323634 div.yiv8055323634attach-table div div a {text-decoration:none;}#yiv8055323634 div.yiv8055323634attach-table {width:400px;}#yiv8055323634 div.yiv8055323634file-title a, #yiv8055323634 div.yiv8055323634file-title a:active, #yiv8055323634 div.yiv8055323634file-title a:hover, #yiv8055323634 div.yiv8055323634file-title a:visited {text-decoration:none;}#yiv8055323634 div.yiv8055323634photo-title a, #yiv8055323634 div.yiv8055323634photo-title a:active, #yiv8055323634 div.yiv8055323634photo-title a:hover, #yiv8055323634 div.yiv8055323634photo-title a:visited {text-decoration:none;}#yiv8055323634 div#yiv8055323634ygrp-mlmsg #yiv8055323634ygrp-msg p a span.yiv8055323634yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv8055323634 .yiv8055323634green {color:#628c2a;}#yiv8055323634 .yiv8055323634MsoNormal {margin:0 0 0 0;}#yiv8055323634 o {font-size:0;}#yiv8055323634 #yiv8055323634photos div {float:left;width:72px;}#yiv8055323634 #yiv8055323634photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv8055323634 #yiv8055323634photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv8055323634 #yiv8055323634reco-category {font-size:77%;}#yiv8055323634 #yiv8055323634reco-desc {font-size:77%;}#yiv8055323634 .yiv8055323634replbq {margin:4px;}#yiv8055323634 #yiv8055323634ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv8055323634 #yiv8055323634ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv8055323634 #yiv8055323634ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv8055323634 #yiv8055323634ygrp-mlmsg select, #yiv8055323634 input, #yiv8055323634 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv8055323634 #yiv8055323634ygrp-mlmsg pre, #yiv8055323634 code {font:115% monospace;}#yiv8055323634 #yiv8055323634ygrp-mlmsg * {line-height:1.22em;}#yiv8055323634 #yiv8055323634ygrp-mlmsg #yiv8055323634logo {padding-bottom:10px;}#yiv8055323634 #yiv8055323634ygrp-msg p a {font-family:Verdana;}#yiv8055323634 #yiv8055323634ygrp-msg p#yiv8055323634attach-count span {color:#1E66AE;font-weight:700;}#yiv8055323634 #yiv8055323634ygrp-reco #yiv8055323634reco-head {color:#ff7900;font-weight:700;}#yiv8055323634 #yiv8055323634ygrp-reco {margin-bottom:20px;padding:0px;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ov li a {font-size:130%;text-decoration:none;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv8055323634 #yiv8055323634ygrp-sponsor #yiv8055323634ov ul {margin:0;padding:0 0 0 8px;}#yiv8055323634 #yiv8055323634ygrp-text {font-family:Georgia;}#yiv8055323634 #yiv8055323634ygrp-text p {margin:0 0 1em 0;}#yiv8055323634 #yiv8055323634ygrp-text tt {font-size:120%;}#yiv8055323634 #yiv8055323634ygrp-vital ul li:last-child {border-right:none !important;}#yiv8055323634

Mon Dec 14, 2015 2:00 am (PST) . Posted by:

"ieka sulis"

Iy kak odong nando, mksh untuk masukan nya..
Sebelumnya sudah melihat di diskusi sebelumnya yg tentang fungsi warning
sebelum jatuh tempo
disitu dibahas untuk script vb nya :
Private Sub Workbook_Open()
'privat tdate as Range

psn = "Perhatian....." + Chr(13)
psn = psn + "Taget Date sudah dekat Lhoooo "
Sheets("Sheet1").Select
Set tdate = Range("B3")
If tdate - 14 <= Now() Then
t = MsgBox(psn, vbCritical)
End If

End Sub

Permasalahan yg saya hadapi ini sebenarnya hampir sama dengan yang dibahas
sebelumnya.
Namun saya agak kesulitan ketika datanya terdiri dari byk row, dan untuk
menampilkan warning nya ketika file tersebut tidak dibuka, jadi ketika file
tidak dibuka warning tetap muncul..
Mohon pencerahan nya.. Terima kasih..

On Mon, Dec 14, 2015 at 3:38 PM, odong nando odongnando@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

>
>
> wah, tanyakan pada ahlinya klo begitu,
> haha...
>
> br,
>
> odong nando
>
>
>
> Pada Senin, 14 Desember 2015 15:17, "ieka sulis ieka.listy@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Kalau warning nya bukan dikasih warna, tp warning yg pke script VB itu gmn
> kak.?
>
> On Mon, Dec 14, 2015 at 3:03 PM, odong nando odongnando@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> yoo ieka,
>
> saya sering membuat warning di di sheet excel seperti kasus anda, dengan
> batuan kolom bantu dan conditional formating.
>
> 1. buat kolom bantu berheader warning dengan isi cell berformula
> =IF ( _tgl pengembalian_ - TODAY ( ) > 6 ; "harus segera dikembalikan"
> ; "")
>
> kopi cells yang membutuhkan, disarankan menggunakan table excel agar
> penggunaan formulanya hanya pada cells yang membutuhkan saja
>
> ganti karakter titik koma ";" dengan koma "," bila regional kompi anda
> english
>
> 2. blok seluruh data tanpa header termasuk kolom bantu berheader warning
> 3. klik home --> conditional formating --> new rule --> use a formula to
> .... -->
> masukan formula pada " format values where .... "
> =$E10="harus segera dikembalikan"
> --> klik format --> klik fill --> pilih warna --> OK
>
> br,
>
> odong nando
>
>
>
> Pada Senin, 14 Desember 2015 12:07, "ieka sulis ieka.listy@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
> Dear Master Excel,
>
> Saya mohon bantuan nya bagaimana untuk Menampilkan Warning Surat yang
> harus segera dikembalikan H-7 dari kolom Tgl Pengembalian yang bahkan saat
> file tersebut tidak dibuka, warning tersebut tetap bisa muncul.
>
> Terima kasih sebelumnya..
> File terlampir
>
>
>
>
>
>
>
============================================================
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