Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
392to396
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
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zelle kontrollieren und dann kopieren

Zelle kontrollieren und dann kopieren
08.03.2004 10:38:09
nighman
Frage:
Ich möchte das, wenn die Zellen A1:A2 nicht leer sind, die Zelle A4 kopiert wird und in Zelle A3 eingefügt wird. ABER NUR DIE WERTE.
Dies sollte natürlich autom. erledigt werden.
Und das gleiche sollte nachher auch in Zeile 2; 3; 4 usw. funktionieren.
Wobei der WERT immer aus Zelle A4 kopiert wird.
Ich denke, das hierfür ein Makro benötig wird, wo der Recorder nichts bringt.
Habs versucht.
DANKE
nightman

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle kontrollieren und dann kopieren
08.03.2004 16:15:24
Werner
Hallo Nighman,
versuche es mal mit nachstehendem Makro:

Sub Wert()
Range("A3").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(ISNUMBER(R[-2]C),ISNUMBER(R[-1]C)),R[1]C,"""")"
Range("A3").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub

MfG
Werner

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige