1 Κάντε κλικ στο " Alt " και " F11 " για να ανοίξει το Visual Basic Editor ( VBE ) .
" . Ενότητα "
2
Κάντε κλικ στο " Εισαγωγή" και στη συνέχεια κάντε κλικ
εικόνων 3
Αποκοπή και επικόλληση τον παρακάτω κωδικό στο κενό παράθυρο :
Sub CleanZeros ( )
Dim c Όπως Σειρά
Για κάθε c Στο ActiveSheet.UsedRange
Αν c = 0 και Len ( γ ) > 0 τότε c.Delete
Επόμενο γ
End Sub
Η
4 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε τη μακροεντολή .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα