Datum

Titel

16.04.2024 12:41:11

Vielleicht Onur ? Leider werden nicht alle Monate

16.04.2024 12:08:33

Zelle/Spalte bestimmten Wert in Kopfzeile zuordnen

16.04.2024 12:01:17

Dynamische Liste generiert aus mehreren Vorgagen

16.04.2024 11:48:22

Blatt in HTML exportieren wenn Checkbox aktiv ist

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

844to848

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Zellwert der aktivierten Zelle in andere Zelle

Forumthread: Zellwert der aktivierten Zelle in andere Zelle
4 Beiträge zu diesem Forumthread
Anzeige
306 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

11.02.2007 11:34:14

Fritz_W

Hallo Forum,
ich benötige die Unterstützung der VBA-Experten.
Wie kann ich erreichen, dass beim Aktvieren einer Zelle des Bereichs H4:M5 der Tabelle1 der Zellwert der aktivierten Zelle in die Zelle AF6 der Tabelle2 kopiert wird?
Vielen Dank für jede Form von Hilfe!
Mfg
Fritz

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 11:56:36

Hans
AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:00:44

Ramses
AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:02:18

fcs
AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:07:50

Fritz_W

AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 11:56:36

Hans

Hallo Fritz,
füge folgenden Code in das Klassenmodul von Tabelle1 ein:


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("H4:M5")) Is Nothing Then Exit Sub
Worksheets("Tabelle2").Range("F6").Value = Target.Value
End Sub

gruss hans

AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:00:44

Ramses

Hallo
Rechte Maustaste auf den Tabellenreiter "Tabelle1"
"Code anzeigen"
dort diesen Code reinkopieren


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim tarRange As Range
Set tarRange = Application.Intersect(Target, Range("H4:M5"))
If Not tarRange Is Nothing Then
Worksheets("Tabelle2").Range("AF6") = Target.Value
End If
End Sub

Gruss Rainer

AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:02:18

fcs

Hallo Fritz,
folgende Prozedur muss du im VBA-Editor unter der "Tabelle1" einfügen.
Gruss
Franz


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target, Me.Range("H4:M5")) Is Nothing And Target.Cells.Count = 1 Then
Worksheets("Tabelle2").Range("AF6").Value = Target.Value
End If
End Sub

AW: Zellwert der aktivierten Zelle in andere Zelle

11.02.2007 12:07:50

Fritz_W

Hallo,
funktioniert wie gewünscht!!
Euch allen vielen Dank.
Gruß
Fritz