Mungkin bisa diganti procedure nya menjadi:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 4 Or Target.Column = 7 Then
Columns("D").ColumnWidth = 22
Columns("G").ColumnWidth = 22
Else
Columns("D").ColumnWidth = 5.14
Columns("
Ass Wr Wb..
Pak Sofyan terima kasih atas inputnya.. mohon maaf sekarang aku coba ingin
merubah format lebar kolomnya diperbesar dari 5.14 ke 22 dengan coding ini
tetapi debug terus..
mohon bantuan gimaa formatnya yang sebenarnya yah pak..
Terima kasih banyak atas bantuannnya.. Wassalam
Ok deh pak Modi, atas tegurannya, Thanks, makasih juga atas bantuannya
salam,
herman
- Original Message -
From: Sofyan Efendi
To: belajar-excel@yahoogroups.com
Sent: Wednesday, October 31, 2007 10:40 AM
Subject: Re: [belajar-excel] Lihat lampiran
Silahkan check attch file.
Mas Bambang, macro nya di simpan dalam file Personal.XLS ya, saya jadi nggak
bisa lihat macronya...
Bisa dicopy tidak ke module pada filenya secara langsung?
- Original Message -
From: Purnomo, Bambang
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 4:59 PM
itu sdah ada contoh hasilnya,
jadi dari file data..datanya di copy ke file master yang sheet a,b,c
berdasarkan apps,aa,limit
kan yang di sheet a,b,c...ada hari..itu yang masgud saya mao di copy pindah
kolom tiap saya copy, pasal data yang di copy tiap hari berubah
-Original Message--
Mas purnomo..
mohon maaf.. saya masih kurang menangkap maksudnya... atau mungkin bisa di
bikin simple data aja ga... data mentah file ini mau dicopykan kemana (sheet
mana?) atau mungkin bisa diberikan gambaran nanti hasinya akan seperti ini..
thanks!
___
Hanya saja gambar ini menjadi diconvert kedalam gambar bawaan office, jadi
tidak original lagi, dan terkadang dipisah menjadi beberapa object satuan.
Mungkin Mas Yayan bisa save as file tersebut dalam format file yang dikenali
Excel, sehingga tidak perlu embed, dan bisa langsung insert picture.
Saya coba beri contoh sbb, silahkan dipelajari:
Sub TEST()
Dim inthari As Integer, kolom As String
inthari = Day(Date)
kolom = Choose(inthari, "A", "B", "C", "D", "E", "F", "G", "H", "I", "J",
"K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z",
"AA", "AB",
Mas ini aku kasih contoh beberapa coding yang harus di copy paste ke dalam
module mu.
tinggal dipelajari syntaknya dan disesuaikan dengan kebutuhan.. sebenarnya
dari awal saya dah bilang minta attachmennya ... kalo isi filenya sangat
crutial.. tinggal di hapus saja dan sisakan yang mau ditanya
kalau mau posisi berdiri, klik kanan aja di objeknya terus pilih group >
ungroup.
gitu maksudnya?
maaf kalau salah...
- Original Message -
From: Yayan
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 4:07 PM
Subject: Re: [belajar-excel] gambar terbalik
kalau mau posisi berdiri, klik kanan aja di objeknya terus pilih ungroup.
gitu maksudnya?
maaf kalau salah...
- Original Message -
From: Yayan
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 4:07 PM
Subject: Re: [belajar-excel] gambar terbalik
Dear Mas
Dear Mas Sofyan...
Gambar tesebut saya ambil dari auto CAD
File attachment saya sertakan.
Rotor '08.xls
Description: MS-Excel spreadsheet
Begini ceritanya,
saya punya file 1 (master) file yang harus diisi tiap hari, contoh hari pertama
di kolom A, kemudian hari berikutnya dikolom B dan seterusnya sampe akhir bulan
Nah saya ada 1 (file data) file lagi buat mempermudah saya mengcopy data mentah
ke file pertama (master),
sya dah coba
Mas Bambang, untuk pindah ke kolom atau sell lain rumusnya adalah (contoh):
Range("C1").Select
Sedangkan project VBA, secara default tidak diproteksi, jadi Mas Bambang tidak
perlu untuk menghilangkan proteksinya. Coba deh Mas Bambang beri informasi yang
sejelas-jelasnya terhadap keinginannya, sup
Mas Yayan,
Gambar tersebut clip art bawaan office, atau file external? Format filenya apa
ya? JPG/JPEG, PNG, BMP atau GIF? Saya sudah coba disini, dari Excel 2003, lalu
mengirimkan ke teman saya yang Excel 2007, gambarnya tidak terbalik. Bisa
dijelaskan lebih rinci lagi mas? Atau mungkin perlu
hauahahahahahahaha, tul banget mas sofyan, thanks banget ya..begitu juga ma
pak sukarno
salam
herman
- Original Message -
From: Sofyan Efendi
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 3:31 PM
Subject: Re: [belajar-excel] Penjumlahan dari bebera
Luar biasa contoh filenya ... bagus sekali...makasih banyak mas Slamet...
- Original Message -
From: slamet harto
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 2:56 PM
Subject: [belajar-excel] World Cup 2006
Ass Wr Wb..
Mohon maaf.. seingatku dulu a
Mungkin maksud mas Herman, kalau ditambahkan NIK/NIP, jadi nambah kerjaan
banyak, bayangin, kan harus ngisi 9300 kali selama satu bulan plus 300 kali
buat hasil perhitungannya. Kalau menggunakan Microsoft Access, hal seperti ini
bisa diatasi menggunakan query. Namun dalam Excel, tidak ada cara
Macro bisa dibuka dengan menekan ALT+F11.
- Original Message -
From: Purnomo, Bambang
To: belajar-excel@yahoogroups.com
Sent: Tuesday, October 30, 2007 3:03 PM
Subject: RE: [belajar-excel] TANYA MACRO PINDAH
kalo saya sertai file saya..emang bisa dibuka macronya..setahu s
Caranya..??sya tahu macro baru sekedar tahu aja..sya juga buatnya dari record
macro..
thanks
-Original Message-
From: belajar-excel@yahoogroups.com [mailto:[EMAIL PROTECTED] Behalf Of slamet
harto
Sent: Tuesday, October 30, 2007 3:07 PM
To: belajar-excel@yahoogroups.com
Subject: RE: [b
Ya.. jangan diproteksi dong mas...
Dari pertanyaan Mas Bambang yang saya tangkap bisa memanfaatkan even workbuk
change atay run prosedur..
thanks
"Purnomo, Bambang " <[EMAIL PROTECTED]> wrote:
kalo saya sertai file saya..emang bisa dibuka macronya..setahu saya
ga bisa..
kalo saya sertai file saya..emang bisa dibuka macronya..setahu saya ga bisa..?
-Original Message-
From: belajar-excel@yahoogroups.com [mailto:[EMAIL PROTECTED] Behalf Of slamet
harto
Sent: Tuesday, October 30, 2007 2:36 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] TAN
22 matches
Mail list logo