Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: zwei zellen nach oben...

zwei zellen nach oben...
19.03.2005 17:33:35
Bernd
hallo,
ich möchte folgendes realisieren.
egal in welcher zelle ich mich befinde, soll nach buttonklick das passieren:
kopiere aktive zelle, gehe 2 zellen nach oben, füge den wert ein ein, gehe eine zele runter und lösche den inhalt.
ich hoffe ihr könnt mir weiterhelfen und vielen dank für eure mühe.
gruss bernd
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zwei zellen nach oben...
19.03.2005 17:43:06
serge
hi bernd mit :

Sub Makro1()
Selection.Copy
ActiveCell.Offset(-2, 0).Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.ClearContents
End Sub

sollte es gehen
serge
AW: zwei zellen nach oben...
19.03.2005 17:45:47
ransi
hallo bernd
Option Explicit

Private Sub CommandButton1_Click()
With ActiveCell
.Offset(-2, 0).Value = ActiveCell.Value
.Offset(-1, 0).ClearContents
End With
End Sub

"egal in welcher zelle ich mich befinde,..." geht nach hinten los wenn du dich in zeile 1 oder 2 befindest.
ransi
Anzeige
danke euch beiden :-)
19.03.2005 17:51:43
Bernd
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige