Thema Datum  Von Nutzer Rating
Antwort
Rot Selection.Paste
 15.11.2019 10:49:44 Thomas
NotSolved
15.11.2019 11:22:02 Mase
NotSolved

Ansicht des Beitrags:
Von:
Thomas		 Datum:
15.11.2019 10:49:44		 Views:
863		 Rating:
     
Antwort:
  Ja
Thema:
Selection.Paste
Hallo, ich habe ein Problem mit dem u.a. VBA. Ich kopiere eine Grundtabelle in eine vorläufige Datei namens GT2. Diese Daten werden aus GT2 danach wieder gelöscht. Ich benötige von allen Felder nur den Wert, deshalb die erste Selection.copy. Von der Spalte F allerdings benötige ich auch den Wert und das Format. Hier habe ich eine Hyperlink, der mitkopiert werden soll. Allerdings bricht das VBA beim Selction.Paste ab. Das habe ich in REM gesetzt, da ich die Tabelle trotzdem durchlaufen lassen muss, wenn auch der Hyperlink nicht mitkopiert wird. Wenn mir hier jemand helfen könnte. Vielen Dank im Voraus Thomas Worksheets("Grundtabelle").Select letzteZeileGT = Worksheets("Grundtabelle").Range("A1").Value Worksheets("Grundtabelle").Rows("3:" & letzteZeileGT).Select Selection.Copy Worksheets("Grundtabelle").Range("A1").Select Sheets("GT2").Select Sheets("GT2").Rows("3:3").Select Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=False Sheets("GT2").Range("A3:K" & letzteZeileGT).Select Selection.Sort Key1:=Sheets("GT2").Range("A3"), Order1:=xlAscending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom Rem Worksheets("Grundtabelle").Select Rem Worksheets("Grundtabelle").Columns("F:F").Select Rem Selection.Copy Rem Sheets("GT2").Select Rem Worksheets("GT2").Columns("F:F").Select Rem Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks _ Rem :=False, Transpose:=False Worksheets("GT2").Range("A1").Select

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 Selection.Paste
 15.11.2019 10:49:44 Thomas
NotSolved
15.11.2019 11:22:02 Mase
NotSolved