VBA: Dynamischer Kalender, automatisch Befüllung

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Chris,
nur ne kurze Anmerkung.
In diesem Forum sind richtig coole Helfer. Sie investieren Stunden oder sogar Tage nur um Leute zu helfen die Hilfe nötig haben. Dabei kennen sie diese Menschen nicht einmal.
Mal ehrlich wo auf dieser Welt gibt es so etwas noch.
Der unterschied besteht darin das man geholfen werden möchte oder etwas Serviert haben möchte.
Zum kostenlosen erstellen ist dieses Forum nicht der richtige Ort.
Mir wurde hier auch schon gefühlte hunderte male geholfen.
Aber meine Strategie ist immer schon gewesen, das ich erstmal Stunden und Tage mitunter auch Wochen damit verbracht habe, das was ich brauche selbst umzusetzen. Und wenn ich dann an einem ( oder an mehreren Punkten ) nicht weiter wusste habe ich eine Anfrage gestellt.
Und dann hat mir immer ein Helfer einen wichtigen Weg gezeigt. ( und da war auch schon vieles richtig Zeitaufwendiges dabei)
Deshalb meine Vorschläge:
1. vergiss das ganze Vorhaben
2. such Dir ein Programmierer der für Lau arbeitet
3. Fang einfach an und versuch selbst umzusetzen was du möchtest und wenn es dann an der einen oder anderen Stelle klemmt frag einfach nochmal neu nach ob Dir jemand bei diesem speziellen Problem hilft.
Ich habe mit Punkt drei angefangen und ich sage Dir, durch dieses Forum kann ich nun sehr viele Sachen allein lösen und muss nur noch selten nachfragen.
Zugegeben ich habe mehr als nur Tage und Wochen gelernt.
Und verstehen kann ich vieles immer noch nicht.
Aber es ist richtig cool wenn die ersten eigenen Makros oder komplizierten Formeln funktionieren.
Also Ärmel hochkrempeln und los geht's.
bis dann Thomas

Sub til() Dim C As Range Dim D As Range Dim x As Long For Each C In Tabelle2.Range("J2:J100") If IsDate(C) Then With Tabelle1 Set D = .Range("B3:AC20").Find(C, lookat:=xlWhole) If Not D Is Nothing Then For x = 0 To 3 If .Cells(D.Row + 1, D.Column + x) = "" Then .Cells(D.Row + 1, D.Column + x) = C.Offset(0, -9) On Error Resume Next .Cells(D.Row + 1, D.Column + x).Comment.Delete On Error GoTo 0 .Cells(D.Row + 1, D.Column + x).AddComment C.Offset(0, 1).Text Exit For End If Next x End If End With End If Next C End Sub

Hallo und guten Morgen zusammen,
ich habe den Verlauf dieses Threads bereits am Wochenende verfolgt, musste aber erstmal etwas Abstand dazu nehmen...
@Thomas:
Ich stimme mit dir vollstens überein, dass es hier richtig coole Helfer gibt und so etwas gerade heutzutage wirklich sehr selten ist.
Ich verstehe nur nicht worauf konkret du deine indirekten Tadel beziehst?
Finde es wirklich albern, dass du so einen Post nach den beiden vorausgegangen hinterher schieben musst.
Es wirkt auf mich wie eine Art Selbstbeweihräucherung, gepaart mit der von dir empfundenen Steilvorlage mal seine ehrliche Dankbarkeit ausdrücken zu können.
Dankbarkeit kommunizieren finde ich super und angebracht, dabei aber auf jemand anderen einzutreten, ohne Hintergrundwissen und/oder durch reine Mutmaßung, finde ich schwach.
"Einzutreten" deshalb - wie erwähnt - aufgrund der beiden vorausgegangen Posts von Hajo und Onur, wo auch direkter oder indirekter meine Art der Hilfesuche bemängelt wurde.
Ich war tatsächlich etwas eingeschüchtert und habe mich versucht realistisch zu hinterfragen.
Bei Hajo gehe ich von einem Missverständnis aus, bei Onur verstehe ich nur sehr bedingt seine Kritik, ggf. fehlt mir aber auch einfach die Perspektive des Helfers.
Wie vorher bereits angemerkt bin ich ein VBA-Noob und habe dies auch so versucht erkenntlich zu machen.
Zudem habe ich zu Beginn meines Posts darauf hingewiesen, dass die Lösung aus meiner Sicht relativ aufwendig ist, um sicherzustellen, dass jemand, der darauf keine Lust hat, die Bsp-Datei gar nicht erst öffnen muss.
Was mich etwas stört ist, dass du weder weißt, ob ich vorher bereits probiert habe es selbst zu lösen (plus Zeitaufwand), noch, dass du selbst scheinbar den zeitlichen Aufwand der Lösung - die ich suchte - nicht korrekt bewerten kannst, dies aber mehr oder minder so suggeriest, dies dabei aber vermutlich einfach von ONUR's Aussage übernommen hast - nämlich jene, dass meine Problematik im Hinblick auf zeitlichen Aufwand den normalen Rahmen des Forums sprengt.
Zu argumentieren warum ich dann keinen Code gepostet habe, sollte ich es doch selbst versucht haben, kann auch diverse Gründe haben - nebenbei bemerkt.
Ich halte grundsätzlich ein VBA-Code der versucht wurde mit dem Makro-Rekorder aufzuzeichnen und irgendwelche Codefetzen aus dem Netz, die von der Variablenbezeichnung her schon nicht stimmig sind und bei denen ich nicht fähig bin selbstständig die richtigen Anpassung vorzunehmen bzw. überhaupt zu beurteilen, ob diese der richtige Ansatz sind, auch nicht für sonderlich hilfreich und aussagekräftig.
Ich konzentriere mich dann doch lieber darauf meine Situation darzulegen.
Sollte sich dies als falscher Denkansatz herausstellen, werde ich das natürlich zukünftig ändern.
Thomas, mich freut es für dich (keine Ironie), dass du mehr Erfahrung im VBA-Bereich hast und auch schon einiges dazu gelernt hast. Auch ich strebe dies an und sehe dieses Forum nicht als Mittel zum Zweck, um mal schnell eine Komplettlösung für alle meine Probleme zu erhalten. Ich versuche mich schon mit den Codes auseinanderzusetzen, was aber teils durch fehlende Grundlage recht schwerfällig ist.
Wie auch immer, mir widerstrebt es mich jetzt hier im Detail zu rechtfertigen, genauso wie einige Aussagen in deinem Post.
Grundsätzlich, das möchte ich jedoch hervorheben, finde ich deine Einstellung richtig gut - nur eben die Art und Weise wie du diese wiedergibst nicht.
Ich versuche mich selbst zu sensibilisieren und nicht mehr Wörter wie "Anfrage"/"Anforderungen" zu verwenden, um zukünftig eine mögliche Fehlinterpretation zu unterbinden.
Dennoch poche ich zusätzlich auch darauf, dass der Mensch nicht alles so einseitig sieht und direkt (ver)urteilt.
@{Boris}
Vielen Dank für deinen Code und deine Worte.
Hab es getestet, klappt sehr gut :-)!
Der Ansatz die Spalten einfach vorher zu verketten ist wirklich sinnvoll - darauf bin ich leider nicht selbst gekommen.
@fcs
Franz, auch dir vielen Dank und natürlich auch für deinen zusätzlichen Aufwand mit der Formeleinbindung.
Deine Lösung klappt ebenfalls einwandfrei!!!
VG,
Chriss

Beliebteste Forumthreads (12 Monate)

VBA: Dynamischer Kalender, automatisch Befüllung

15 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread