Siang Mr Kid
terima kasih infonya, cuma setelah perbarui formula text dan saya coba masih 
eror juga seperti ini:"=TEXT(B1,""000,,""""    
"""""")"&TEXT(C1,""000000000000000,,""""    
"""""")"&TEXT(D1,""000000000000000,,""""    
"""""")"&TEXT(E1,""000000000000000,,""""    """""")"&TEXT(F1,""0000,,""""    
"""""")" 'simpan teks formula.
ada yang salah dengan formula saya Mr. Kid??
mohon infonya.. terima kasih
Regards
Andree    Pada Senin, 22 Juli 2019 10.14.32 WIB, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] <belajar-excel@yahoogroups.com> menulis:

  

yup
On Mon, Jul 22, 2019 at 10:13 AM Andre Rahmaidy andree_bpdsum...@yahoo.co.id 
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  

 Pagi Mr. Kid
Terima kasih sebelumnya udah menanggapi terkait permasalahan terkait macro 
excel yang saya punya, setelah saya pelajari terkait dengan formula text 
*=text(alamat_cells,"0000;;""    """)* ketika saya ubah di aplikasi macro 
hasilnya eror (warna merah)Apakah formula text tersebut saya ubah ke semua 
formula text yang ada di    macro excel.
Mohon solusinya Mr Kid, Terima Kasih saya ucapkan

Regards
Andree    Pada Rabu, 17 Juli 2019 06.51.22 WIB, 'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel] <belajar-excel@yahoogroups.com> menulis:

  

Cells kosong by default akan setara dengan berisi 0 (jika bertipe numerik, 
berlaku di dalam Excel worksheet saja) atau nullstring (seperti hasil formula 
="", jika bertipe text, berlaku di Excel worksheet maupun di VBA).
JIka saat ini cells kosong menghasilkan 0000, kemungkinan besar Anda 
menggunakan formula Text atau IF (di Excel worksheet) atau dengan fungsi Format 
atau blok IF (di VBA).Jika Anda menggunakan formula IF (di Excel worksheet) 
atau blok IF (di VBA), tentu hal ini tidak menimbulkan masalah, karena Anda 
lebih mengenal bagian yang harus disesuaikan.Jadi, kemungkinannya adalah Anda 
menggunakan formula Text (di Excel worksheet) atau fungsi Format (di VBA).
1. Jika Anda menggunakan fungsi Format di VBA dan hasil cells kosong adalah 
0000, maka bunyi script Anda kira-kira begini :             format( clng( 
alamat_cells.value ) , "0000" )    supaya 0000 pada cells kosong berubah 
menjadi spasi 4 karakter, maka bunyi tersebut diproses lebih lanjut dengan 
replace, sehingga berubah menjadi :             replace( format( clng( 
alamat_cells.value ) , "0000" )  , 0 , " " )

2. Jika Anda menggunakan formula Text Excel Worksheet yang secara default cells 
kosong akan setara nilai 0 dan menjadi 0000, maka bunyi formula Anda kira-kira 
begini :             =text(alamat_cells,"0000")    kalau bunyi formula ini 
dipasang dengan VBA, maka sebuah karakter " (1 bijik karakter petik dua) harus 
diubah menjadi "" (2 bijik karakter petik dua) :             
cells_target.formula= "=text(alamat_cells,""0000"")"
    Jika Anda mempelajari number format sebuah cells Excel, maka part dalam 
number format adalah :             format_nilai_positif ; format_nilai_negatif 
; format_nilai_nol ; format_teks
    Dengan kaidah number format tersebut dan juga default cells kosong adalah 0 
ketika bertipe numerik (default cells Excel adalah bertipe numerik Double),     
maka bunyi format yang dibutuhkan untuk menghasilkan spasi 4 karakter ketika 
cells berisi nilai 0 atau kosong, dan menghasilkan 4 digit angka ketika cells 
berisi nilai selain 0 atau selain kosong :                      0000;;"    "
    Jika format ini digunakan dalam formula Text, menjadi : (ingat, setiap 1 
bijik karakter petik dua yang ada di dalam blok petik dua lainnya harus menjadi 
2 bijik karakter petik dua)             =text(alamat_cells,"0000;;""    """)    
kalau bunyi formula ini dipasang dengan VBA, maka sebuah karakter " (1 bijik 
karakter petik dua) harus diubah menjadi "" (2 bijik karakter petik dua) :      
       cells_target.formula= "=text(alamat_cells,""0000;;""""    """""")"
Regards,Kid



On Wed, Jul 17, 2019 at 12:20 AM Andre Rahmaidy andree_bpdsum...@yahoo.co.id 
[belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  
Selamat malam

Terkait dengan pertanyaan saya mengenai macro excel convert TXT, belum ada yang 
menanggapi atw membantu mencari solisi terkait permasalahan aplikasi macro 
excel mungkin saya perjelas lagi terkait dengan pertanyaan saya 
kemaren..Aplikasi macro excel tsbt merupakan tools yg dibuat untuk menghasilkan 
file txt.. permasalahannya didalam tabel excel tersebut kolom F (Kab/Kota) yang 
kosong, hasil aplikasi macro excel tersebut dalam bentuk file TXT untuk kolom F 
Hasilnya seperti ini 0000, yang saya inginkan gimana script/coding di macro 
excelnya untuk kolom F yang kosong tersebut hasilnya spasi 4 (empat) kali bukan 
nol 4..Demikianlah yng saya sampaikan, dengan ini saya ucapkan terima kasih..
Wassalam
Andree
Dikirim dari Yahoo Mail di Android

   ----- Pesan yang Diteruskan ----- Dari: "Andre Rahmaidy" 
<andree_bpdsum...@yahoo.co.id> Kepada: "BeExcel" 
<belajar-excel@yahoogroups.com> Cc:  Terkirim: Sen, 15 Jul 2019 pada 23:45 
Judul: Fw: Macro Exel Convert ke TXT      ----- Pesan yang Diteruskan ----- 
Dari: Andre Rahmaidy <andree_bpdsum...@yahoo.co..id>Kepada: BeExcel 
<belajar-excel@yahoogroups.com>Terkirim: Senin, 15 Juli 2019 23.27.58 WIBJudul: 
Macro Exel Convert ke TXT
 Dear Para Suhu

Ada yang mau saya sampaikan terkait dengan macro excel yang saya punya yang 
ingin tanyakan saya adalah :
1. macro excel yng saya punya convert data dari excel yang outputnya TXT, 
sesuai dengan kriteria yang diinginkan,trus saya ingin ada penambahan terkait 
dengan baris/record pertama kolom terakhir kosong (tidak ada angka) di output 
TXT diisi dengan spasi 4 kali.. sedangkan kolom yang ada isi tetap seperti 
biasanya, terlampir file macro excelnya..
Terimakasih sebelumnya buat para suhu atas tanggapan dan pencerahannya.

Nb. Pass Macro ******

Regards

Andre    






  #yiv5803250688 #yiv5803250688 -- #yiv5803250688ygrp-mkp {border:1px solid 
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv5803250688 
#yiv5803250688ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv5803250688 
#yiv5803250688ygrp-mkp #yiv5803250688hd 
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 
0;}#yiv5803250688 #yiv5803250688ygrp-mkp #yiv5803250688ads 
{margin-bottom:10px;}#yiv5803250688 #yiv5803250688ygrp-mkp .yiv5803250688ad 
{padding:0 0;}#yiv5803250688 #yiv5803250688ygrp-mkp .yiv5803250688ad p 
{margin:0;}#yiv5803250688 #yiv5803250688ygrp-mkp .yiv5803250688ad a 
{color:#0000ff;text-decoration:none;}#yiv5803250688 #yiv5803250688ygrp-sponsor 
#yiv5803250688ygrp-lc {font-family:Arial;}#yiv5803250688 
#yiv5803250688ygrp-sponsor #yiv5803250688ygrp-lc #yiv5803250688hd {margin:10px 
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv5803250688 
#yiv5803250688ygrp-sponsor #yiv5803250688ygrp-lc .yiv5803250688ad 
{margin-bottom:10px;padding:0 0;}#yiv5803250688 #yiv5803250688actions 
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv5803250688 
#yiv5803250688activity 
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv5803250688
 #yiv5803250688activity span {font-weight:700;}#yiv5803250688 
#yiv5803250688activity span:first-child 
{text-transform:uppercase;}#yiv5803250688 #yiv5803250688activity span a 
{color:#5085b6;text-decoration:none;}#yiv5803250688 #yiv5803250688activity span 
span {color:#ff7900;}#yiv5803250688 #yiv5803250688activity span 
.yiv5803250688underline {text-decoration:underline;}#yiv5803250688 
.yiv5803250688attach 
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 
0;width:400px;}#yiv5803250688 .yiv5803250688attach div a 
{text-decoration:none;}#yiv5803250688 .yiv5803250688attach img 
{border:none;padding-right:5px;}#yiv5803250688 .yiv5803250688attach label 
{display:block;margin-bottom:5px;}#yiv5803250688 .yiv5803250688attach label a 
{text-decoration:none;}#yiv5803250688 blockquote {margin:0 0 0 
4px;}#yiv5803250688 .yiv5803250688bold 
{font-family:Arial;font-size:13px;font-weight:700;}#yiv5803250688 
.yiv5803250688bold a {text-decoration:none;}#yiv5803250688 dd.yiv5803250688last 
p a {font-family:Verdana;font-weight:700;}#yiv5803250688 dd.yiv5803250688last p 
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv5803250688 
dd.yiv5803250688last p span.yiv5803250688yshortcuts 
{margin-right:0;}#yiv5803250688 div.yiv5803250688attach-table div div a 
{text-decoration:none;}#yiv5803250688 div.yiv5803250688attach-table 
{width:400px;}#yiv5803250688 div.yiv5803250688file-title a, #yiv5803250688 
div.yiv5803250688file-title a:active, #yiv5803250688 
div.yiv5803250688file-title a:hover, #yiv5803250688 div.yiv5803250688file-title 
a:visited {text-decoration:none;}#yiv5803250688 div.yiv5803250688photo-title a, 
#yiv5803250688 div.yiv5803250688photo-title a:active, #yiv5803250688 
div.yiv5803250688photo-title a:hover, #yiv5803250688 
div.yiv5803250688photo-title a:visited {text-decoration:none;}#yiv5803250688 
div#yiv5803250688ygrp-mlmsg #yiv5803250688ygrp-msg p a 
span.yiv5803250688yshortcuts 
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv5803250688 
.yiv5803250688green {color:#628c2a;}#yiv5803250688 .yiv5803250688MsoNormal 
{margin:0 0 0 0;}#yiv5803250688 o {font-size:0;}#yiv5803250688 
#yiv5803250688photos div {float:left;width:72px;}#yiv5803250688 
#yiv5803250688photos div div {border:1px solid 
#666666;min-height:62px;overflow:hidden;width:62px;}#yiv5803250688 
#yiv5803250688photos div label 
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv5803250688
 #yiv5803250688reco-category {font-size:77%;}#yiv5803250688 
#yiv5803250688reco-desc {font-size:77%;}#yiv5803250688 .yiv5803250688replbq 
{margin:4px;}#yiv5803250688 #yiv5803250688ygrp-actbar div a:first-child 
{margin-right:2px;padding-right:5px;}#yiv5803250688 #yiv5803250688ygrp-mlmsg 
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv5803250688 
#yiv5803250688ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv5803250688 
#yiv5803250688ygrp-mlmsg select, #yiv5803250688 input, #yiv5803250688 textarea 
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv5803250688 
#yiv5803250688ygrp-mlmsg pre, #yiv5803250688 code {font:115% 
monospace;}#yiv5803250688 #yiv5803250688ygrp-mlmsg * 
{line-height:1.22em;}#yiv5803250688 #yiv5803250688ygrp-mlmsg #yiv5803250688logo 
{padding-bottom:10px;}#yiv5803250688 #yiv5803250688ygrp-msg p a 
{font-family:Verdana;}#yiv5803250688 #yiv5803250688ygrp-msg 
p#yiv5803250688attach-count span {color:#1E66AE;font-weight:700;}#yiv5803250688 
#yiv5803250688ygrp-reco #yiv5803250688reco-head 
{color:#ff7900;font-weight:700;}#yiv5803250688 #yiv5803250688ygrp-reco 
{margin-bottom:20px;padding:0px;}#yiv5803250688 #yiv5803250688ygrp-sponsor 
#yiv5803250688ov li a {font-size:130%;text-decoration:none;}#yiv5803250688 
#yiv5803250688ygrp-sponsor #yiv5803250688ov li 
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv5803250688 
#yiv5803250688ygrp-sponsor #yiv5803250688ov ul {margin:0;padding:0 0 0 
8px;}#yiv5803250688 #yiv5803250688ygrp-text 
{font-family:Georgia;}#yiv5803250688 #yiv5803250688ygrp-text p {margin:0 0 1em 
0;}#yiv5803250688 #yiv5803250688ygrp-text tt {font-size:120%;}#yiv5803250688 
#yiv5803250688ygrp-vital ul li:last-child {border-right:none 
!important;}#yiv5803250688   
  • Re: [belajar-e... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
    • Re: [bela... Andre Rahmaidy andree_bpdsum...@yahoo.co.id [belajar-excel]
      • Re: [... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
        • R... Andre Rahmaidy andree_bpdsum...@yahoo.co.id [belajar-excel]
          • ... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
            • ... Andre Rahmaidy andree_bpdsum...@yahoo.co.id [belajar-excel]
              • ... Agus nanga...@gmail.com [belajar-excel]
                • ... 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]

Kirim email ke