Sudah ok Pak Kid.
Sekarang saya mau tambah auto numbering di kolom A, sheet 19, bermula dari
baris excel yg ke 4 .Apakah kode ini sesuai dengan kasus ini?
Saya juga mau buat auto bordering.
With .Formula = "=row()-3"
Sheet19.Calculate
.Value = .Resize(, 1).Value
Terima kasih banyak Mr. Bagus atas solusinya.
Insya Alloh sangat bermanfaat.
- prodev simple -
Dari: Bagus
Kepada: belajar-excel@yahoogroups.com
Dikirim: Jumat, 2 November 2012 10:55
Judul: Re: [belajar-excel] Kombinasi Tanggal & Conditional Formatting (CF)
Assalamu'alaikum Wr. Wb.
Mohon maaf ... kite nongol lagi nih.
Terima kasih banyak atas solusi permasalahan sebelumnya.
Hari ini aye mau nanya lagi nih ... masih seputar penggunaan 'Tanggal' (masih
seneng utak-atik menu ini)
Pertanyaannye :
Bagaimana rumus untuk menggunakan CF untuk tanggal pada
dear para master ada yg ingin sy tanyakan lagi
mas pada file yg saya lampirkan bagaimana cara mengubah tabel pada
sheets 1 menjadi tabel seperti pada sheets 2, kalau harus di rubah satu2
datanya ribuan, mohon pencerahannya, apakah mengunakan formula, macro
atau vba, trimakasih
master.xls
Descr
Kalau TextBox masih bisa di-set focus. Label control yang gak bisa.
2012/11/2 him mah
> **
>
>
> iya makasih pak Kid, kemarin saya coba seperti itu ngga bisa. mungkin
> benar tidak semua control mau setFocus
>
>
> Pada tanggal 02/11/12, Mr. Kid menulis:
> > oh jadi sudah diset vbyesnocancel dan
iya makasih pak Kid, kemarin saya coba seperti itu ngga bisa. mungkin
benar tidak semua control mau setFocus
Pada tanggal 02/11/12, Mr. Kid menulis:
> oh jadi sudah diset vbyesnocancel dan sudah bukan di module si form.
> kalau gitu set fokus nya panggil si mbahnya dulu...
>
> misal nama form ad
oh jadi sudah diset vbyesnocancel dan sudah bukan di module si form.
kalau gitu set fokus nya 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
> **
>
>
> maaf pak kid masalahnya
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 menulis:
> Coba ganti :
> pesan = MsgBox("Apakah data se
Kok di komputer saya semuanya berjalan dengan baik ya.
Wassalam,
Kid.
2012/11/2 Emi
> **
>
>
> Makasih Pak Kid,
>
> Tapi masih error di baris akhir
>
> rngDB.PasteSpecial xlPasteValues
>
> Mohon pencerahan supaya dapat dipelajari lagi, filenya dilampirkan.
>
> Wassalam.
>
> Emi Lestari
>
>
>
Coba ganti :
pesan = MsgBox("Apakah data sebelumnya akan dihapus", vbYesNo, "cek")
menjadi :
pesan = MsgBox("Apakah data sebelumnya akan dihapus", vbYesNoCancel, "cek")
Wassalam,
Kid.
2012/11/2 him mah
> **
>
>
> misal begini
> di userform
>
> Private Sub cmdHapus_Click()
> HapusData
> End Sub
misal begini
di userform
Private Sub cmdHapus_Click()
HapusData
End Sub
terus di module ada prosedur seperti ini
Sub HapusData()
sheets("aku").select
pesan = MsgBox("Apakah data sebelumnya akan dihapus", vbYesNo, "cek")
If pesan = vbYes Then
ProsesA
misal begini
di userform
Private Sub cmdHapus_Click()
HapusData
End Sub
terus di module ada prosedur seperti ini
Sub HapusData()
sheets("aku").select
pesan = MsgBox("Apakah data sebelumnya akan dihapus",
vbYesNoCancel, "cek")
If pesan = vbYes Then
ProsesA
misal begini
di userform
Private Sub cmdHapus_Click()
HapusData
End Sub
terus di module ada prosedur seperti ini
Sub HapusData()
sheets("aku").select
pesan = MsgBox("Apakah data sebelumnya akan dihapus", vbYesNo, "cek")
If pesan = vbYes Then
ProsesA
trimakasih mas, berhasil jalan di form sy,
ada yg ingin sy tanyakan lagi mas pada file yg saya lampirkan bagaimana cara
mengubah tabel pada sheets 1 menjadi tabel seperti pada sheets 2, kalau harus
di rubah satu2 datanya ribuan, mohon pencerahannya, apakah mengunakan formula,
macro atau vba, t
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
> **
>
>
> maaf kalau tidak merepotkan. vba nya di paste disini. karena belum
> bis
maaf kalau tidak merepotkan. vba nya di paste disini. karena belum
bisa buka lampirannya. terima kasih
Fitur data validation dengan opsi Custom dan diisi formula CountIF bisa
digunakan untuk membatasi entry data agar terjaga unique.
Batasannya : berlaku untuk proses entry data. Proses copas value tidak
dapat ditangkap melalui cara ini.
Cara dengan VBA (Macro) melalui event change dari worksheet bis
Kalau mau coba, ganti semua isinya dengan :
Dim rngDB As Range 'range di db
Dim lRecIn As Long 'jumlah record input (yang akan di simpan
ke db)
'jumlah cell (jumlah cacah) berisi data bertipe numerik yang ada di
kolom D sheet13 (bernama Table)
lRecIn =
Application
para master excel,gimana cara setting diexcel agar tidak ada tulisan yg
dobel(begitu kita ketik lgsung muncul peringatan sudah pernah/sudah ada)
thx
Ini contoh simplenya, semoga seperti yang diharapkan.
Wassalam,
Lapendosol
From: him mah
To: belajar-excel
Sent: Thursday, November 1, 2012 4:03 PM
Subject: [belajar-excel] set Focus dari modul ke userform control
misal kita sedang menjalankan suatu use
misal kita sedang menjalankan suatu userform ("formData") kemudian
dari form itu ketika kita meng klik button, maka akan menjalankan
produsedur yang ada di module dimana userform tersebut ngga di close.
terus misal dari prosuder yang ada dimodul terebut kita kembali ke
form dengan setfocus salah sa
Dear Master Excel,
Mohon bantunnya , adakah cara menyatukan data dari sheet yang berbeda.
Data contoh terlampir.
Thanks,
Yudi
menyatukan data dari sheet berbeda.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
"PERATURAN MILIS belajar-excel"
---
Milis belajar-excel dibuat agar menjadi komunitas / tempat berkumpulnya
para pemakai software microsoft excel, untuk saling berbagi pengetahuan
(sharing), diskusi dan tanya-jawab hal-hal yg menyangkut MS Excel.
Setting untuk postin
23 matches
Mail list logo
