Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
892to896
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
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Zellenwert in Tabelle überschreiben
07.08.2007 21:30:11
samsplanet
geschätzte excelgemeinde
ich komme wiedermal nicht weiter und bitte freundlich um eure hilfe.
meine idee:
in Tabelle1 erfasse ich in der Zelle A1 ein beliebiges datum. in Zelle A2 einen beliebigen inhalt (Bsp: "Hase").
nun möchte ich durch klicken eines commandbuttons (o.ä.), dass der inhalt der Zelle A2 ("Hase") rechts neben dem gleichen datum wie in Zelle A1 erfasst, welches sich irgendwo auf Tabelle 2 befindet wiedergegeben wird.
oder anders herum: ich will, dass das wort "hase" im kalender in Tabelle 2 beim datum aus Tabelle 1, Zelle A1 eingetragen wird.
wie stelle ich das am elegantesten an?
danke für eure hilfe im voraus
und grüsse
sam

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellenwert in Tabelle überschreiben
Worti
Hallo sam,
sogehts:


Private Sub CommandButton1_Click()
    Dim c As Range
    Set c = Worksheets("Tabelle2").Cells.Find(Worksheets("Tabelle1").Range("A1").Value)
    If Not c Is Nothing Then
       c.Offset(0, 1).Value = Worksheets("Tabelle1").Range("b1").Value
    End If
End Sub


Gruß Worti
Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige