Thema Datum  Von Nutzer Rating
Antwort
Rot .Copy Destination erst ab Zeile x
17.02.2015 08:54:54 Kristian
NotSolved
17.02.2015 12:30:31 Gast41004
NotSolved
17.02.2015 13:12:32 Gast30095
NotSolved

Ansicht des Beitrags:
Von:
Kristian
Datum:
17.02.2015 08:54:54
Views:
1195
Rating: Antwort:
  Ja
Thema:
.Copy Destination erst ab Zeile x

Hallo zusammen,

ich habe eine Tabelle in der Inhalte nach Datum sortiert stehen (01.01.2015, 01.02.2015, usw...). Ich möchte jeweils 01.01.2015, 01.02.2015, usw. in ein eigenes Blatt kopieren. Funktioniert auch gut mit dem Code unten. Allerdings sollten jeweils darüber fix ein paar Zeilen stehen, von wegen Monat Januar und eine kurze Beschreibung. Wie kann ich dem VBA sagen, dass er die Zeilen in die Zieltabelle kopieren soll, aber die ersten Zeilen frei lässt, bzw. nicht überschreibt? Bin keine VBA-Leuchte :)...

 

Sub VIst()
 

Dim Zeile As Long
Dim ZeileMax As Long
Dim i As Long

With Tabelle1
ZeileMax = .UsedRange.Rows.Count
n = 1


For Zeile = 2 To ZeileMax
If .Cells(Zeile, 3).Value = "01.01.2015" Then
.Rows(Zeile).Copy Destination:=Tabelle2.Rows(n)
n = n + 1
 

End If
Next Zeile
End With

End Sub

 

Danke euch!!


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 .Copy Destination erst ab Zeile x
17.02.2015 08:54:54 Kristian
NotSolved
17.02.2015 12:30:31 Gast41004
NotSolved
17.02.2015 13:12:32 Gast30095
NotSolved