Thema Datum  Von Nutzer Rating
Antwort
05.03.2018 17:32:50 Anna
NotSolved
06.03.2018 10:07:26 fransi
NotSolved
06.03.2018 15:27:35 Anna
NotSolved
Blau VBA - Aktive Arbeitsmappe in Windows verschieben
06.03.2018 19:02:23 fransi
NotSolved

Ansicht des Beitrags:
Von:
fransi
Datum:
06.03.2018 19:02:23
Views:
516
Rating: Antwort:
  Ja
Thema:
VBA - Aktive Arbeitsmappe in Windows verschieben

Zitat : Eventuelle Überraschungen aus dem VBA-Projekt der Lfs-

Was zu befürchten war.

Ohne eine gesonderte Makro-Datei kannst du keine Aktive Excel mit ihrem eigenen Makro verwalten / löschen.

In jeder Lfs- Datei für sich kann jedoch eingebaut sein:

Sub Makro1()
'
Const C_ZIEL As String = "E:\Ziel"
Dim myFull As String, SaveFull As String
'
   myFull = ActiveWorkbook.FullName
'
    SaveFull = Replace(myFull, ThisWorkbook.Path, C_ZIEL)
    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs Filename:=SaveFull, FileFormat:= _
        xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    On Error Resume Next
    Kill myFull
    On Error GoTo 0
    Application.DisplayAlerts = False
    
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
05.03.2018 17:32:50 Anna
NotSolved
06.03.2018 10:07:26 fransi
NotSolved
06.03.2018 15:27:35 Anna
NotSolved
Blau VBA - Aktive Arbeitsmappe in Windows verschieben
06.03.2018 19:02:23 fransi
NotSolved