ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   .XLT with user programming not working through Intranet. (https://www.excelbanter.com/excel-programming/329691-xlt-user-programming-not-working-through-intranet.html)

Steve Roberts

.XLT with user programming not working through Intranet.
 
I have .XLT file with a sheet that I have placed a button on that saves the
file with a specific name and folder location.
In a stand alone setting on our network drive it works fine.
If I point to it through the our intranet using the same mapped drive, it
does nothing when I click the button.
I assume the problem is because it is opening inside IE but I have very
little experience with web stuff so I have no idea how to troubleshoot this.

Here is the code that gets executed when I click the Save And Exit Button

Private Sub btnSaveAndExit_Click()

Dim DT As Date
Dim strProjectDescription As String
Dim strProjectNumber As String
Dim strProjectFolder As String
Dim strInitials As String
Dim strDate As String

DT = Date

strDate = Format(DT, "dd-mmm-yy")
strProjectDescription = Range("c15")
strProjectNumber = Range("H5")
strProjectFolder = Replace(UCase(strProjectNumber), ".S.", "_")
strInitials = GetInitials()

ActiveWorkbook.Close SaveChanges:=True, Filename:="G:\Projects\" &
strProjectFolder & "\wp\PS" & strProjectFolder & "_" & strDate & "_" &
strInitials & ".xls"

End Sub

Any Ideas?

Thanks

Steve




All times are GMT +1. The time now is 10:22 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com