Fce Date ve VBA – Visual Basic – Fórum – Programujte.com

Ahoj, nevíte někdo jak na to. Jsem úplný začátečník v programování ve VBA i celkově a potřeboval bych helpnout.
Porovnava se mi datum ve formuláři se systemovym datumem a potřeboval bych, aby se mi dané textové pole zobrazovalo o tyden dřív až po ten datum, co sleduje..Moc, moc děkuji za každou radu. Sesmolil jsem tohle, ale to zobrazí jen právě den "D"
If xxx.Value = Date Then
Me.xxx.Visible = True
Else
Me.xxx.Visible = False
End If
End Sub

To Anonymní uživatel : Ahoj, pokud jsem to dobře pochopil, potřebuješ testovat, zda je zadané datum o 7 dní menší. Toho dosáhneš tak, že od datumu prostě odečteš 7. Do tvého kódu to doplníš nějak takto:

If xxx.Value = (Date - 7) Then
Me.xxx.Visible = True
Else
Me.xxx.Visible = False
End If
End Sub

Snad jsem odpověděl na to, na co jsi se ptal. Hodně zdaru.

To Rada : Děkuju.Skoro. Potřeboval bych aby to JEŠTĚ po těch 7 dní zobrazovalo až do dne xxx.

To Anonymní uživatel :
Existují operátory >= nebo <= ...

Doporučuji správně používat booleanovské výrazy, čímž se dá kód výrazně zkrátit (větev If Then Else není zapotřebí), např.
xxx.Visible = nz(xxx.Value) >= Date - 7