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

Zelleneingabe Wert in Zelle übertragen

Zelleneingabe Wert in Zelle übertragen
22.12.2006 13:13:41
Turi
Guten Tag
möglicherweise ist folgendes Problem nur mit VBA lösbar:
Beispiel: Wenn ich in die Zelle A1 einen Wert eingegeben habe sollte der Wert aus der Zelle A2 auch in der Zelle B2 ersichtlich sein.
Vielen Dank, Gruss Turi

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

Betreff
Datum
Anwender
Anzeige
AW: Zelleneingabe Wert in Zelle übertragen
22.12.2006 13:27:13
Harald
Hi Turi,
das tut ne simple Wenn-Formel in B2
=WENN(A1&lt&gt"";A2;"")
Gruss Harald
AW: Zelleneingabe Wert in Zelle übertragen
22.12.2006 15:31:37
Daniel
... die man aber auch erst mal reinschreiben oder kopieren muss.
Wenns ne Liste ist, die von anderen ausgefüllt und erweitert wird, kanns schon hilfreich sein, wenn auch diese Formeln automatisch eingefügt werden, vor allem, wenn es sich um irgendwelche Hilfsspalten handelt, die der User nicht unbedingt sehen muß.
Da gibts dann zwar in den Extras die Option "Listenformat und Formeln erweitern", das ist mir aber zu unsicher.
Wenn, mach ich sowas dann mit VBA
kleines Makro im Klassenmodul der Tabelle:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Columns.Count > 1 Then Exit Sub
Application.EnableEvents = False
On Error GoTo Fehler
Dim Zelle As Range
Select Case Target.Column
Case 1
For Each Zelle In Target
Zelle.Offset(0, 1).FormulaR1C1 = "=RC[-1]"
Next
Case Else
End Select
Fehler:
If Err <> 0 Then MsgBox "Es ist ein Fehler aufgetreten"
Application.EnableEvents = True
End Sub

Gruß, Daniel
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige