Komischerweise schmiert mein Excel immer ab wenn ich per vba EINE Arbeitsmappe schließe. Den Code hab ich aus einem funktionierenden System kopiert und noch nie vgl Probleme gehabt.
Ohne den close (Notiz) Befehl läuft auch alles supi. schon mehrmals nachgebaut immer der gleiche Mist. Excel beendet sich komplett.
Help! Wer hat eine Idee waran das liegen könnte oder besser noch was zu tun wär.
THX & greets
Hier noch der Kot:
Sub Notiz_Springe_zur_NaMi()
Dim NaMi As String
Dim NamiZ As Long
Set Notiz = ActiveWorkbook ' Alternativ habe ich auch hier eine dynamische aber eindeutige _
Bennenung ausprobiert, hilft auch nix :( Der Code muss in vielen vielen Dateien laufen. Der _
Namen generiert sich aus zelleninhalt. macht aber auch kein unterschied ob activeWB oder _
Workbook(XY)
strName3 = "NaMi_Gesamt.xlsm"
strEinrichtung = "\\XXX\NaMi_Gesamt.xlsm"
NaMi = Cells(6, 1).Value
NamiZ = Cells(6, 1).Value
NaMi2 = "Stb" & Cells(6, 2).Value
If NamiZ > 0 Then
DateiGeoeffnet2 (strEinrichtung)
If Not DateiGeoeffnet2(strEinrichtung) = True Then
Workbooks.Open Filename:=strEinrichtung
Workbooks(strName3).Activate
Notiz.Save
Notiz.Close 'Hier schließt sich Excel komplett, ohne diese Zeile funktioniert der _
Wechsel.
Else
Notiz.Save
Notiz.Close
Workbooks(strName3).Activate
End If
Worksheets(NaMi2).Select
End If
End Sub