別のセルにデータがある場合にのみセルを埋めるために、VBAコードに関数を挿入しようとしています[複製]

-2

この質問は次のものとまったく同じです：

データが別のセルに入力されたときにセルに自動入力するには今日の日付が必要 3つの回答

これは私のコードです。これ=Updating_Date(B5)をC5で入力すると、日付が入力されます。B5にデータが存在する場合のみ日付を入力し、データが存在しない場合は日付を削除することを想定しています。現在、何に関係なく日付が表示されます。列Bにデータが存在するときに日付のみを表示するように条件を記述する必要があります。

以下は、別のユーザーのおかげ=Updating_Date(B5)で、C5で入力したモジュールに入力したものです。

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

この場合も、データが列Bにあるかどうかに関係なく、日付が表示されます。

ありがとう。

— カイル・ヒンケバイン
ソース

「vba condition」のグーグルを試しましたか？このサイトは無料のマクロ作成サービスではないためです。

— TheUser1024

私の質問が不適切だった場合、私は謝罪し、それを削除します。私が現在持っているものに対する支援や提案を探していました。私は..任意のルールを破ったその状態を書いて助けを求め実現しなかった

— カイルHinkebein

このサイトは、あなたがその条件を書くのを助けることについて完全にあります、しかし、あなたは多分もう少し取得しようとするべきです。問題が発生した場合は、これが助けを求める場所です。しかし、試してみるのはあなた次第です。;-)しかし、あなたはすでに答えを得ましたが、あなたの質問は十分な努力を示していないと思います。心配する必要はありませんが、犯罪はありません！あなたは、私が信じていることをもう少し頑張って学んで、利益を得たでしょう（そして、あなたはすでにあなたが必要とする検索語を持っていました：「条件」）。

— TheUser1024

アドバイスありがとうございます!! 正直に言って、これを機能させるには少し苦労しています。あなたの式や、それにジャンプしようとして本当にトリッキーだコーディング使用されていない場合は一般的に私は..私は学ぶことではなく、配布資料を求めることを好むだろうとして、より良い理解を試してもらうために多くの時間を持っているでしょう...

— カイルHinkebein

私はあなたの例を明確に理解していないかもしれませんが、これらのセル式のいずれかを使用できるように見えます：

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

VBAでチェックを行う場合は、次のオプションがあります。

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

関数が日付を返せない、または0空白の代わりに返されるというわけではありません。これを削除し、Ifが空白の場合に空白を返す条件を追加しましたdependent_cell。

— エンジニアトースト
ソース

これは完全に機能するようで、式をに変更するだけ=IF(ISBLANK(B5),"",Updating_Date(B5))です。どうもありがとうございました。私はおかげで再び.. 100式を使用する新しい％、特にVBA午前

— カイルHinkebein