VBA Problem

[Nietzsche]

Hallo Zusammen,

ich hoffe, dass mir jemand helfen kann. Und zwar habe ich folgendes Problem:

In meinem Projektplan möchte ich über VBA das Startdatum und das Enddatum einer Aufgabe in einem anderen Tabellenblatt in einer bestimmten Zeile ausgeben lassen .
Excel sollte also nach dem "A" suchen und das entsprechende Datum in einer Zelle eines anderen Tabellenblatts ausgeben.
Für eure Hilfe bedanke ich mich im Voraus.

Viele Grüße

Nietzsche

[RPP63]

Moin!
Bei einem VBA-Problem einen Screenshot anzuhängen, dürfte prinzipiell die schlechteste Lösung sein …
Dennoch:
Die Daten sind ja fortlaufend in Spalten geschrieben.
Wenn der 1.1.2018 in Spalte F steht (aka 6)
dann ist heute in Spalte
Date - DateSerial(2018, 1, 1) + 6
also 120 zu finden.

Gruß Ralf

[RPP63]

Hab die Threaderöffnung falsch verstanden.

[Wastl]

Hi,

Code:

Sub stardatum()
For i = 7 To 1000
   If Cells(14, 7) = "A" Then
       Wochentag = Cells(9, i)
       Monat = Cells(7, i)
       Exit For
   End If
Next i
End Sub

Bei einem Bild muss ich alles nachbauen, besser ist eine Beispieltabelle mitgeben. Wie das geht kannste hier lesen
http://www.clever-excel-forum.de/thread-326.html

Edit:
du hast da verbundene Zellen, siehe dazu
http://www.clever-excel-forum.de/thread-142.html

Mein Vba-Code wird daher bei dir nicht funktionieren ohne dass du was drumrum baust oder das mit den verbundenen Zellen auflösen tust

[Nietzsche]

Hallo,

zunächst mal danke für deine Hilfe.
Die Excel-Datei habe ich jetzt mal angehängt.
Vielleicht findest du ja die Zeit und kannst es nochmal anschauen.
Ich bin bei VBA nämlich noch Laie.

Danke.

[EbyAS]

Hallo Nietzsche,
das ist zunächst aber eine sehr dürftige Aufgabenstellung. Du hast jetzt endlich eine Demo hochgeladen (sonst antworte ich nicht), darin sind viele Zeilen in dem "A" vorkommt. Welche willst Du in eine andere Tabelle? Und natürlich wie heißt diese (Einzelaufgabe?). Ich bin immer wieder erstaunt was wir uns aus den Fingern saugen sollen.
Also bitte bring eine ordentliche Aufgabenstellung in einer verständlichen Form, wenn Du möchtest das Dir geholfen werden soll.

[Nietzsche]

Hallo Armin,

vielen Dank.
Ich merks mir fürs nächste Mal.
Habe es aber dank Wastl hinbekommen.
Musste nur ein paar Details ändern und dann hat es geklappt.