Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1020to1024
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro Zellen kopieren

Makro Zellen kopieren
01.11.2008 11:16:00
Otto
Guten Morgen,
Ich versuche ein Makro zu basteln, habe aber Schwierigkeiten damit.
Das Makro soll in der Spalte H, die Zellen dursuchen und wenn in einer Zelle es das Wort "more" findet, soll es diese Zelle kopieren und einer Zelle hoeher hinzufügen.
Zum Beispiel:
In Zelle H7 gibt es das Wort more - copy, paste in H6,
dann
In Zelle H20 gibt es das Wort more - copy, paste in H19 ...
usw fuer alle Zellen der Spalte H.
Es ist wichtig dass die bestimmte Zelle kopiert und dann hinzugefügt wird genau wie beschrieben, weil obwohl alle das selbe Wort habe, sind das alle unterschiedliche Links zu verschiedene Internet seiten
Kann mir vielleicht jemand helfen?
Vielen Dank
Otto

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
So könnte es funktionieren!
01.11.2008 11:35:15
Backowe
Hi Otto,
VBA-Code:
Sub WertEineZelleHoeherEinfuegen()
Dim Zelle As Range
For Each Zelle In Range("H1:H" & Cells(Rows.Count, "H").End(xlUp).Row)
If InStr(Zelle, "more") > 0 Then _
  Cells(Zelle.Row, "H").Copy _
    Destination:=Cells(Zelle.Row - 1, "H")
Next
End Sub
Gruß Jürgen
AW: Perfekt!!!
Otto

Hallo Jürgen,
Es funktioniert prima!
Vielen Dank und schönes Wochenende
Otto
Anzeige
AW: Perfekt!!!
01.11.2008 11:40:45
Otto
Hallo Jürgen,
Es funktioniert prima!
Vielen Dank und schönes Wochenende
Otto

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige