Thema Datum  Von Nutzer Rating
Antwort
Rot Markierte Zellen und Spaltenüberschrit in neue Datei übertragen
26.05.2024 11:06:02 Horst
NotSolved
26.05.2024 14:27:48 ralf_b
NotSolved
26.05.2024 21:31:28 Horst
NotSolved
26.05.2024 22:19:26 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Horst
Datum:
26.05.2024 11:06:02
Views:
719
Rating: Antwort:
  Ja
Thema:
Markierte Zellen und Spaltenüberschrit in neue Datei übertragen

Hallo

Ich möchte markierte Zellen (von Auftrag zu Auftrag unterschiedlich) und die Spaltenüberschriften (A8:V10) in ene neue Datei übertragen.

Sub CopyAndSave()
'Dim strPfad As String
'Dim strFileName As String
Dim wkb, wkbNew As Workbook
Zielpath = "C:\Temp"
Set wkb = ThisWorkbook
With Selection.Copy
End With
Set wkbNew = Application.Workbooks.Add
wkbNew.Sheets(1).Paste Destination:=wkbNew.Sheets(1).Range("$A$3")
With ActiveSheet.UsedRange.Cells
.Value = .Value
End With
Application.CutCopyMode = False

Zur Zeit kopier ich die markierten Zellen wie folgt in eine neue Datei, das Blatt in der Ausgangsdatei hat immer einen anderen Namen, (Datumsbasiert)

Wie muss ich die Copy und Past code anpassen damit die Spalten überschriten auch mit kopiert werden.

 

Danke Horst


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 Markierte Zellen und Spaltenüberschrit in neue Datei übertragen
26.05.2024 11:06:02 Horst
NotSolved
26.05.2024 14:27:48 ralf_b
NotSolved
26.05.2024 21:31:28 Horst
NotSolved
26.05.2024 22:19:26 ralf_b
NotSolved