Zahl in Feld übertragen

Forumthread: Zahl in Feld übertragen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Zahl in Feld übertragen

13.09.2024 17:12:47

forumseeker

Hallo!

ich möchte z.B. in Zelle A1 bsp. 1 eingeben, die dann in Zelle A4 erscheint. Ich will aber A4 nicht angreifen. (dann konnte ich ja auf A1 verweisen). Geht das und wenn ja, wie?

Gruss,
Andreas

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zahl in Feld übertragen

13.09.2024 17:20:57

daniel
AW: Zahl in Feld übertragen

13.09.2024 21:59:10

forumseeker

AW: Zahl in Feld übertragen

13.09.2024 17:20:57

daniel

Hi
ohne dass in A4 die Formel =A1 steht, geht das nur mit VBA.
(besser wäre die Formel: =Wenn(A1="";"";A1), denn das vermeidet die 0 in A4, wenn A1 leer ist)
dazu muss in das Modul des Tabellenblatts folgender Code:

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("A1")) Is Nothing Then

    Application.EnableEvents = False

    Range("A4").Value = Range("A1").Value

    Application.EnableEvents = True

End If

End Sub

Gruß Daniel

AW: Zahl in Feld übertragen

13.09.2024 21:59:10

forumseeker

Hallo!

vielen Dank schon mal für deinen Tipp! VBA wollte ich vermeiden, aber vielleicht weiss einer wie ich das umsezten kann: In deiner Tabelle2 stehen Geräte, die markiert werden, z.b. als "erledigt". Diese Werte aus der Spalte müssen dann in der Tabelle1 angefügt werden, Wenn das erledigt ist, darf der Satz nicht nochmal hinzugefügt werden, weil er steht ja schon in Tabelle1 (ist auch eindutig identifzierbar, durch z.B. eine Seriennummer, die ich auch in Tabelle1 übernehmen könnte). Manuell wäre das ohne Weiteres möglich, d.h. kopieren von Tabelle2 in Tabelle 1, als "gemacht" kenzeichnen, dann den nächsten machen, auch kopieren und als "gemacht" kennzeichnen, usw.

Weiss einer Rat?

Gruss,
Andreas