Re: [belajar-excel] VBA menampilkan textbox jika kondisi sama

classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|  
Report Content as Inappropriate

Re: [belajar-excel] VBA menampilkan textbox jika kondisi sama

Milis Belajar Excel mailing list
Waalaikumsallam.


Sesuai dengan masalahmu, saya coba bantu yah. Mungkin ini hanya sederhana dan para master di sini bisa bantu sempurnakan.


Karena saya tidak mengetahui nama Object dari Textbox dan CheckBox kamu maka saya indikasikan dengan:


 namacheckboxkamu                  ----> Untuk Object CheckBox
 namatextboalamatsesuaiKTP     ----> Untuk Object TextBox
 namatextboxalamatsekarang      ----> Untuk Object TextBox


Letakkan code ini pada Userform yang digunakan.


Private Sub namacheckboxkamu_Click()
If namacheckboxkamu.Value = True Then
namatextboalamatsesuaiKTP.Value = namatextboxalamatsekarang.Value
Else
namatextboxalamatsekarang.Value = ""
End If
End Sub


Demikian, semoga berhasil.
Wassalam.
--------------------------------------------
On Thu, 5/25/17, heru Rasna [hidden email] [belajar-excel] <[hidden email]> wrote:


 Subject: [belajar-excel] VBA menampilkan textbox jika kondisi sama [2 Attachments]
 To: [hidden email]
 Date: Thursday, May 25, 2017, 9:27 PM


  





 




       Assalamualaikum....salam
 hormat para master exceller sekalian...
 kasus
 :ada 2
 textbox-
 alamat ktp-
 alamat sekaranghasil
 yng di inginkan jika alamat alamat sekarangn sama dengan
 alamat ktp maka ketika checkbox di centang alamat sekarang
 terisi otomatis sama dengan alamat ktp.jika
 tidak dicentang maka alamat sekarang bisa diisi sesuai

 alamat terbaru
 mohon
 petunjuk penulisan coding vba nya master
 untuk
 jelas terlampir screnshoot












 #yiv7997502934 #yiv7997502934 --
   #yiv7997502934ygrp-mkp {
 border:1px solid #d8d8d8;font-family:Arial;margin:10px
 0;padding:0 10px;}

 #yiv7997502934 #yiv7997502934ygrp-mkp hr {
 border:1px solid #d8d8d8;}

 #yiv7997502934 #yiv7997502934ygrp-mkp #yiv7997502934hd {
 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
 0;}

 #yiv7997502934 #yiv7997502934ygrp-mkp #yiv7997502934ads {
 margin-bottom:10px;}

 #yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad {
 padding:0 0;}

 #yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad p {
 margin:0;}

 #yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad a {
 color:#0000ff;text-decoration:none;}
 #yiv7997502934 #yiv7997502934ygrp-sponsor
 #yiv7997502934ygrp-lc {
 font-family:Arial;}

 #yiv7997502934 #yiv7997502934ygrp-sponsor
 #yiv7997502934ygrp-lc #yiv7997502934hd {
 margin:10px
 0px;font-weight:700;font-size:78%;line-height:122%;}

 #yiv7997502934 #yiv7997502934ygrp-sponsor
 #yiv7997502934ygrp-lc .yiv7997502934ad {
 margin-bottom:10px;padding:0 0;}

 #yiv7997502934 #yiv7997502934actions {
 font-family:Verdana;font-size:11px;padding:10px 0;}

 #yiv7997502934 #yiv7997502934activity {
 background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}

 #yiv7997502934 #yiv7997502934activity span {
 font-weight:700;}

 #yiv7997502934 #yiv7997502934activity span:first-child {
 text-transform:uppercase;}

 #yiv7997502934 #yiv7997502934activity span a {
 color:#5085b6;text-decoration:none;}

 #yiv7997502934 #yiv7997502934activity span span {
 color:#ff7900;}

 #yiv7997502934 #yiv7997502934activity span
 .yiv7997502934underline {
 text-decoration:underline;}

 #yiv7997502934 .yiv7997502934attach {
 clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
 0;width:400px;}

 #yiv7997502934 .yiv7997502934attach div a {
 text-decoration:none;}

 #yiv7997502934 .yiv7997502934attach img {
 border:none;padding-right:5px;}

 #yiv7997502934 .yiv7997502934attach label {
 display:block;margin-bottom:5px;}

 #yiv7997502934 .yiv7997502934attach label a {
 text-decoration:none;}

 #yiv7997502934 blockquote {
 margin:0 0 0 4px;}

 #yiv7997502934 .yiv7997502934bold {
 font-family:Arial;font-size:13px;font-weight:700;}

 #yiv7997502934 .yiv7997502934bold a {
 text-decoration:none;}

 #yiv7997502934 dd.yiv7997502934last p a {
 font-family:Verdana;font-weight:700;}

 #yiv7997502934 dd.yiv7997502934last p span {
 margin-right:10px;font-family:Verdana;font-weight:700;}

 #yiv7997502934 dd.yiv7997502934last p
 span.yiv7997502934yshortcuts {
 margin-right:0;}

 #yiv7997502934 div.yiv7997502934attach-table div div a {
 text-decoration:none;}

 #yiv7997502934 div.yiv7997502934attach-table {
 width:400px;}

 #yiv7997502934 div.yiv7997502934file-title a, #yiv7997502934
 div.yiv7997502934file-title a:active, #yiv7997502934
 div.yiv7997502934file-title a:hover, #yiv7997502934
 div.yiv7997502934file-title a:visited {
 text-decoration:none;}

 #yiv7997502934 div.yiv7997502934photo-title a,
 #yiv7997502934 div.yiv7997502934photo-title a:active,
 #yiv7997502934 div.yiv7997502934photo-title a:hover,
 #yiv7997502934 div.yiv7997502934photo-title a:visited {
 text-decoration:none;}

 #yiv7997502934 div#yiv7997502934ygrp-mlmsg
 #yiv7997502934ygrp-msg p a span.yiv7997502934yshortcuts {
 font-family:Verdana;font-size:10px;font-weight:normal;}

 #yiv7997502934 .yiv7997502934green {
 color:#628c2a;}

 #yiv7997502934 .yiv7997502934MsoNormal {
 margin:0 0 0 0;}

 #yiv7997502934 o {
 font-size:0;}

 #yiv7997502934 #yiv7997502934photos div {
 float:left;width:72px;}

 #yiv7997502934 #yiv7997502934photos div div {
 border:1px solid
 #666666;height:62px;overflow:hidden;width:62px;}

 #yiv7997502934 #yiv7997502934photos div label {
 color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}

 #yiv7997502934 #yiv7997502934reco-category {
 font-size:77%;}

 #yiv7997502934 #yiv7997502934reco-desc {
 font-size:77%;}

 #yiv7997502934 .yiv7997502934replbq {
 margin:4px;}

 #yiv7997502934 #yiv7997502934ygrp-actbar div a:first-child {
 margin-right:2px;padding-right:5px;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg {
 font-size:13px;font-family:Arial, helvetica, clean,
 sans-serif;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg table {
 font-size:inherit;font:100%;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg select,
 #yiv7997502934 input, #yiv7997502934 textarea {
 font:99% Arial, Helvetica, clean, sans-serif;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg pre, #yiv7997502934
 code {
 font:115% monospace;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg * {
 line-height:1.22em;}

 #yiv7997502934 #yiv7997502934ygrp-mlmsg #yiv7997502934logo {
 padding-bottom:10px;}


 #yiv7997502934 #yiv7997502934ygrp-msg p a {

 font-family:Verdana;}

 #yiv7997502934 #yiv7997502934ygrp-msg
 p#yiv7997502934attach-count span {
 color:#1E66AE;font-weight:700;}

 #yiv7997502934 #yiv7997502934ygrp-reco
 #yiv7997502934reco-head {
 color:#ff7900;font-weight:700;}

 #yiv7997502934 #yiv7997502934ygrp-reco {
 margin-bottom:20px;padding:0px;}

 #yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov

 li a {
 font-size:130%;text-decoration:none;}

 #yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov
 li {
 font-size:77%;list-style-type:square;padding:6px 0;}

 #yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov
 ul {
 margin:0;padding:0 0 0 8px;}

 #yiv7997502934 #yiv7997502934ygrp-text {
 font-family:Georgia;}

 #yiv7997502934 #yiv7997502934ygrp-text p {
 margin:0 0 1em 0;}

 #yiv7997502934 #yiv7997502934ygrp-text tt {
 font-size:120%;}

 #yiv7997502934 #yiv7997502934ygrp-vital ul li:last-child {
 border-right:none !important;
 }
 #yiv7997502934

Reply | Threaded
Open this post in threaded view
|  
Report Content as Inappropriate

Re: [belajar-excel] VBA menampilkan textbox jika kondisi sama

Milis Belajar Excel mailing list
 

Trima kasih mas ryan atas masukannya. Case solved... 😊

Pada tanggal 26 Mei 2017 14.28, "Ryan Sacth [hidden email] [belajar-excel]" <[hidden email]> menulis:
 

Waalaikumsallam.

Sesuai dengan masalahmu, saya coba bantu yah. Mungkin ini hanya sederhana dan para master di sini bisa bantu sempurnakan.

Karena saya tidak mengetahui nama Object dari Textbox dan CheckBox kamu maka saya indikasikan dengan:

namacheckboxkamu ----> Untuk Object CheckBox
namatextboalamatsesuaiKTP ----> Untuk Object TextBox
namatextboxalamatsekarang ----> Untuk Object TextBox

Letakkan code ini pada Userform yang digunakan.

Private Sub namacheckboxkamu_Click()
If namacheckboxkamu.Value = True Then
namatextboalamatsesuaiKTP.Value = namatextboxalamatsekarang.Value
Else
namatextboxalamatsekarang.Value = ""
End If
End Sub

Demikian, semoga berhasil.
Wassalam.
--------------------------------------------
On Thu, 5/25/17, heru Rasna herurasna@yahoo.co.id [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

Subject: [belajar-excel] VBA menampilkan textbox jika kondisi sama [2 Attachments]
To: belajar-excel@yahoogroups.com
Date: Thursday, May 25, 2017, 9:27 PM


 







Assalamualaikum....salam
hormat para master exceller sekalian...
kasus
:ada 2
textbox-
alamat ktp-
alamat sekaranghasil
yng di inginkan jika alamat alamat sekarangn sama dengan
alamat ktp maka ketika checkbox di centang alamat sekarang
terisi otomatis sama dengan alamat ktp.jika
tidak dicentang maka alamat sekarang bisa diisi sesuai

alamat terbaru
mohon
petunjuk penulisan coding vba nya master
untuk
jelas terlampir screnshoot












#yiv7997502934 #yiv7997502934 --
#yiv7997502934ygrp-mkp {
border:1px solid #d8d8d8;font-family:Arial;margin:10px
0;padding:0 10px;}

#yiv7997502934 #yiv7997502934ygrp-mkp hr {
border:1px solid #d8d8d8;}

#yiv7997502934 #yiv7997502934ygrp-mkp #yiv7997502934hd {
color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}

#yiv7997502934 #yiv7997502934ygrp-mkp #yiv7997502934ads {
margin-bottom:10px;}

#yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad {
padding:0 0;}

#yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad p {
margin:0;}

#yiv7997502934 #yiv7997502934ygrp-mkp .yiv7997502934ad a {
color:#0000ff;text-decoration:none;}
#yiv7997502934 #yiv7997502934ygrp-sponsor
#yiv7997502934ygrp-lc {
font-family:Arial;}

#yiv7997502934 #yiv7997502934ygrp-sponsor
#yiv7997502934ygrp-lc #yiv7997502934hd {
margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}

#yiv7997502934 #yiv7997502934ygrp-sponsor
#yiv7997502934ygrp-lc .yiv7997502934ad {
margin-bottom:10px;padding:0 0;}

#yiv7997502934 #yiv7997502934actions {
font-family:Verdana;font-size:11px;padding:10px 0;}

#yiv7997502934 #yiv7997502934activity {
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}

#yiv7997502934 #yiv7997502934activity span {
font-weight:700;}

#yiv7997502934 #yiv7997502934activity span:first-child {
text-transform:uppercase;}

#yiv7997502934 #yiv7997502934activity span a {
color:#5085b6;text-decoration:none;}

#yiv7997502934 #yiv7997502934activity span span {
color:#ff7900;}

#yiv7997502934 #yiv7997502934activity span
.yiv7997502934underline {
text-decoration:underline;}

#yiv7997502934 .yiv7997502934attach {
clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}

#yiv7997502934 .yiv7997502934attach div a {
text-decoration:none;}

#yiv7997502934 .yiv7997502934attach img {
border:none;padding-right:5px;}

#yiv7997502934 .yiv7997502934attach label {
display:block;margin-bottom:5px;}

#yiv7997502934 .yiv7997502934attach label a {
text-decoration:none;}

#yiv7997502934 blockquote {
margin:0 0 0 4px;}

#yiv7997502934 .yiv7997502934bold {
font-family:Arial;font-size:13px;font-weight:700;}

#yiv7997502934 .yiv7997502934bold a {
text-decoration:none;}

#yiv7997502934 dd.yiv7997502934last p a {
font-family:Verdana;font-weight:700;}

#yiv7997502934 dd.yiv7997502934last p span {
margin-right:10px;font-family:Verdana;font-weight:700;}

#yiv7997502934 dd.yiv7997502934last p
span.yiv7997502934yshortcuts {
margin-right:0;}

#yiv7997502934 div.yiv7997502934attach-table div div a {
text-decoration:none;}

#yiv7997502934 div.yiv7997502934attach-table {
width:400px;}

#yiv7997502934 div.yiv7997502934file-title a, #yiv7997502934
div.yiv7997502934file-title a:active, #yiv7997502934
div.yiv7997502934file-title a:hover, #yiv7997502934
div.yiv7997502934file-title a:visited {
text-decoration:none;}

#yiv7997502934 div.yiv7997502934photo-title a,
#yiv7997502934 div.yiv7997502934photo-title a:active,
#yiv7997502934 div.yiv7997502934photo-title a:hover,
#yiv7997502934 div.yiv7997502934photo-title a:visited {
text-decoration:none;}

#yiv7997502934 div#yiv7997502934ygrp-mlmsg
#yiv7997502934ygrp-msg p a span.yiv7997502934yshortcuts {
font-family:Verdana;font-size:10px;font-weight:normal;}

#yiv7997502934 .yiv7997502934green {
color:#628c2a;}

#yiv7997502934 .yiv7997502934MsoNormal {
margin:0 0 0 0;}

#yiv7997502934 o {
font-size:0;}

#yiv7997502934 #yiv7997502934photos div {
float:left;width:72px;}

#yiv7997502934 #yiv7997502934photos div div {
border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}

#yiv7997502934 #yiv7997502934photos div label {
color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}

#yiv7997502934 #yiv7997502934reco-category {
font-size:77%;}

#yiv7997502934 #yiv7997502934reco-desc {
font-size:77%;}

#yiv7997502934 .yiv7997502934replbq {
margin:4px;}

#yiv7997502934 #yiv7997502934ygrp-actbar div a:first-child {
margin-right:2px;padding-right:5px;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg {
font-size:13px;font-family:Arial, helvetica, clean,
sans-serif;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg table {
font-size:inherit;font:100%;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg select,
#yiv7997502934 input, #yiv7997502934 textarea {
font:99% Arial, Helvetica, clean, sans-serif;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg pre, #yiv7997502934
code {
font:115% monospace;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg * {
line-height:1.22em;}

#yiv7997502934 #yiv7997502934ygrp-mlmsg #yiv7997502934logo {
padding-bottom:10px;}


#yiv7997502934 #yiv7997502934ygrp-msg p a {

font-family:Verdana;}

#yiv7997502934 #yiv7997502934ygrp-msg
p#yiv7997502934attach-count span {
color:#1E66AE;font-weight:700;}

#yiv7997502934 #yiv7997502934ygrp-reco
#yiv7997502934reco-head {
color:#ff7900;font-weight:700;}

#yiv7997502934 #yiv7997502934ygrp-reco {
margin-bottom:20px;padding:0px;}

#yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov

li a {
font-size:130%;text-decoration:none;}

#yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov
li {
font-size:77%;list-style-type:square;padding:6px 0;}

#yiv7997502934 #yiv7997502934ygrp-sponsor #yiv7997502934ov
ul {
margin:0;padding:0 0 0 8px;}

#yiv7997502934 #yiv7997502934ygrp-text {
font-family:Georgia;}

#yiv7997502934 #yiv7997502934ygrp-text p {
margin:0 0 1em 0;}

#yiv7997502934 #yiv7997502934ygrp-text tt {
font-size:120%;}

#yiv7997502934 #yiv7997502934ygrp-vital ul li:last-child {
border-right:none !important;
}
#yiv7997502934

__._,_.___

Posted by: Heru Din <[hidden email]>
Reply via web post [hidden email] [hidden email] Start a New Topic Messages in this topic (2)

Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.

============================================================
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: [hidden email]
posting ke milis, kirimkan ke: [hidden email]
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@.../
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: [hidden email]
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : [hidden email]
---------------------------------------------------------------------

.

__,_._,___
Loading...