Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zelle nach Spalte und Zeile finden

Zelle nach Spalte und Zeile finden
13.07.2004 14:23:01
Ulf_MS
Hi Excel Friends,
Ich habe eine Tabelle in der in den Spalten das Datum steht und in der Zeile die Uhrzeit. Gibt es einen Code der anhand des Datums und der Uhrzeit die entsprechende Zelle findet und beschreiben kann?
danke für eure Hilfe
Ulf_MS
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle nach Spalte und Zeile finden
14.07.2004 00:20:43
Folker
Hallo Ulf,
hier mal ein Beispiel um Werte in einer Spalte und Zeile zu suchen und dann in die Koordinate einen Wert zu setzen. Musst vielleicht ein wenig rumprobieren in welchem Format du deinen Input eingibst und ob du .value oder .text verwenden musst damit es klappt.
Gruß Folker

Sub matrix()
Dim datum As String
Dim zeit As String
Dim col As Integer
Dim row As Integer
datum = "01.02.2004"
zeit = "14:00"
For Each rng In Range(Range("A1"), Cells(1, 255).End(xlToLeft))
If rng.Value = datum Then col = rng.Column
Next
For Each rng In Range(Range("A1"), Cells(65536, 1).End(xlUp))
If rng.Text = zeit Then row = rng.row
Next
Cells(row, col).Value = "Hallo"
End Sub

Anzeige
AW: Zelle nach Spalte und Zeile finden
Ulf_Ms
Hi Folker,
der Code bleibt immer in der letzten Zeile hängen.
Gruß
Ulf
AW: Zelle nach Spalte und Zeile finden
Martin
Hallo Ulf,
so sollte es gehen:

Sub matrix()
Dim datum As Date
Dim zeit As Date
Dim col As Integer
Dim rw As Long
datum = CDate("01.02.2004")
zeit = CDate("14:00")
For Each rng In Range(Range("A1"), Cells(1, 255).End(xlToLeft))
If rng.Value = datum Then col = rng.Column
Next
For Each rng In Range(Range("A1"), Cells(65536, 1).End(xlUp))
If rng.Value = zeit Then rw = rng.row
Next
Cells(rw, col).Value = "Hallo"
End Sub

Gruß
Martin Beck
Anzeige
Danke Martin , danke Folker
Ulf_MS
Danke Martin funktioniert super
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige