Makro läuft nicht durch komisch ...
30.09.2018 11:20:40
walter
ich habe ein Makro zum Speichern.
Auf meinem Laptop bleibt das Makro hier stehen:
If WBName = "" Then Exit Sub
ActiveSheet.Unprotect (getStrPasswort)
Worksheets(TBName).Copy
>>> hier bleibt stehen !!!!!!!!!!!!!!!!!!!!!
'--- so jetzt noch ins Verzeichnis speichern -------------
Dim Fs As Object, OrdNam As Variant, Ord As Byte, Pfad As String
Dim DateiNam As String
Dim aDatei As String
Dim strPath$
DateiNam = WBName & " " & "Rg.-Nr. " & ActiveSheet.Range("I23") & " - " & ActiveSheet.Range("J23") & " " _
& ActiveSheet.Range("E23") & ".xls"
beim anderen Rechner läuft das Makro weiter !
Woran kann das liegen ?
Gibt es eine Einstellung in Excel ?
mfg
walter k