با سلام خدمت دوستان و اساتید.از یه فایل اکسل خروجی میگیرم و نام فایل ذخیره شده رو خودش انتخاب میکنه میخواستم بدونم میشه با استفاده از وی بی ای نام فایل ذخیره شده همانی باشه که توی تکست باکس نوشتم؟ سپاس فراوان از راهنمائی دوستان
-
[b][color=#6B8E23]تو خشنود باشی و ما رستگار[/color][/b] -
سلام
برای این کار شما میتونید از کد زیر استفاده کنید
کد PHP:
Private Sub CommandButton1_Click()
Dim varResult As Variant
varResult = Application.GetSaveAsFilename(FileFilter:= _
"Excel Files (*.xlsx), *.xlsx, Macro Enabled Workbook" & _
"(*.xlsm), *xlsm", Title:="Some Random Title", _
InitialFileName:=TextBox1.Text)
If varResult <> False Then
Application.ActiveWorkbook.SaveAs filename:=varResult, _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End If
End Sub
[HR][SIZE=5][COLOR="#0000FF"][FONT=Times New Roman][B] در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست [/B][/FONT][/COLOR][/SIZE][/HR]
کامنت