Ένας κωδικός VBA για τη λίστα όλων των προσθηκών στο Excel
Στο Excel, μπορείτε να προσθέσετε ή να εισαγάγετε ορισμένα πρόσθετα για καλύτερη διαχείριση δεδομένων. Όπως γνωρίζουμε, μπορούμε να μεταβούμε στο παράθυρο Επιλογές για να προβάλετε όλες τις προσθήκες, αλλά υπάρχει τρόπος να καταχωρίσετε όλες τις προσθήκες σε ένα φύλλο; Τώρα, σε αυτό το σεμινάριο, παρέχει έναν κωδικό VBA για την καταχώριση όλων των πρόσθετων στο Excel
1. Τύπος Alt + F11 για να ενεργοποιήσετε το παράθυρο της Microsoft Visual Basic for Applications.
2. κλικ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον παρακάτω κώδικα στο κενό σενάριο.
VBA: Λίστα όλων των προσθηκών
Public Sub AllAddins()
'UpdatebyKutools20191031
Dim xWSh As Worksheet
Dim xWB As Workbook
Dim xAddin As AddIn
Dim xCOMAddin As COMAddIn
Dim xFA, xFCA As Integer
Dim xI As Integer
Dim xStr As String
On Error Resume Next
Application.DisplayAlerts = False
xStr = "Addins List"
Set xWB = Application.ActiveWorkbook
Set xWSh = xWB.Worksheets.Item(xStr)
If Not xWSh Is Nothing Then
xWSh.Delete
End If
Set xWSh = xWB.Worksheets.Add
xWSh.Name = xStr
xWSh.Range("A1").Value = "Name"
xWSh.Range("B1").Value = "FullName"
xWSh.Range("C1").Value = "Installed"
For xFA = 1 To Application.AddIns.Count
Set xAddin = Application.AddIns(xFA)
xI = xFA + 1
Range("A" & xI).Value = xAddin.Name
Range("B" & xI).Value = xAddin.FullName
Range("C" & xI).Value = xAddin.Installed
Next xFA
xFA = (xFA + 2)
xWSh.Range("A" & xFA).Value = "Description"
xWSh.Range("B" & xFA).Value = "progID"
xWSh.Range("C" & xFA).Value = "Connect"
For xFCA = 1 To Application.COMAddIns.Count
xI = xFCA + xFA
Set xCOMAddin = Application.COMAddIns(xFCA)
Range("A" & xI).Value = xCOMAddin.Description
Range("B" & xI).Value = xCOMAddin.progID
Range("C" & xI).Value = xCOMAddin.Connect
Next xFCA
Application.DisplayAlerts = True
End Sub
3. Τύπος F5 κλειδί για την εκτέλεση του κώδικα, ένα φύλλο με το όνομα Addins List έχει δημιουργηθεί με όλες τις προσθήκες.
Απενεργοποιήστε τα πρόσθετα κατά την εκκίνηση του Excel
Ενδέχεται να έχετε εγκαταστήσει ορισμένα πρόσθετα στο Microsoft Excel, αλλά τώρα πρέπει να απενεργοποιήσετε ένα καθορισμένο πρόσθετο κατά την εκκίνηση του Excel. Πώς να λύσετε αυτό το πρόβλημα; Η μέθοδος σε αυτό το άρθρο μπορεί να σας βοηθήσει.
Εξαγάγετε και αποθηκεύστε κάθε φύλλο εργασίας ως ξεχωριστό νέο βιβλίο εργασίας στο Excel
Ας υποθέσουμε ότι θέλετε να εξαγάγετε και να αποθηκεύσετε ένα ή περισσότερα φύλλα εργασίας ως νέο βιβλίο εργασίας, πώς θα το αντιμετωπίσετε; Κανονικά μπορείτε να αντιγράψετε κάθε φύλλο εργασίας και να επικολλήσετε σε νέο βιβλίο εργασίας. Αλλά εδώ σας προσφέρουμε μερικά εύχρηστα κόλπα για να το αντιμετωπίσετε:
Εισαγωγή φύλλων εργασίας από άλλο βιβλίο εργασίας
Μερικές φορές μπορεί να χρειαστεί να εισαγάγετε φύλλα εργασίας από άλλα βιβλία εργασίας. Εάν αντιγράψετε το περιεχόμενο των φύλλων εργασίας και επικολλήσετε στο τρέχον βιβλίο εργασίας, χάνει ορισμένα στυλ μορφοποίησης, όπως το ύψος σειράς κ.λπ. Αυτό το άρθρο περιγράφει μερικούς εύχρηστους τρόπους για να εισαγάγετε γρήγορα φύλλα εργασίας από άλλα βιβλία εργασίας με απώλεια δεδομένων και στυλ μορφοποίησης.
Τα καλύτερα εργαλεία παραγωγικότητας του Office
Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%
- Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
- Συγχώνευση κελιών / σειρών / στηλών και τήρηση δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές και άθροισμα / μέσος όρος... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
- Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
- Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
- Αγαπημένα και γρήγορη εισαγωγή τύπων, Σειρά, Διαγράμματα και Εικόνες; Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
- Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
- Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
- Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
- Ομαδοποίηση συγκεντρωτικού πίνακα κατά αριθμός εβδομάδας, ημέρα εβδομάδας και πολλά άλλα ... Εμφάνιση ξεκλειδωμένων, κλειδωμένων κελιών με διαφορετικά χρώματα. Επισημάνετε τα κελιά που έχουν τύπο / όνομα...
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
