Automatischer Ausdruck des Formelergebnisses

Automatischer Ausdruck des Formelergebnisses

Ich habe eine Prozedur in VBA, um einen PrintScreen aufzurufen:

Sub PrintScreen()
keybd_event VK_SNAPSHOT, 1, 0, 0
End Sub

Ich möchte es alle zehn Sekunden aufrufen, wenn das Ergebnis dieser Zelle

=IFERROR(VALUE(TEXT(F4,"ss")),-ABS(VALUE(RIGHT(F4,2))))

ist "0";
die nächste Zelle gibt ein "Yes"oder zurück "No", wenn"0"

=IF(RIGHT(I5,1)="0","Yes","No")

Wenn diese Zelle also wieder da ist, "Yes"möchte ich einen Screenshot machen. Ich weiß, dass ich nah dran bin, aber es frustriert mich, weil ich es nicht hinbekomme.

verwandte Informationen