Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
![Rot](images/pfeil_rot.gif) Markierte Zellen und Spaltenüberschrit in neue Datei übertragen |
26.05.2024 11:06:02 |
Horst |
|
|
|
26.05.2024 14:27:48 |
ralf_b |
|
|
|
26.05.2024 21:31:28 |
Horst |
|
|
|
26.05.2024 22:19:26 |
ralf_b |
|
|
Von:
Horst |
Datum:
26.05.2024 11:06:02 |
Views:
408 |
Rating:
|
Antwort:
|
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
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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](images/pfeil_rot.gif) Markierte Zellen und Spaltenüberschrit in neue Datei übertragen |
26.05.2024 11:06:02 |
Horst |
|
|
|
26.05.2024 14:27:48 |
ralf_b |
|
|
|
26.05.2024 21:31:28 |
Horst |
|
|
|
26.05.2024 22:19:26 |
ralf_b |
|
|