Terma kasih Mas Agus, cekrip nya sangat membantu sekali
Wassalam-Yayan-
Pada Kamis, 6 Agustus 2015 8:23, "Nang Agus [email protected]
[belajar-excel]" <[email protected]> menulis:
Walaikum salam warahmatullah,
Coba cekkrip ini:
Option Explicit
Sub simpen()
Dim Jeneng As String
Dim Jenenge As Variant
Jeneng = "LaporanPenjualan"
Jenenge = Application.GetSaveAsFilename(InitialFileName:=ThisWorkbook.Path &
"\" & Jeneng, fileFilter:="Excel Files (*.xlsm), *.xlsm")
If Jenenge <> False Then
ActiveWorkbook.SaveAs Jenenge
End If
End Sub
waqsalamualaikum warahmatullah
2015-08-05 18:19 GMT+07:00 Yayan Ajah [email protected] [belajar-excel]
<[email protected]>:
Assalamu'alaikum Wr. Wb.
Rekan-rekan B-Excel,
Misal file excel saya bernama LaporanPenjualanJuli.xlsm
Saya mohon bantuan untuk membuat macro save as file excel saya, yang saya
inginkan adalah :
- SaveAs dengan memunculkan kotak dialog SaveAs dan otomatis di file name sudah
tertulis "LaporanPenjualan", sehingga saya tinggal menambahkan bulan nya saja.
- Lokasi penyimpanan file yang di save as ini sama dengan file yang sebelumnya
Mohon bantuan dari para rekan-rekan dan para master disini.
Terima kasih
Wassalamu'alaikum Wr. Wb
-Yayan-
#yiv9281520286 #yiv9281520286 -- #yiv9281520286ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9281520286
#yiv9281520286ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9281520286
#yiv9281520286ygrp-mkp #yiv9281520286hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv9281520286 #yiv9281520286ygrp-mkp #yiv9281520286ads
{margin-bottom:10px;}#yiv9281520286 #yiv9281520286ygrp-mkp .yiv9281520286ad
{padding:0 0;}#yiv9281520286 #yiv9281520286ygrp-mkp .yiv9281520286ad p
{margin:0;}#yiv9281520286 #yiv9281520286ygrp-mkp .yiv9281520286ad a
{color:#0000ff;text-decoration:none;}#yiv9281520286 #yiv9281520286ygrp-sponsor
#yiv9281520286ygrp-lc {font-family:Arial;}#yiv9281520286
#yiv9281520286ygrp-sponsor #yiv9281520286ygrp-lc #yiv9281520286hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9281520286
#yiv9281520286ygrp-sponsor #yiv9281520286ygrp-lc .yiv9281520286ad
{margin-bottom:10px;padding:0 0;}#yiv9281520286 #yiv9281520286actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9281520286
#yiv9281520286activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9281520286
#yiv9281520286activity span {font-weight:700;}#yiv9281520286
#yiv9281520286activity span:first-child
{text-transform:uppercase;}#yiv9281520286 #yiv9281520286activity span a
{color:#5085b6;text-decoration:none;}#yiv9281520286 #yiv9281520286activity span
span {color:#ff7900;}#yiv9281520286 #yiv9281520286activity span
.yiv9281520286underline {text-decoration:underline;}#yiv9281520286
.yiv9281520286attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv9281520286 .yiv9281520286attach div a
{text-decoration:none;}#yiv9281520286 .yiv9281520286attach img
{border:none;padding-right:5px;}#yiv9281520286 .yiv9281520286attach label
{display:block;margin-bottom:5px;}#yiv9281520286 .yiv9281520286attach label a
{text-decoration:none;}#yiv9281520286 blockquote {margin:0 0 0
4px;}#yiv9281520286 .yiv9281520286bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv9281520286
.yiv9281520286bold a {text-decoration:none;}#yiv9281520286 dd.yiv9281520286last
p a {font-family:Verdana;font-weight:700;}#yiv9281520286 dd.yiv9281520286last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9281520286
dd.yiv9281520286last p span.yiv9281520286yshortcuts
{margin-right:0;}#yiv9281520286 div.yiv9281520286attach-table div div a
{text-decoration:none;}#yiv9281520286 div.yiv9281520286attach-table
{width:400px;}#yiv9281520286 div.yiv9281520286file-title a, #yiv9281520286
div.yiv9281520286file-title a:active, #yiv9281520286
div.yiv9281520286file-title a:hover, #yiv9281520286 div.yiv9281520286file-title
a:visited {text-decoration:none;}#yiv9281520286 div.yiv9281520286photo-title a,
#yiv9281520286 div.yiv9281520286photo-title a:active, #yiv9281520286
div.yiv9281520286photo-title a:hover, #yiv9281520286
div.yiv9281520286photo-title a:visited {text-decoration:none;}#yiv9281520286
div#yiv9281520286ygrp-mlmsg #yiv9281520286ygrp-msg p a
span.yiv9281520286yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9281520286
.yiv9281520286green {color:#628c2a;}#yiv9281520286 .yiv9281520286MsoNormal
{margin:0 0 0 0;}#yiv9281520286 o {font-size:0;}#yiv9281520286
#yiv9281520286photos div {float:left;width:72px;}#yiv9281520286
#yiv9281520286photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv9281520286
#yiv9281520286photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9281520286
#yiv9281520286reco-category {font-size:77%;}#yiv9281520286
#yiv9281520286reco-desc {font-size:77%;}#yiv9281520286 .yiv9281520286replbq
{margin:4px;}#yiv9281520286 #yiv9281520286ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv9281520286 #yiv9281520286ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9281520286
#yiv9281520286ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9281520286
#yiv9281520286ygrp-mlmsg select, #yiv9281520286 input, #yiv9281520286 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv9281520286
#yiv9281520286ygrp-mlmsg pre, #yiv9281520286 code {font:115%
monospace;}#yiv9281520286 #yiv9281520286ygrp-mlmsg *
{line-height:1.22em;}#yiv9281520286 #yiv9281520286ygrp-mlmsg #yiv9281520286logo
{padding-bottom:10px;}#yiv9281520286 #yiv9281520286ygrp-msg p a
{font-family:Verdana;}#yiv9281520286 #yiv9281520286ygrp-msg
p#yiv9281520286attach-count span {color:#1E66AE;font-weight:700;}#yiv9281520286
#yiv9281520286ygrp-reco #yiv9281520286reco-head
{color:#ff7900;font-weight:700;}#yiv9281520286 #yiv9281520286ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv9281520286 #yiv9281520286ygrp-sponsor
#yiv9281520286ov li a {font-size:130%;text-decoration:none;}#yiv9281520286
#yiv9281520286ygrp-sponsor #yiv9281520286ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv9281520286
#yiv9281520286ygrp-sponsor #yiv9281520286ov ul {margin:0;padding:0 0 0
8px;}#yiv9281520286 #yiv9281520286ygrp-text
{font-family:Georgia;}#yiv9281520286 #yiv9281520286ygrp-text p {margin:0 0 1em
0;}#yiv9281520286 #yiv9281520286ygrp-text tt {font-size:120%;}#yiv9281520286
#yiv9281520286ygrp-vital ul li:last-child {border-right:none
!important;}#yiv9281520286
