Ich versuche, eine Funktion in meinen VBA-Code einzufügen, um eine Zelle nur zu füllen, wenn eine andere Zelle Daten enthält

447
Kyle Hinkebein

Das ist mein Code. Es füllt das Datum, wenn ich dies =Updating_Date(B5)in C5 eingegeben habe. Was es tun soll, ist NUR das Datum auszufüllen, wenn Daten in B5 vorhanden sind, und das Datum zu entfernen, wenn keine Daten vorhanden sind. Derzeit wird Datum angezeigt, egal was. Ich muss in einer Bedingung schreiben, damit NUR Datum angezeigt wird, wenn Daten in Spalte B vorhanden sind.

Nachfolgend habe ich dank eines anderen Benutzers ein Modul =Updating_Date(B5)in C5 eingegeben.

Function Updating_Date(dependent_cell as Range) As Date Updating_Date = Date End Function

Auch hier wird das Datum angezeigt, unabhängig davon, ob sich Daten in Spalte B befinden oder nicht.

Vielen Dank.

-2
Haben Sie versucht, nach "vba condition" zu googeln? Weil diese Site kein kostenloser Makro-Schreibservice ist. TheUser1024 vor 9 Jahren 0
Wenn meine Frage unangebracht war, entschuldige ich mich und werde sie löschen. Ich suchte nach Unterstützung oder Anregungen zu dem, was ich gerade hatte. Ich habe nicht gewusst, dass ich um Hilfe beim Schreiben dieser Bedingung gebeten habe. Kyle Hinkebein vor 9 Jahren 0
Diese Seite hilft Ihnen dabei, diese Bedingung zu schreiben, aber Sie sollten vielleicht versuchen, ein bisschen weiter zu kommen. Wenn Sie versuchen, auf ein Problem zu stoßen, ist dies der richtige Ort, um um Hilfe zu bitten. Aber es liegt an Ihnen, das zu versuchen. ;-) Allerdings hast du bereits eine Antwort bekommen, aber ich denke, deine Frage zeigt nicht genug Aufwand. Keine Sorge, keine Beleidigung gemeint! Sie hätten gelernt und profitieren können, wenn Sie ein bisschen härter versuchen, glaube ich (und Sie hatten bereits das Suchwort, das Sie benötigten: "Bedingung"). TheUser1024 vor 9 Jahren 0
Ich weiß den Rat zu schätzen !! Um ehrlich zu sein, bin ich ehrlich gesagt ein bisschen müde, um das zum Laufen zu bringen, sonst hätte ich wahrscheinlich noch ein bisschen mehr gehabt. Im Allgemeinen hätte ich mehr Zeit zum Experimentieren und ein besseres Verständnis, da ich lieber lernen würde, als nach Handouts zu fragen. Wenn Sie nicht an Formeln oder Codierungen gewöhnt sind, ist es wirklich schwierig, in sie zu springen. Kyle Hinkebein vor 9 Jahren 0

1 Antwort auf die Frage

1
Engineer Toast

Ich verstehe dein Beispiel vielleicht nicht klar, aber es sieht so aus, als könntest du einfach eine der folgenden Zellformeln verwenden:

=IF(ISBLANK(B5),"",TODAY()) =IF(ISBLANK(B5),"",NOW()) =IF(ISBLANK(B5),"",Updating_Date(B5))

Wenn Sie die Überprüfung in VBA durchführen möchten, haben Sie folgende Möglichkeiten:

Function Updating_Date(dependent_cell As Range) If LenB(dependent_cell.Value) > 0 Then Updating_Date = Date Else Updating_Date = "" End Function

Nicht, dass die Funktion kein Datum zurückgeben kann, sonst wird sie 0anstelle von Leerzeichen zurückgegeben. Ich ließ das fallen und fügte eine IfBedingung hinzu, die leer ist, wenn das Feld leer dependent_cellist.

Dies schien perfekt zu funktionieren, nur die Formel wurde in `= IF (ISBLANK (B5)," ", Updating_Date (B5))` geändert. Vielen Dank. Ich bin 100% neu im Umgang mit Formeln und vor allem vba .. Nochmals vielen Dank .. Kyle Hinkebein vor 9 Jahren 0

Verwandte Probleme