Έτσι συνδέετε έναν παράγοντα σε κάθε τύπο
Εάν αλλάξετε δεδομένα στους πίνακες σας παγκοσμίως, μπορείτε να κάνετε αυξήσεις ή μειώσεις τιμών ή άλλες προσαρμογές υπολογισμού με ταχύτητα αστραπής.
Μπορείτε να προσθέσετε έναν παράγοντα σε όλους τους τύπους στις λίστες σας. Μια μακροεντολή λύνει αυτήν την εργασία και συνδέει έναν συντελεστή πολλαπλασιασμού σε όλους τους τύπους σε μια επιλεγμένη περιοχή δεδομένων. Με αυτόν τον τρόπο, μπορείτε να προσαρμόσετε γρήγορα και αποτελεσματικά τους τιμοκαταλόγους και τα παρόμοια σε νέες συνθήκες.
Το παρακάτω σχήμα δείχνει έναν τέτοιο πίνακα. Υπάρχουν σταθερές στα κελιά Β1: Β3 και ένας τύπος στο κελί Β4. Το κελί τύπου αναφέρεται στα κύτταρα με τις σταθερές.
Για να προσθέσετε τον συντελεστή 110% σε όλους τους τύπους αυτής της λίστας, σημειώστε πρώτα την περιοχή δεδομένων Β1: Α4 και καλέστε την ακόλουθη μακροεντολή:
ΥποπαράγονταςAnFormelnAnhaengen ()
Dim Cell As Range
Dim factor As String
Συντελεστής = "110%"
Για κάθε κελί σε επιλογή
Με κελί
Εάν .HasFormula Τότε .Formula = _
"= (" & Right $ (. Formula, Len (.Formula) - 1) & ") *" & factor
Τέλος με
Επόμενο κελί
Τέλος υπο
Μετά την εκκίνηση της μακροεντολής, όλα τα κελιά τύπου στην επισημασμένη περιοχή κελιών πολλαπλασιάζονται με συντελεστή 110%. Το παρακάτω σχήμα δείχνει το αποτέλεσμα
Η μακροεντολή εισάγει τον παράγοντα που καθορίσατε στην εκχώρηση τιμής για τη μεταβλητή παράγοντας έχουν ορίσει. Η έκφραση "110%" αποθηκεύεται εκεί ως κείμενο. Αυτό οδηγεί σε αύξηση των αποτελεσμάτων του τύπου κατά 10%. Αλλάξτε αυτόν τον αριθμό για διαφορετικό συντελεστή. Χρησιμοποιώντας παράγοντες κάτω από 1, μπορείτε επίσης να κάνετε διαιρέσεις.
Στο ΑνΓραμμή της μακροεντολής, το υπάρχον κείμενο του τύπου τοποθετείται σε αγκύλες και στη συνέχεια προστίθεται ένας συντελεστής πολλαπλασιασμού μετά από αυτό.
Φυσικά, μπορείτε επίσης να χρησιμοποιήσετε τη μακροεντολή σε όλα τα κελιά ενός πίνακα. Για να το κάνετε αυτό, επιλέξτε όλα τα κελιά πίνακα χρησιμοποιώντας το συνδυασμό πλήκτρων CTRL A πριν καλέσετε τη μακροεντολή.
