[belajar-excel] save file dengna ekstention yang tertentu yang dinamis

classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|  
Report Content as Inappropriate

[belajar-excel] save file dengna ekstention yang tertentu yang dinamis

Milis Belajar Excel mailing list
Para master excel,
Saya membuat program dengan perintah simpan file dengan ekstention tertetu. dalam case ini, ekstention yang akan di gunakan saat menyimpan file adalah dinamis, tergantung data yang ada.untuk script penyimpanan nya saya gunakan kode berikut:fname = Application.GetSaveAsFilename("M" & Format(i, "00") & Format(Day(.Range("e1").Text), "00") & Format(Month(.Range("e1").Text), "00") & .Range("b3").Text, "M FIle (*.* ), *.*")
dalam code di atas saya masih bingung mengisi kode *.* untuk ekstention. jika saya isi *.362 maka ekstention nya pasti tidak dapat di rubah kecuali ubah script nya. 


Terimakasih sebelum nya,
salam,
jajang
Reply | Threaded
Open this post in threaded view
|  
Report Content as Inappropriate

Re: [belajar-excel] save file dengna ekstention yang tertentu yang dinamis

Milis Belajar Excel mailing list
fname = Application.GetSaveAsFilename("M" & Format(i, "00") &
Format(Day(Range("e1").Text), "00") & Format(Month(Range("e1").Text),
"00") & Range("b3").Text, "Excel Files (*.xlsx)," & "*.xlsx, Macro
Enabled" & "Workbook (*.xlsm), *xlsm")

untuk pilihan xlsx dan xlsm, untuk pilihan lainnya dicoba sendiri.



On 5/20/17 3:04 PM, jajang muhammad siddik [hidden email]
[belajar-excel] wrote:

> Para master excel,
>
> Saya membuat program dengan perintah simpan file dengan ekstention
> tertetu. dalam case ini, ekstention yang akan di gunakan saat
> menyimpan file adalah dinamis, tergantung data yang ada.
> untuk script penyimpanan nya saya gunakan kode berikut:
> fname = Application.GetSaveAsFilename("M" & Format(i, "00") &
> Format(Day(.Range("e1").Text), "00") &
> Format(Month(.Range("e1").Text), "00") & .Range("b3").Text, "M FIle
> (*.* ), *.*")
> dalam code di atas saya masih bingung mengisi kode *.* untuk
> ekstention. jika saya isi *.362 maka ekstention nya pasti tidak dapat
> di rubah kecuali ubah script nya.
>
> Terimakasih sebelum nya,
>
> salam,
>
> jajang
>

Loading...