14.12.2019, 18:28
Hallo Forum Kollegen
ich habe ein sehr intereesantes Phaenomen, das mich total verblüfft. Kann mir das jemand bitte technisch erklaeren???
Beim Bearbeiten eines Thread habe ich das Makro versehentlich in der xlsx Datei entwickelt, dort ein Modul eingefügt. Das geht beim Speichern der Datei verloren, landet laut Admin Günter im Nirwana! Nachdem ich beide Dateien geschlossen hatte und die xlsm Datei öffnete, stellte ich fest das es dort KEIN Modul gab. Verstaendlich!! Hat mich natürlich geaergert, der Code war im Mülleimer!
Ich staunte aber nicht schlecht, das sich beim Button drücken die "Materialübersichtsliste" korrekt öffnete, und Excel DANN meldete, "ich kann kein Makro finden!" Wieso bitte kann eine Datei ohne Makro geöffnet werden. Schaut ihr euch das mal bitte an, und erklaert mir als Unwissendem wie das sein kann?? Det is mir echt zu hoch, wah ....
Der Code war nur soweit wie unten entwickelt worden, um das Datei Öffnen zu prüfen. Die Msgbox wurde NICHT angezeigt' Kann es sein das Excel das VBA Dokument im Hintergrund trotzdem unsichtbar mit speichert??
Herzliche Grüsse und frohe Weihnachten aus Ankara.
mfg Gast 123
ich habe ein sehr intereesantes Phaenomen, das mich total verblüfft. Kann mir das jemand bitte technisch erklaeren???
Beim Bearbeiten eines Thread habe ich das Makro versehentlich in der xlsx Datei entwickelt, dort ein Modul eingefügt. Das geht beim Speichern der Datei verloren, landet laut Admin Günter im Nirwana! Nachdem ich beide Dateien geschlossen hatte und die xlsm Datei öffnete, stellte ich fest das es dort KEIN Modul gab. Verstaendlich!! Hat mich natürlich geaergert, der Code war im Mülleimer!
Ich staunte aber nicht schlecht, das sich beim Button drücken die "Materialübersichtsliste" korrekt öffnete, und Excel DANN meldete, "ich kann kein Makro finden!" Wieso bitte kann eine Datei ohne Makro geöffnet werden. Schaut ihr euch das mal bitte an, und erklaert mir als Unwissendem wie das sein kann?? Det is mir echt zu hoch, wah ....
Der Code war nur soweit wie unten entwickelt worden, um das Datei Öffnen zu prüfen. Die Msgbox wurde NICHT angezeigt' Kann es sein das Excel das VBA Dokument im Hintergrund trotzdem unsichtbar mit speichert??
Herzliche Grüsse und frohe Weihnachten aus Ankara.
mfg Gast 123
Code:
Sub Transportdaten_übertragen()
Dim AC As Range, rFind As Range
Dim Adr1 As String, j As Integer
Dim WbMt As Worksheet, lz1 As Long
On Error Resume Next
'Prüfen ob Materialübersicht offen ist, sonst Öffnen!
Set WbMt = Workbooks(MTL).Worksheets(1)
If Err > 0 Then Workbooks.Open Pfad & MTL & ".xlsx"
If Windows.Caption = MTL Then ThisWorkbook.Activate
On Error GoTo 0
MsgBox "Okay"
End Sub