今日に行こうとするマクロ

-3

私はVBAを初めて使っています。私は今日の日付を見つけるために行（特に行4）でマクロを実行しようとしていますが、私がオンラインで見つけたものはすべて列に固有です。私は自分で作成しようとしましたが、うまく機能しません。私はいくつかのコードを持っていましたが、機能が完全に不足しているので、それを削除しました。どんな助けでも大歓迎です。今日に行こうとするマクロ

出典

2016-07-18 Deanne.B

コードが正しく動作していないことを示してください。 – DAXaholic

申し訳ありませんが削除しました。： –

フィードバックをお寄せいただきありがとうございます。マクロレコーダーはあなたの友人であり、多くのVBAシナリオを解決するのに役立つことを忘れないでください。 – teylyn

マクロレコーダーを起動します。
選択行4
は
は、今日の日付を入力して、日付がハイライト表示されたら、マクロの記録を停止

コードを編集してください。変数を宣言して今日の日付に設定する

Dim myDate As Date 
myDate = Date

ここで、コードに今日の日付の文字列の代わりに変数myDateを使用します。

Sub Macro1() 
' 
' Macro1 Macro 
' 
Dim myDate As Date 
myDate = Date 

' 
Rows("4:4").Select 
Selection.Find(What:=myDate, After:=ActiveCell, LookIn:=xlFormulas _ 
    , LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ 
    MatchCase:=False, SearchFormat:=False).Activate 
End Sub

出典

2016-07-18 04:31:17 teylyn

非常に感謝して、本当にあなたの助けに感謝します。 –

今日に行こうとするマクロ

答えて

関連する問題