Verschieben

Forumthread: Verschieben
6 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Verschieben

Verschieben

17.06.2008 17:16:07

Rolf

Hallo Leute!
Ein Problem!
Also ein Makro:


Sub Verschieben()
Range("A1").Insert (xlDowun)
Range("A1").Value=""
End Sub

Arbeitet wunderbar!
Jedoch es werden nicht nur Werte
nach Unten verschoben aber auch
Formeln die in A1 sind.Ich möchte
die Formel jedoch in A1 behalten!
Wie kan mann erreichen das nur
Werte (und nicht Formeln) verschoben
werden?
Grüße
klaro

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Verschieben

17.06.2008 17:35:24

AK
AW: Verschieben

17.06.2008 18:11:00

Rolf
AW: Verschieben

17.06.2008 18:20:00

AK
AW: Verschieben

17.06.2008 18:40:09

Rolf
AW: Verschieben

17.06.2008 22:38:07

Josef
AW: Verschieben

18.06.2008 00:19:00

Rolf

AW: Verschieben

17.06.2008 17:35:24

Hallo klaro,
bei Formel soll keine Zelle eingefügt werden, ja?! Dann probier mal das hier:


Sub Verschieben()
If Range("A1").HasFormula = False Then
Range("A1").Insert (xlDown)
Range("A1").Value = ""
End If
End Sub

Grüße
Andreas

AW: Verschieben

17.06.2008 18:11:00

Rolf

Hallo Andreas!
Makro muss unterscheiden zwischen Formula
und Ergebniß(Value) und nur Value verschieben!
Die Formel ist immer da (in A1).
Grüse
Rolf

AW: Verschieben

17.06.2008 18:20:00

Sorry Rolf, aber das kapiere ich nicht. Kannst du mal nen Beispiel geben bzw. ne Datei hochladen?
Gruß
Andreas

AW: Verschieben

17.06.2008 18:40:09

Rolf

Hallo Andreas!
Also in A1 ist die Zahl =15
und die Formel =SUMME(B1;C1)
B1=5,C1=3
Also Zahl 15 soll verschoben werden nach Unten
jedoch die Formel soll in A1 bleiben.
Rolf

AW: Verschieben

17.06.2008 22:38:07

Josef