Live-Forum - Die aktuellen Beiträge
Datum
Titel
03.05.2024 08:33:02
KKLEINSTE und WENNS führt nur zu #NV
03.05.2024 07:38:32
Filter in Pivot fixieren
02.05.2024 22:34:29
Zeilen suchen und löschen aus zwei ListObject
02.05.2024 22:04:57
Immer erste Mappe ansprechen und bestimmten Bereich kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1928to1932
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1928to1932
1928to1932
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makros

Makros
03.05.2023 12:03:29
Karl

Ich möchte daß beim Anklicken der Zeille A9 aus der Tabelle ID in der Zelle C9 der Tabelle ID der Wert aus der Zelle B12 in der Tabelle KD eingefügt wird
Alternativ beim Anklicken der Zelle A11 aus der Tabelle ID in der Zelle C9 der Tabelle ID der Wert aus der Zelle B15 in der Tabelle KD eingefügt wird.
usw.
Wie wird das Makros hierfür erstellt ?

Gruß
Karl

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makros
03.05.2023 12:15:40
Rudi Maintaire
Hallo,
in das Modul der Tabelle ID:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Dim strSource As String
  Select Case Target.Address(0, 0)
    Case "A9": strSource = "B12"
    Case "A11": strSource = "B15"
  End Select
  If strSource > "" Then Range("C9") = Sheets("KD").Range(strSource)
End Sub
Gruß
Rudi

Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige