< návrat zpět
MS Excel
Téma: VBA porovnanie hesiel pri otv. súbora
Zaslal/a Cedrom 10.3.2016 22:04
Zdravím,
Chcel by som poprosiť o radu...
Počas otvárania súbora potrebujem porovnať heslo práve otváraného súbora (na zápis) s premenou uloženou cez VBA. Ak bude OK a dátum od 25. po 30. v mesiaci súbor zamknem pod iným heslom. Z druhou časťou nemám problém, len ako na tú prvú časť? Ďakujem!
Cedrom(12.3.2016 20:13)#030748 Skúšam to porovnávať touto cestou, ale nedarí sa:
Sub OPEN_SUBOR()
Dim nazS As Workbook,cestaS As String,souborS As String, Kods as String
KodS = "abcd" 'toto na konci vymaže
cestaS = ActiveWorkbook.Path
souborS = ActiveWorkbook.Name
On Error GoTo Error_Handler
Set nazS = Workbooks.Open(Filename:=cestaS & "\" & souborS, Password:="", writeresPassword:=KodS)
Error_Handler:
"Tu niečo vykona"
Err.Clear
Set nazS = Nothing
End Sub
Help ako ďalej (stačí aj nápad), dopredu
vďaka!citovat