Terimakasih banyak atas bantuannya ya Ibu Guru CTV 




________________________________
Dari: siti Vi <[email protected]>
Kepada: [email protected]
Terkirim: Rab, 7 April, 2010 21:20:24
Judul: Re: [belajar-excel] copy worksheet dengan nama yang diinginkan

  
 
1*** pertanyaan di email 
:
"ingin mengcopy sheet dengan nama 
yang diinginkan menjadi satu buah file xls"
artinya  sheet 
yg akan dicopy harus bernama tertentu (yang diinginkan)
hasil nya dijadikan satu 
workbook yang namanya tidak ditentukan
 
2*** pertanyaan di dalam 
sheets / comments pada cell P13
saat di klik "create", akan menghasilkan 
workbook baru dengan nama :
(isi yang ada di cell4 & CV & isi 
yang ada di cell P9), 
contohnya akan menghasilkan workbook baru 
dengan nama 
"pandu indonesia Shiddieq_CV_ April 7, 
2010.xls"
di sini nama workbook 
ditentukan tetapi tidak disebutkan 
workbook tsb harus BERISI 
APA / sheet apa saja dengan data spt apa ??
 
jadi kita gabungkan saja 2 
keinginan yg tak lengkap itu menjadi :
sheet yg mengandung 
tombol ("Read data") di copy ke workbook baru
nama sheet hasil copyan tidak 
perlu diubah
data yg berupa formula tetap 
dibiarkan sbg formula, walaupun me link
ke workbook 
induk..
workbook baru diberi nama .. bla 
bla bla.....
 
mudah mudahan tebakan tsb 
tidak terlalu nguawurr..
 
Sub 
CreateNewBook( )
   Dim NamaBook As String
   
Sheets("Read_ Data").Copy
'   
ActiveSheet. UsedRange. Copy
   With ActiveSheet
'    .UsedRange.PasteSpe cial 
xlPasteValuesAndNum berFormats ' opsi !!
     
NamaBook = .[C4].Value & "_" & Format(.[P9] .Value, 
"DDMMMYYYY")
     ActiveWorkbook. SaveAs ThisWorkbook. Path 
& "\" & NamaBook & ".xls"
   End With
End 
Sub
 
 

________________________________
 
----- Original Message ----- 
From: ahmad toha 
To: 
belajar-excel@ yahoogroups. com 
Sent: Wednesday, April 07, 2010 5:27 
PM
Subject: [belajar-excel] copy worksheet dengan nama yang 
diinginkan
  
Dear para pakar,
saya butuh bantuan ingin mengcopy 
sheet dengan nama yang diinginkan 
menjadi satu buah file xls, file 
terlampir

Salam,

 

__________________________________________________
Apakah Anda Yahoo!?
Lelah menerima spam?  Surat Yahoo! memiliki perlindungan terbaik terhadap spam  
http://id.mail.yahoo.com 

Kirim email ke