Thema Datum  Von Nutzer Rating
Antwort
Rot nur Werte übertragen
03.05.2021 11:32:04 Susanne
NotSolved
03.05.2021 12:00:48 Gast90909
NotSolved
03.05.2021 12:33:25 volti
NotSolved
03.05.2021 13:15:48 Susanne
NotSolved
03.05.2021 13:31:17 volti
NotSolved
03.05.2021 14:04:43 Susanne
NotSolved
03.05.2021 14:47:50 volti
NotSolved
03.05.2021 15:07:53 Susanne
Solved
03.05.2021 15:09:55 Susanne
NotSolved

Ansicht des Beitrags:
Von:
Susanne
Datum:
03.05.2021 11:32:04
Views:
66
Rating: Antwort:
  Ja
Thema:
nur Werte übertragen

Guten Tag zusammen,

 

Bei meinem Skript werden die Formelwerte gleich mit übertragen, dies möchte ich aber nicht.

Welchen Bereich muss ich umschreiben um nur Werte (ohne Formeln) zu übertragen?

 

 Worksheets("Datenbank ").Range("A18:AM18").Copy
    Worksheets("Ziel").Activate
    Range("A3").PasteSpecial Paste:=xlPasteValuesAndNumberFormats, _
    Operation:=xlNone, SkipBlanks:=False, Transpose:=False

    Worksheets("Ziel").Range("A4").Activate
  
 Sheets(Tabelle1).Activate
 Range("A4").Select
 iAnz = 0
 i = 0

 Do Until i = ActiveSheet.UsedRange.Rows.Count
  If ActiveCell.Value = "x" Then
     Selection.EntireRow.Copy
     Sheets(Tabelle3).Activate
     ActiveSheet.Paste
    
     ActiveCell.Offset(1, 0).Select
     Sheets(Tabelle1).Select
     ActiveCell.Offset(1, 0).Select
     iAnz = iAnz + 1
     Else
     ActiveCell.Offset(1, 0).Select
   End If
   i = i + 1
 Loop

  MsgBox "Es wurde " & iAnz & " Satz übertragen"
 
 Application.CutCopyMode = False
 Application.ScreenUpdating = True

 


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 nur Werte übertragen
03.05.2021 11:32:04 Susanne
NotSolved
03.05.2021 12:00:48 Gast90909
NotSolved
03.05.2021 12:33:25 volti
NotSolved
03.05.2021 13:15:48 Susanne
NotSolved
03.05.2021 13:31:17 volti
NotSolved
03.05.2021 14:04:43 Susanne
NotSolved
03.05.2021 14:47:50 volti
NotSolved
03.05.2021 15:07:53 Susanne
Solved
03.05.2021 15:09:55 Susanne
NotSolved