:
>
> #if vba7 then
> fungsi api 64bit pertama
> fungsi api 64bit kedua
> dst
> #else
> fungsi api 32bit pertama
> fungsi api 32bit kedua
> dst
> #endif
>
>
> On Wed, Mar 11, 2020 at 7:02 AM him mah himmah@gmail.com
> [belajar-exce
Assalamu'alaikum Wr. Wb.
selamat pagi temen-temen excel semua
saya ada masalah terkait menjalankan VBA di excel 64Bit, yang sebelumnya
bisa berjalan normal di excel 32Bit
VBA nya seperti dibawah
kenapa tetap error ya (yang berwarna merah)
kira kira yang salah atau yang kurang apa ya
#If VBA7
Assalamulaikum
selamat pagi teman-teman semua
maaf mau tanya terkait security alert box
saya menggunakan toolbox webbrowser untuk buka website
cuma yang jadi kendala kdang muncul security alert box
seperti gambar dibawah
[image: alert.JPG]
yang jadi pertanyaan adalah
bagaiamana VBA yang otomatis
Assalamuálaikum
dear all
mau tanya untuk menampilkan WebBrowser Control pada eXcel 2016, gimana
caranya ya.
tak cari cari koq ngga ketemu
apa emang untuk excel 2016 tidak dibekali WebBrowser Control
terima kasih
macro nya
> dengan ribbon Get External Data -> pilih From Text File).
> Proses membuat query table disetiap kali membaca text file baru yang
> di-loop adalah kegiatan yang mubazir.
> Proses split text oleh opentext yang dilakukan berulang dengan ditentukan
> array fieldinfo datatype
> Regards,
> Kid
>
>
>
>
>
>
> 2017-04-18 14:25 GMT+07:00 him mah himmah@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> Seperti itu pak kid. Cuma sheet hasilnya cuma satu. Data akan ditambahkan
>> dibari
sheet dtC.
>
> Tapi nama txt filenya tidak tetap, seperti bulan ini namanya a-Apr17.txt,
> b-Apr17.txt, c-Apr17.txt
> Jumlah kolom di a.txt berbeda dengan di b.txt dan berbeda dengan c.txt.
>
> Begitu ya ?
>
>
> 2017-04-18 7:18 GMT+07:00 him mah himmah@gmail.com [be
com> menulis:
>
>
> Boleh tahu kenapa pakai VBA?
> Bagaimana kalau pakai data connection saja yang tanpa VBA?
>
> Regards,
> Kid
> Sent from my smart enough phone
>
> On Apr 17, 2017, at 13:10, him mah himmah@gmail.com [belajar-excel] <
> belajar-excel@yahoogr
dear all
maaf mau tanya lagi terkait dengan
impor data dari text file ke excel
kalau dari menu record macro
terbentuk kode seperti ini
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;" & D:\aku.txt" _
, Destination:=Worksheets("Sheet 1").Range("$A$1"))
.Name =
t
> kolom tersebut; untuk memudahkan tambahkan tanda "|"
> Jadi setelah insert kolom di kolom A maka pada sel A2 ditulis
> *=B2&"|"&"|"&"|"*.
> Buat Vlookup dengan kriteria gabungan tersebut.
>
> Salam,
> HK
>
> ---
Assalamu'alaikum Wr. Wb.
Dear All
saya ada pertanyaan terkait dengan pencarian
saya punya tabel dengan 4 kolom (A-D)
kolom A: KODE
kolom B: TAHUN
kolom C: BULAN
kolom D: KET
kemudian isi tabel itu sebagai beikut:
KODE TAHUN BULAN KET
A1 2016 1 BAIK
A2 2016 2 BAIK
A3 2015 1 BAIK
B1 2015 3
Assalamu'alaikum Wr. Wb.
dear all
maaf mau tanya tentang copy ke Clipboard
misal kita buat satu textbox dalam suatu form
dan diberi nama txtAsal
kemudian dalam textbox kita tuliskan:
selamat data para peserta pelatihan
kemudian kata peserta kita block
nah biasanya kita menekan tombol
'ke baris berikutnya
> close ifile 'tutup file
>
> 7. buang sheet temp
> application.displayalerts=false 'suruh Excel supaya ndak
> cerewet dulu
> .delete 'buang sheet temp
> application
Assalamu'alaikum. Wr. Wb
dear all
Mau tanya terkait mengedit text file
saya punya file misal DataPelanggan.txt
isinya terdiri dari Kode Pelanggan dan Nama pelanggan
yang dipisahkan oleh tanda titik koma (;)
isinya seperti ini:
P-002;ABC
P-001;DEF
P-003;GHI
P-007;XYZ
kalau dari excel
kita
mungkin bisa jalan-jalan kesini pak
http://www.rondebruin.nl/win/s2/win001.htm
2015-04-08 16:19 GMT+07:00 harry siswanto hsiswa...@yahoo.com
[belajar-excel] belajar-excel@yahoogroups.com:
Dear pak Toby,
iya nih, baru saya pasang CustomUI Editor...
Lumayan rada ruwet juga sih buat saya...
Assalamu'alaikum Wr. Wb.
saya barusan nyari fungsi untuk konvert dari xls ke CSV, dan ketemu
hasil seperti dibawah
yang mau saya tanyakan adalah, setelah saya jalankan fungsi tersebut
dan berhasil namun yang jadi masalah pembatas antar kolom nya pake
koma (,) kalau ingin merubah untuk
, , , , , , , , , , True
2014-07-21 8:18 GMT+07.00, him mah himmah@gmail.com:
Assalamu'alaikum Wr. Wb.
saya barusan nyari fungsi untuk konvert dari xls ke CSV, dan ketemu
hasil seperti dibawah
yang mau saya tanyakan adalah, setelah saya jalankan fungsi tersebut
dan berhasil namun yang
kemarin pas kopdar dibahas juga customUI ya
Pada 21 Mei 2014 23.17, nangAgus nangag...@yahoo.co.id [belajar-excel]
belajar-excel@yahoogroups.com menulis:
Setelah saya mendapatkan notepad ++ (ntpp) saya juga mulai belajar menulis
script CustomUI. kalau saya posting disini, customUI OOT apa
coba jalan jalan kesini
www.rondebruin.nl
habis itu tinggal dikembangkan sesuai kebutuhan
Pada tanggal 26/03/14, prazt praztm...@gmail.com menulis:
Dear beExceller, ada yang punya ebook / referensi tentang kustomisasi
ribbonX excel tidak? Kalau ada ane dibagi doong, atau malah para master di
mantap pak
Pada tanggal 22/02/14, Mr. Kid mr.nm...@gmail.com menulis:
Dear BeExceller,
Moga-moga belum pada bosen belajar VBA ya...
Mogo-moga belum pada bosen juga dengerin ocehan si Kid yang kurang kerjaan
ini...
Moga-moga juga coretan si Kid yang ada
Assalamuálaikum Wr. Wb.
ceritanya saya mau buat soal atau kuis cari kata
misal seperti ini
1. Soal berada di kolom A (terdiri dari kumpulan kata)
2. kolom jawaban ada di range D3..S22
3. soal berada di kolom A akan dipetakan secara acak di range Jawaban
Dengan Posisi yang
dipenuhi di dunia nyata sehingga tidak selalu
bisa on line setiap saat;
- Semoga semangat berbagi dan membantu semakin meningkat di kalangan
Be-Exceller dan menjadi amalan yang baik untuk tabungan di akhirat nanti.
اَمِين يَا رَبَّ الْعَالَمِيْن
Pada 8 Juli 2013 16.10, him mah
sip pak hendrik, saya coba koq berhasil ya, terima kasih
Pada tanggal 06/05/13, Hendrik via Dropbox hendrikkarn...@yahoo.com menulis:
Hendrik's message:
Buat teman2 yang telah kehilangan atau belum bisa menginstal Calendar
Control, khususnya Excel 2010 bisa connet ke link di bawah ini (saya
cuma masukan saja pak, kadang ngga semua user bisa melakukan register
mscal, bisa ngga dibuat menjadi file exe sehingga tinggal klik saja
terus otomatis (tidak manual) akan menjalankan perintah copy dan
register sesuai denagn versi komputernya masing-masing
Pada tanggal 06/05/13, him mah himmah
dear all, untuk edit dan run file bat dari excel VBA nya seperti apa ya
setelah saya googling di internet ketemu VBA seperti ini
Sub WriteAndRunBatFile()
Dim fs As Scripting.FileSystemObject
Dim file As TextStream
Dim retVal
Dim strFilePath As String
strFilePath = C:\AKU\aku.bat
Set fs = New
cuma nambahkan. kalau querynya terlalu kompleks biasanya tidak bisa di
impor oleh exel
Pada tanggal 13/02/13, Mr. Kid mr.nm...@gmail.com menulis:
Hai Tio,
Jika di MS Access sudah dibuat object query, biasanya akan langsung
terdaftar sebagai dataset yang bisa diambil. Data set yang bisa
Assalamu'alaikum Wr. Wb.
dear be-excel
mau tanya,
misal saya nulis VBA seperti ini
for x = 1 to 1000
' ketika x mencapai kelipatan 100 (100,200,300,400, dst)
' maka akan menjalankan perintah activeworkbook.save
next x
kira-kira gimana caranya (fungsi VBA) untuk mencari kelipatan 100
terima
-
From: him mah himmah@gmail.com
Sender: belajar-excel@yahoogroups.com
Date: Mon, 28 Jan 2013 15:48:57
To: belajar-excelbelajar-excel@yahoogroups.com
Reply-To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] nyari nilai kelipatan
Assalamu'alaikum Wr. Wb.
dear be-excel
mau tanya
, bisa search di internet tentang login webpage
using excel VBA atau using VB6
Wassalamu'alaikum Wr. Wb.
Kid.
2013/1/15 him mah himmah@gmail.com
**
Assalamu'alaikum Wr. Wb.
dear all
mau tanya lagi:
misal kita akan melakukan impor Data
dengan menggunakan Get Eksternal Data From Web
Assalamu'alaikum Wr. Wb.
dear all
mau tanya lagi:
misal kita akan melakukan impor Data
dengan menggunakan Get Eksternal Data From Web
nah yang jadi masalah itu kalau website yang kita tuju itu menggunakan
login dan password, misal kita sudah tahu login dan passwordnya,
bagaimana caranya
(tekan CTRL C )
9. paste special values dengan : klik kanan sebuah cell - pilih paste
special - pilih values - tekan OK
Wassalam,
Kid.
2013/1/4 him mah himmah@gmail.com
**
Assalamu'alaikum Wr. Wb.
maaf, mau tanya lagi
kita punya sheet yang datanya ada yang kosong (seperti dibawah
Selection.SpecialCells(xlCellTypeBlanks).Select
ActiveSheet.Paste
Range(A4:B15).Select
Application.CutCopyMode = False
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Pada tanggal 04/01/13, him mah himmah
Assalamu'alaikum Wr. Wb.
maaf, mau tanya
misal ketika kita menuliskan Script di modul VBA, antara menulis dalam
satu modul atau beberapa modul, kira-kira pengaruhnya apa ya
terima kasih
Assalamualaikum Wr. Wb.
maaf, mau tanya lagi
misal dalam suatu file excel itu ada sheet yang terfilter (auto
filter), kemudian bagaimana caranya agar sheet-sheet yang terfilter
itu menjadi tidak terfilter
terima kasih
).autofiltermode=false
Wassalam,
Kid.
On Dec 4, 2012 7:14 AM, him mah himmah@gmail.com wrote:
**
Assalamualaikum Wr. Wb.
maaf, mau tanya lagi
misal dalam suatu file excel itu ada sheet yang terfilter (auto
filter), kemudian bagaimana caranya agar sheet-sheet yang terfilter
itu menjadi tidak
= 2
l = 2 / 2 * rng.value 'berpotensi error, ketika rng berisi string
atau ada banyak cell dalam rng
sMsg = sMsg Now vbTab Err.Number vbTab Err.Description
vbCrLf
MsgBox sMsg
Err.Clear
End Sub
Wassalamu'alaikum Wr. Wb.
Kid.
2012/11/23 him mah himmah
Assalamu'alaikum Wr. Wb.
ketika kita membuat perintah menggunakan VBA atau makro maka sering
kita mengalami error, bisa ngga ya semua error itu ditampung terlebih
dahulu sampai semua prosedur dijalankan sampai akhir. Nah ketika
emang dalam proses tersebut terjadi error bisa 1 atau lebih, maka
Assalamu 'alaikum Wr. Wb.
setelah saya cari-cari di internet, apa memang untuk align kolom yang
ada di listbox ngga bisa diatur ya, misal untuk kolom number itu maka
dia akan rata kanan
terima kasih
,
Kid.
2012/11/22 him mah himmah@gmail.com
**
Assalamu 'alaikum Wr. Wb.
setelah saya cari-cari di internet, apa memang untuk align kolom yang
ada di listbox ngga bisa diatur ya, misal untuk kolom number itu maka
dia akan rata kanan
terima kasih
judul bukunya apa pak?
iya pak KID, tapi akan menjadi masalah ketika file itu dipakai oleh
orang lain dengan komputer yang berbeda
nilai settingan user yang disimpan di suatu variabel tadi. itupun kalau
pake disimpan dulu di atas sana tadi.
Gitu kali ya...
Moga-moga rada jelas ocehannya.
Wassalam,
Kid.
2012/11/14 him mah himmah@gmail.com
**
terima kasih ibu JAN dan Pak KID,
yang saya maksud sama seperti
mungkin bisa untuk menambah pengetahuan, bisan digunakan untuk menu pembukaan
http://itknowledgeexchange.techtarget.com/beyond-excel/animating-your-companys-logo-in-excel/
Private Sub Workbook_Open()
Worksheets(Data).Activate
ActiveSheet.Shapes(Logo).LockAspectRatio = False
Mohon bantuannya
saya punya file excel dengan nama fileA terdiri dari beberapa sheet
dengan nama A,B,C,D, dan E status sheet tersebut
xlSheetVeryHidden
saya ingin melakukan move copy ke file excel baru untuk sheet tersebut
dan file baru tersebut dinamai fileB,
untuk di fileA sheet sheet
terima kasih ibu JAN dan Pak KID,
yang saya maksud sama seperti jawaban pak KID, hanya sheet tertentu
saja yang copy. cuma ketika kita buat file baru maka akan terbentuk
sheet-sheet baru sesuai dengan option general komputer masing-masing
(include this many sheets), untuk menghilangkan atau
ketika nyari nyari VBA agar gambar (shape) posisinya di tengah
http://www.mrexcel.com/forum/excel-questions/200260-center-shape-picture-active-screen.html
Sub Example()
CenterShape Me.Shapes(Rectangle 1)
End Sub
Public Sub CenterShape(o As Shape)
o.Left =
maaf mau tanya: misal saya punya tabel seperti dibawah (terdiri dari 2
kolom) misal kolom NO dan ALAMAT, untuk kolom alamat terdapat data
yang mempunyai link dan tidak ada hyperlink
NO ALAMAT
1 id.yahoo.com/?p=us
2 detik.com
3 republika.co.id/
4 www.inilah.com/
5
iya terima kasih bu, sudah bisa
di dalam HASILnya kita akan kesulitan membedakan
KOMA ex Delmiter -vs- KOMA ex formatting bilangan
*
Hendaknya hal ini dipertimbangan
terutana jika hasil (dlm satu cell tsb) akan di expand lagi menjadi data
beberapa cells
2010/11/4 him mah himmah@gmail.com
sesuai dengan yang
kita sudah ngeset suatu variable
misal :
dim shtAsal as sheet
set shtAsal=sheets(asal).select
apakah kalau sudah selesai perlu dibuat
set shtAsal =nothing
kalau ngga di set seperti itu apakah pengaruhnya, dan semua variable
harus di set seperti itu
sudah. berhasil pak. makasih. tapi saya kadang masih bingung dengan
offset resize. curenntregion
panggil si mbahnya dulu...
misal nama form adalah userform1
control yang akan diambil adalah txtTahun
userfom1.txtTahun.setfocus
Wassalam,
Kid.
2012/11/2 him mah himmah@gmail.com
**
maaf pak kid masalahnya bukan disitu, tadi saya salah ngetik
seharusnya
maaf belum bisa saya lampirkan contoh filenya, mungkin ilustrasi dulu
misal kita punya 3 tabel
tabel propinsi ada di sheet tblProp terdiri dari 1 kolom yaitu kolom A
headernya Nama_propinsi
tabel kabupaten ada di sheet tblKab terdiri dari 2 kolom, kolom A
(NAMA_PROPINSI] dan kolom B [NAMA_KAB]
, maka tampilkan msgbox :
if lenb(spesan)0 then
msgbox spesan,vbinformation,Hapus Data
endif
4. Prosedur event click si cmdHapus selesai diubah
Wassalam,
Kid.
2012/11/2 him mah himmah@gmail.com
**
kalau VBA seperti ini
Private Sub cmdHapus_Click()
HapusData
MsgBox (Hapus
combo yang biasa digunakan.
Wassalam,
Kid.
2012/11/2 him mah himmah@gmail.com
**
maaf belum bisa saya lampirkan contoh filenya, mungkin ilustrasi dulu
misal kita punya 3 tabel
tabel propinsi ada di sheet tblProp terdiri dari 1 kolom yaitu kolom A
headernya Nama_propinsi
tabel
01/11/12, Mr. Kid mr.nm...@gmail.com menulis:
Coba didalam event click si CommandButton diberi baris perintah untuk set
fokus ke combobox.
ComboBox.setfocus
Tidak semua object control bisa menerima aksi dari setfocus.
Wassalam,
Kid.
2012/11/1 him mah himmah@gmail.com
maaf pak kid masalahnya bukan disitu, tadi saya salah ngetik
seharusnya pesan = MsgBox(Apakah data sebelumnya akan dihapus,
vbYesNoCancel, cek)
nah ketika kita pilih vbCancel
contoh filenya saya lampirkan
Pada tanggal 02/11/12, Mr. Kid mr.nm...@gmail.com menulis:
Coba ganti :
pesan =
...
misal nama form adalah userform1
control yang akan diambil adalah txtTahun
userfom1.txtTahun.setfocus
Wassalam,
Kid.
2012/11/2 him mah himmah@gmail.com
**
maaf pak kid masalahnya bukan disitu, tadi saya salah ngetik
seharusnya pesan = MsgBox(Apakah data sebelumnya akan dihapus
Sheets(MASA).Range(C xy)=vbnullstring
endif
Next xy
Wassalam,
Kid.
2012/10/30 him mah himmah@gmail.com
**
saya coba buat rumus seperti ini
Dim hasil As String
Dim ms As Long
dim xy as Long
For xy = 2 To 13
ms = Sheets(MASA).Range(a xy)
hasil = Application.Index(Sheets
)= _
worksheetfunction.Index(Sheets(BPS).Range(A3:J20),worksheetfunction.Match(ms,
Sheets(BPS).Range(A3:A20), 0), 10)
else
Sheets(MASA).Range(C xy)=vbnullstring
endif
Next xy
Wassalam,
Kid.
2012/10/30 him mah himmah@gmail.com
**
saya coba buat rumus seperti ini
Dim hasil As String
Dim
calculate formula :
range(bla).formula ==formulanya 'pasang formula
range(bla).parent.calculate 'calculate sheet
lakukan copy paste values
range(bla).copy
range(bla).pastespecial xlpastevalues
Wassalam,
Kid.
2012/10/30 him mah himmah@gmail.com
**
terima
saya pakai office 14, kalau ditambahain Application.WorksheetFunction
tapi untuk WorksheetFunction.CountIf tanpa ditambahan Application bisa
untuk
Sheets(MASA).Range(C xy)= _
worksheetfunction.Index(Sheets(BPS).Range(A3:J20),worksheetfunction.Match(ms,Sheets(BPS).Range(A3:A20),
0), 10)
dan
iya makasih pak kid, cuma sayang di office 14 ngga bisa menampilkan
kalender, saya search di milis ini ada langkah yang diberikan pak kid
namun setelah saya coba koq belum berhasil ya
saya coba buat rumus seperti ini
Dim hasil As String
Dim ms As Long
dim xy as Long
For xy = 2 To 13
ms = Sheets(MASA).Range(a xy)
hasil = Application.Index(Sheets(BPS).Range(A3:J20),
Application.Match(ms, Sheets(BPS).Range(A3:A20), False), 10)
If IsError(hasil) Then hasil = Else hasil = hasil
terima kasih pak kid
cuma tambah pertanyaan. bagaimana cara mengambil bilangan pertama dan
kedua dari suatu cell misal di A1. text di A1 tidak teratur tapi yg
pasti terdapat 2 bilangan. contoh: hal 1 dari 14 halaman- maka
diperoleh bil pertama 1 dan bil kedua 14. kira_kira fungs4 VBA
seperti apa
sudah ketemu jawabannya disini
http://www.rondebruin.nl/delete.htm
Pada tanggal 25/10/12, him mah himmah@gmail.com menulis:
maaf mau tanya tentang hapus baris,
kita punya tabel yang terdiri dari 3 kolom (NO,KODE dan KET),
sedangkan barisnya tidak tentu
dikolom NO terdapat baris yang
Inna lillahi wa inna ilaihi raji'un
Allahhummaghfir lahu warhamhu wa'aafihi wa'fu anhu
Pada tanggal 13/09/12, Antoni Ginting ma2ith...@gmail.com menulis:
Selamat pagi semuanya,
Turut berduka cita atas kepergian Mba Siti dan kiranya keluarga yang
ditinggalkan diberi ketabahan oleh Tuhan,
Assalamu'alaikum Wr. Wb.
1. misal kita punya tabel di sheet 1, tabel hanya terdiri dari satu
kolom (kolom A) yang berisi nama-nama file
2. terus kita punya kumpulan file misal ada di folder C:\COBA\EXCEL
3. bisa ngga ya kita melakukan copy file yang ada di folder
C:\COBA\EXCEL, namun file yang
mantap pak, sudah berhasil. terima kasih
Pada tanggal 07/08/12, Kid Mr. mr.nm...@gmail.com menulis:
ubah bagian ini :
filecopy sfolasal \ rngLoop.value, sfoltujuan
menjadi :
filecopy sfolasal \ rngLoop.value, sfoltujuan \ rngLoop.value
Kid.
2012/8/7 him mah himmah@gmail.com
KODE di filter A1 maka file yang muncul adalah A.TXT dan D.txt
sehingga file yang dicopy adalah 2 file tersebut dan akan dicopy ke
folder dengan nama A1 (sesuai dengan kodenya), dan kalau folder
tersebut belum ada maka akan dibuatkan flder terlebih dahulu
Pada tanggal 07/08/12, him mah himmah
ada tambahan pertanyaan lagi, misal untuk row headernya berubah-ubah,
bagaimana memasukan ke fungsinya, kebetulan contohnya jumlah baris
judulnya ada 6
Pada tanggal 05/06/12, him mah himmah@gmail.com menulis:
terima kasih, jawabannya sudah sesuai yang diharapkan, cuma
Application.Volatile
sudah saya coba, tapi masih error dibagian ini (proses copy pastemya)
If cboFile.ListIndex -1 Then
Pada tanggal 10/12/11, him mah himmah@gmail.com menulis:
terima kasih pak Kid, maksud saya juga seperti itu, file DATA.csv ini
terkoneksi dengan link table yang ada di access, dan proses
mantap pak Kid
Pada 3 November 2011 14:11, hasna hasn...@gmail.com menulis:
**
OK terima kasih Mr. Kid.
--
hasna
2011-11-03
--
Kid Mr.
2011-11-03 11:34:16
belajar-excel
º
Re: [belajar-excel] Mendaftar file +
Assalamu'alaikum Wr. Wb.
maaf sebelumnya belum nyari-nyari dulu di posting sebelumnya kebetulan
koneksi internetnya lambat (karena yang pakai banyak)
kita punya deretan angka yang tidak urut (seharusnya angka tersebut urut)
misal di kolom A saya punya angka 1;2;5;6;9;10;11;12;15 (tanda titik
delimiter titik koma dan yang
blank boleh ikut)
=JoinText( Small( IF( CountIF( range_data, Row( Indirect( 1: Max(
range_data ) ) ) ), , Row( Indirect( 1: Max( range_data ) ) ) ) ,*
Row(1:99)* , ; , false )
Dicoba dulu, sapa tahu ada errornya.
Kid.
2011/11/2 him mah himmah@gmail.com
paste kebawah biasa saja seperti copy paste
formula lain.
Ketika menggunakan udf jointext, cukup buat 1 cell saja tapi array formula
bagian yang dibiru diemail lalu harus diubah dari row(1:1) jadi row(1:99)
Kid.
2011/11/2 him mah himmah@gmail.com
**
iya sudah berhasil pak Kid, cuma
Excel Anda).
Syaratnya :
1. Letakkan file di drive C: pada root-nya ( C:\ )
2. Jangan ganti nama file atau ekstensinya
Setelah dibuka dan bisa mengganti seluruh properti koneksi, maka bebas akan
meletakkan file dimana saja dengan nama apa saja.
Wassalam.
Kid.
2011/11/2 him mah himmah
jangan lupa untuk penulisan script xml, hurup besar dan kecil sangat berpengaruh
Pada tanggal 15/10/11, Kid Mr. mr.nm...@gmail.com menulis:
1. ikuti perintah pada aplikasi customui nya
Umumnya :
1. load file xlsm,
2. insert jenis custom ui melalui menu insert
3. tulis script xml di lembar
RightMostChar.GIF]
wa'alaikumussalam wr wb,
~siti markonah.
2011/8/19 him mah himmah@gmail.com
**
Assalamu'alaikum Wr. Wb.
bagaimana rumus kalau kita ingin mencari urutan dari karakter A yang
terakhir dari suatu kalimat
misal kita punya kalimat
- SELAMAT DATANG maka huruf A yang terakhir ada
Assalamu'alaikum Wr. Wb.
bagaimana rumus kalau kita ingin mencari urutan dari karakter A yang
terakhir dari suatu kalimat
misal kita punya kalimat
- SELAMAT DATANG maka huruf A yang terakhir ada diurutan ke 12
- DATANG maka huruf A yang terakhir ada diurutan ke 4
- DIA maka huruf A yang
..)
begitu pesan dari mbak siti kemarin...
2011/7/12 him mah himmah@gmail.com
**
mantap bu, tadi saya coba sudah berhasil
tapi masih ada yang mengganjal, ngga tahu hanya di komputer saya atau ngga
saya coba
ctv calender kemudian saya pilih tanggal hari ini 12-07-2011 format
numbernya
berlaku general pada seluruh
datatype, biasanya yang dibutuhkan adalah nilai aslinya dan bukan hasil
formattingnya. Contohnya seperti data date ini. Ketika data a8 di atas
bertype date, maka hasil dari Range(a8).value berbeda dengan
Range(a8).value2
Regards.
Kid.
2011/7/12 him mah himmah
mantap bu, tadi saya coba sudah berhasil
tapi masih ada yang mengganjal, ngga tahu hanya di komputer saya atau ngga
saya coba
ctv calender kemudian saya pilih tanggal hari ini 12-07-2011 format
numbernya yang [$-421] hasilnya adalah 12 Juli 2011 kemudian saya
gunakan ctv cange case saya pilih
berguna
tapi cara bertanya gaya PanSus DPR atau gaya pak polisi mengintrogasi
si maling ayam
bagi saya kok juga terasa ngeri sekali...
maaf ini hanya pendapat saya ... anggaplah sbg 'penyeimbang' saja...
maaf...
CMIIW
hormat kami,
HerrSoe
2011/7/6 him mah himmah@gmail.com
mantap
maaf ada masalah lagi
dibagian
CustId (Kolom 3)
ketika datanya ada berisi tanda petik () maka hasil sql nya itu ngga muncul
misal AB maka data tersebut tidak muncul
kalau AB maka akan muncul
kira-kira solusinya seperti apa untuk menghilangkan tanda petik ()
Pada tanggal 04/07/11, him mah
Terimakasih atas koreksinya.
Wassalam.
Kid.
2011/7/5 him mah himmah@gmail.com
**
sudah ketemu pak, salahnya ternyata ada disini
+Mid(krAmo,14,3) harusnya +Mid(krAmo,13,3)
Pada tanggal 04/07/11, him mah himmah@gmail.com menulis:
maaf ternyata ada yang masih kurang pak
sqlnya sama)
Pada tanggal 03/07/11, him mah himmah@gmail.com menulis:
punya saya koq masih tetep, yang di cek itu type yang sebelah mana pak
Pada tanggal 03/07/11, Mr. Kid mr.nm...@gmail.com menulis:
cek ulang typo pak him mah
Ini contoh hasilnya (nilai amount mungkin udah beda, tetapi
, delimiternya apa, dijabarkan
di schema.ini
Makasih sudah mengingatkan.
Kid.
2011/7/4 him mah himmah@gmail.com
**
pak saya ngga tahu mungkin masalahnya ada disini, setelah saya banding
kan conectionnya (edit query)
kalau punya pak kid (Extended Properties=Text;)
kalau punya saya
.
Intinya, yang tampak di excel adalah object nomor 2
Urutannya murni hasil pengaturan user
jika kali pertama dibuat, object table isinya kolom no,nip,nama
maka ketika ditambah kolom alamat, alamat akan ada di kanan sendiri karena
belum pernah terdefinisi sebelumnya.
Kid.
2011/7/4 him mah himmah
baik lagi jika file txt ada di satu komputer yang tetap dan nama
foldernya tetap
Kid.
2011/7/4 him mah himmah@gmail.com
**
jadi kesimpulannya ngga bisa diubah lagi walau di sqlnya sudah berubah.
oh iya ada lagi pak,
untuk connection datasource nya ngga bisa dibuat dinamis (mungkin
Pada tanggal 04/07/11, Mr. Kid mr.nm...@gmail.com menulis:
IMO,
Tidak ada bedanya
Kid.
2011/7/4 him mah himmah@gmail.com
**
satu lagi pak
kira bedanya antara (apakah berpengaruh pada kecepatan)
WHERE NOT(INVDATE IS NULL)
dengan
WHERE (INVDATE IS NOT NULL)
Pada tanggal 04/07/11
' ) +
Left(AMOUNT,Instr(AMOUNT+'.','.')-1) AS krAmo
,Mid(AMOUNT,Instr(AMOUNT+'.','.')+1,9)+'0' AS knAmo
,CDate(Right(DUEDATE,4)+'-'+Mid(DUEDATE,3,2)+'-'+Left(DUEDATE,2)) AS DUE_DATE
FROM bln06#txt
WHERE NOT(INVDATE IS NULL)
) AS dt1
Pada tanggal 04/07/11, him mah himmah@gmail.com menulis
yang open exclusive tidak
bisa dipakai oleh banyak user.
Kid.
2011/7/1 him mah himmah@gmail.com
**
untuk SQL nya kalau pakai LEFT JOIN koq ngga bisa ya
muncul pesan
it is already opened exclusivele by another user,...
1-000.000 ABC JABAR
2-000.000
/library/ms709353%28v=VS.85%29.aspxbagian
*Specifying Data Type Formats and Conversions*
Kid.
2011/6/27 him mah himmah@gmail.com
**
maaf belum saya coba karena internetnya lambat banget filenya belum
bisa di download, untuk tanggal dan angka apa dipengaruhi sama setting
regional ngga
sebagai pemisah desimal, sedangkan data
text file seluruhnya menggunakan titik sebagai poemisah desimal, maka
tambahkan :
DecimalSymbol=.
untuk definisi pemisah desimal data text file, di setiap blok text file
dalam schema.ini
Kid.
2011/6/27 him mah himmah@gmail.com
**
iya pak
* FROM bln07#txt WHERE not(recno is null)
Syaratnya : susunan kolom antar query yang di-union adalah sama, dengan
datatype yang sama, dan memiliki makna data yang sama.
Selamat mencoba.
Mr. Kid.
2011/6/27 him mah himmah@gmail.com
**
pak Kid, ini contoh filenya
file datanya ada 2
yang terkait dengan pivot tersebut, properties
disana ada definisi.
Ubah CommandType dari Table menjadi SQL
Ubah isi CommandText atau Query dengan query union all seperti yang
dijelaskan di atas.
Kid.
2011/6/24 him mah himmah@gmail.com
**
iya terima kasih pak, bisa di jelaskan
juga boleh. Jangan lupa peraturan milis, yaitu =250KB kecuali
sudah diusahakan tidak bisa mencapainya. Tiap file cukup 5 atau 7 record
saja.
Wassalam.
Kid.
2011/6/24 him mah himmah@gmail.com
**
iya sudah bisa pak, cuma bagaimana memisahkan kolom-kolomnya,
seharusnya jadi 8 ternyata
Assalamu'alaikum Wr. Wb.
mau tanya penggunakan microsoft query untuk mengambil data
kalau ambil datanya dari file excel sudah bisa, terus bagaimana kalau
sumber datanya dari file txt
kalau untuk file excel
tinggal pilih DATAfrom other sourcesfrom microsoft query
kalau datanya excel kita bisa
1 - 100 dari 111 matches
Mail list logo