Excel - Nájsť premennú vo výbere

Problém

Mám dáta pridané každý deň a chcel som pridať tlačidlo, ktoré v podstate skočí do dnešného dňa a potom skopíruje dáta do priloženého riadka. Kopírovanie je v poriadku, ale zatiaľ nemôžem vybrať dátum.

Stĺpec A má dátumy, ktoré sa môžu zmeniť, ale budú vždy obsahovať dnes. C3 = Today (). Snažil som sa nastaviť aVab, ale som úplný nováčik a nemôžem nájsť odpoveď na tento jednoduchý dotaz. Zdá sa, že vždy dostanem chybu 91 premennej objektu, ktorá nie je nastavená.

 Dim aVab As Date aVab = Rozsah ("C3"). Hodnotové stĺpce ("A: A") Vyberte položku Selection.Find (Čo: = aVab, After: = ActiveCell, LookIn: = xlValues, LookAt _: = xlPart, SearchOrder : = xlByRows, SearchDirection: = xlNext, MatchCase: = _ False, MatchFormat: = False) .Aktivovať ActiveCell.Select 

Riešenie

Ak sa v stĺpci raz objaví dátum [Today ()]] a chcete vybrať túto bunku, bude to trik.

Dúfam, že to pomôže!

 Dim aVab Dim c Ako rozsah aVab = Rozsah ("C3") Hodnota pre každé c v rozsahu ("A1: A65536") Ak c = aVab Potom c.Select Koniec Ak Ďalší c 

Poznámka

Vďaka Wut Up WutUp pre tento tip na fóre.