|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 3 spezifische Zeilen suchen und kopieren |
24.05.2016 10:42:28 |
Max |
|
|
|
24.05.2016 21:24:01 |
Gast133 |
|
|
|
24.05.2016 22:13:01 |
Max |
|
|
|
24.05.2016 22:15:58 |
Max |
|
|
|
24.05.2016 22:48:27 |
Gast3338 |
|
|
|
25.05.2016 08:43:42 |
Max |
|
|
|
25.05.2016 08:52:58 |
Max |
|
|
Von:
Max |
Datum:
24.05.2016 10:42:28 |
Views:
1289 |
Rating:
|
Antwort:
|
Thema:
3 spezifische Zeilen suchen und kopieren |
|
Hallo Kollegen,
ich verzweifle gerade ein wenig an meinen (eher überschaubaren) Excel VBA FÄhigkeiten und wäre sehr dankbar, wenn ihr mir helfen könntet. Es geht um folgendes. Folgendes Makro habe ich zur Zeit im Einsatz:
Sub NeueZeile4()
Dim Zeile As Long
Zeile = Range("D:D").Find(what:="Row4").Row - 1 '1 Zeilen über Row4
Rows(Zeile + 1).Insert 'Zeile einfügen
Rows(Zeile).Copy Cells(Zeile + 1, 1) 'Zeile kopieren
Rows(Zeile).EntireRow.Hidden = False
End Sub
Das Marko funktioniert sehr gut, um eine Zeile an einer bestimmten Stelle einzufügen. Nun würde ich allerdings gerne 3 Zeilen einfügen und eben 3 statt 1 Zeile kopieren (Anordnung bleibt die gleiche).
Ich verzweifle etwas daran. Kann einer mal drüber schauen, was ich hier verändern muss?
Vielen Dank.
Mit den besten Grüße,
Martin
Ich würde gerne in einem File eine bestimmte Zeile suchen lassen, darüber 3 Zeilen einfügen und 3 mal den Inhalt |
- 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
|
3 spezifische Zeilen suchen und kopieren |
24.05.2016 10:42:28 |
Max |
|
|
|
24.05.2016 21:24:01 |
Gast133 |
|
|
|
24.05.2016 22:13:01 |
Max |
|
|
|
24.05.2016 22:15:58 |
Max |
|
|
|
24.05.2016 22:48:27 |
Gast3338 |
|
|
|
25.05.2016 08:43:42 |
Max |
|
|
|
25.05.2016 08:52:58 |
Max |
|
|