Full width home advertisement

Post Page Advertisement [Top]



Είναι πολύ εύκολο αν έχετε μια μικρή εξοικείωση με την VBA και τις μακροεντολές του Excel.


Ανοίξτε τον κώδικα VBA του βιβλίου εργασίας και εισάγετε τον παρακάτω κώδικα:



Private Sub Workbook_Open()

Dim myhour As Boolean
myhour = Not (myhour)
Do While myhour = True
DoEvents
Range("A1") = TimeValue(Now())
Loop
End Sub

Μόλις "τρέξετε" τον παραπάνω κώδικα, το κελί Α1 του φύλλου σας θα γίνει ένα ψηφιακό ρολόι. Μπορείτε φυσικά να αλλάξετε στον κώδικα το κελί που θέλετε να χρησιμοποιήσετε ως ρολόι καθώς και να αλλάξετε τα χρώματα φόντου και γραμμάτων ώστε να ταιριάζει με τις αναφορές σας. 


Δείτε το βίντεο:

Χρησιμοποιήστε τη φόρμα επικοινωνίας για να μας στείλετε μήνυμα σε περίπτωση που θέλετε περαιτέρω παραμετροποίηση / αυτοματοποίηση στο ψηφιακό ρολόι σας!

Bottom Ad [Post Page]