Auswahl in eine Zelle übernehmen

Forumthread: Auswahl in eine Zelle übernehmen
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Auswahl in eine Zelle übernehmen

20.11.2025 15:17:04

Siegfried

Hallo zusammen,

ich habe in Spalte "B" mehrere Einträge stehen und möchte nach Auswahl eines Eintrages diesen per VBA in "A1" übernehmen.

Wie geht das?

Gruß
Siegfried

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Auswahl in eine Zelle übernehmen

20.11.2025 19:11:32

cysu11
AW: Auswahl in eine Zelle übernehmen

20.11.2025 20:06:51

Siegfried

AW: Auswahl in eine Zelle übernehmen

20.11.2025 19:11:32

cysu11

Hi,

das hier im Modul des Blattes:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Intersect(Target, Me.Columns("B")) Is Nothing Then

        If Target.Count = 1 Then

            Me.Range("A1").Value = Target.Value

        End If

    End If

End Sub

LG, Alexandra

AW: Auswahl in eine Zelle übernehmen

20.11.2025 20:06:51

Siegfried

Hi Alexandra,

vielen Dank

Gruß
Siegfried

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!