Thema Datum  Von Nutzer Rating
Antwort
Rot nur Werte einfügen
21.06.2015 11:50:14 joerg
NotSolved
21.06.2015 12:08:15 Gast45781
*****
NotSolved
25.06.2015 05:08:20 joerg
Solved

Ansicht des Beitrags:
Von:
joerg
Datum:
21.06.2015 11:50:14
Views:
1731
Rating: Antwort:
  Ja
Thema:
nur Werte einfügen

Hallo,

ich habe noch ein Problem bei dem ich nicht weiterkomme: Ich möchte bestimmte Zellen kopieren, die Formeln enthalten und auf Sheets("Daten") liegen und dann in Sheets("Salat-Mix") nur die Werte einfügen.

Bitte helft mir, alleine komme ich nicht weiter...

ez=letzte gefüllte Zelle

i=Zeilenvariable

Sub uebertragen()
Dim ez As Integer, i As Integer

'ez ermitteln
i = 6
Do Until (ActiveSheet.Cells(i, 1) = "")
    i = i + 1
Loop
ez = i - 1

For i = 6 To ez
    If (Worksheets("Daten").Cells(i, 2) <> "") Then
        Worksheets("Daten").Range(Cells(i, 1), Cells(i, 5)).Copy _
        Destination:=Worksheets("Salat-Mix").Cells(i, 2).Pastespecial paste:= xlValues
    Else
    End If
Next i
End Sub


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 einfügen
21.06.2015 11:50:14 joerg
NotSolved
21.06.2015 12:08:15 Gast45781
*****
NotSolved
25.06.2015 05:08:20 joerg
Solved