1

Excel 2010では、日付「01-01-2012」と左右の矢印があります。

日付の日数がそれに応じて増減するように、マクロなどを適用する必要があります。これはどのように行うことができますか？

例：「01-03-2012」、右矢印を押すと、日付が「02-03-2012」に変更され、次回は「03-03-2012」などに変更されます。[01-31 ]注、月と年は決して変更されないことに注意してください。

マクロを作成しました。マクロを記録するときに入力した固定日を変更できますが、十分ではありません。代わりに加算/減算する必要があります。

4

2 に答える 2

3

日付が「theDate」であるセルに名前を付けました。Sub forSubtractDayはほとんど同じで、DateAdd関数の2番目の引数は-1になります。

Sub AddDay()

Dim theDate As Date
Dim newDate As Date

theDate = Sheet1.Range("theDate")

newDate = DateAdd("d", 1, theDate))

Sheet1.Range("theDate") = newDate

End Sub

これは私の「得意」ではないので、これは簡単な「n」ダーティなVBA Subであることに注意してください。ただし、これは機能します...

于 2012-12-18T14:00:09.880 に答える
1

これは間違いなく VBA マクロを介して実行できます。

[開発者] タブ -> [Visual Basic] で、問題のセルが存在するシートをダブルクリックし、次のイベントを実装します。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

パラメータ Target には、選択されたセルが含まれ (矢印の 1 つが選択されたセルであるかどうかを確認します)、それに応じて日付の値を増減します。

于 2012-12-18T13:57:57.473 に答える