Thema Datum  Von Nutzer Rating
Antwort
Rot Speicherort (Pfad) nicht korrekt
23.01.2023 11:28:05 Flo
NotSolved
23.01.2023 13:04:33 Flo
Solved

Ansicht des Beitrags:
Von:
Flo
Datum:
23.01.2023 11:28:05
Views:
360
Rating: Antwort:
  Ja
Thema:
Speicherort (Pfad) nicht korrekt

Hallo liebe VBA-Freunde!

Ich möchte via meinen Ribbon die Prozedur starten, dass das aktive Tabellenblatt in eine neue Mappe kopiert wird und aber gespeichert wird wo die Herkunft des Tabellenblattes ist. 

Mein Problem ist, dass das aktive Blatt dort gespeichert wird, wo die .xlam (Ribbon Add-in) gespeichert ist.

Der Code lautet:

Sub BlattKopierenNeueMappe(control As IRibbonControl)


Dim X As String
       X = ActiveSheet.Name
    

Application.ScreenUpdating = False

ActiveSheet.Copy


With ActiveWorkbook
    
    .SaveAs ThisWorkbook.Path & "\" & Left(ThisWorkbook.Name, (InStrRev(ThisWorkbook.Name, ".") - 1)) & " - " & X & ".xlsx"

End With

Application.ScreenUpdating = True

End Sub

 

 

Danke für eure Hilfe!


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
Rot Speicherort (Pfad) nicht korrekt
23.01.2023 11:28:05 Flo
NotSolved
23.01.2023 13:04:33 Flo
Solved