nom

Is there a way to make this save the copy as read only? path = "\\hinas1\MFG\LED\SSL Paperwork\U502\U502FogLBFirstArticle" nom = Left(ActiveWorkbook.Name, (InStrRev(ActiveWorkbook.Name, ".", -1, vbTextCompare) - 1)) & " " & Year(Date) & "-" & Format(Month(Date), "00") & "-" &...

Is there a way to have the path = a cell in the workbook something like =range("setup-lamp types!I1") the above doesn't work, so is there another way? Sub Save1() Dim nom As String Dim path As String path = "\\hinas1\mfg\S8WData\Christine Myhaver" nom = ThisWorkbook.Name

hello all, how i can do it? <tbody> 1 same nom same nom 1° 2 same nom same nom 2° 3 same nom same nom 3° 4 same nom same nom 4° 5 same nom same nom 5° 6 same nom same nom 6° 7 other name other name 1° 8 other name other name 2° 9 other name other name 3° </tbody>

Is there a way to add to the following code that when the copy is saved it saves as read only? Sub Button28_Click() Dim nom As String Dim path As String If Range("K45") <> 33 Then MsgBox ("Review Your Entries, Something Was Missed"), ActiveSheet.Protect, exitsub Else path =...

i have the following code that saves a copy of a file to a location. Is it possible to make it save the copy as a read only? Sub Button28_Click() ActiveSheet.Unprotect "987654" Dim nom As String Dim path As String If Range("K45") <> 34 Then MsgBox ("Review Your Entries, Something Was Missed")...