Es gibt mehrere kurze Makros, die Sie zu Ihrer persönlichen Makro-Arbeitsmappe hinzufügen und dann zur QAT hinzufügen können. In diesem Tipp erfahren Sie, wie Sie die Personal Macro Workbook erstellen, einige Makros eingeben und sie dann den Symbolen in der QAT zuweisen.
Erstellen Sie eine persönliche Makro-Arbeitsmappe
Beginnen Sie mit einer beliebigen Arbeitsmappe. Gehen Sie zu Ansicht, Makros, Makro aufnehmen. Geben Sie im Dialogfeld "Makro aufzeichnen" einen Namen mit einem Wort ein, z. B. "HelloWorld". Wählen Sie Personal Macro Workbook. OK klicken.
Geben Sie Hello in die aktive Zelle ein und drücken Sie die Eingabetaste. Wählen Sie dann Ansicht, Makros, Aufzeichnung beenden. Diese Schritte erstellen eine Personal.xlsb auf Ihrem Computer, in der Sie neue Makros speichern können.
Öffnen Sie den VBA-Editor und suchen Sie Modul1 in Personal.xlsb
Drücken Sie in Excel Alt + F11. (Wenn Sie nicht Alt + F11 haben, können Sie den Befehl Visual Basic zur QAT hinzufügen und darauf klicken.
Ihr erstes Mal im VBA-Editor ist möglicherweise eine riesige graue Fläche. Wählen Sie im VBA-Menü Ansicht, Projektexplorer.
Suchen Sie nach einem Eintrag namens VBAProject (PERSONAL.XLSB). Klicken Sie auf das Symbol +, um es zu erweitern.
Suchen und erweitern Sie Module. Klicken Sie mit der rechten Maustaste auf Modul1 und wählen Sie Code anzeigen.
Sie sehen Ihren HelloWorld-Code. Geben Sie nach dem End Sub eines dieser Verfahren ein.
Sub VeryHideActiveSheet() ActiveSheet.Visible = xlVeryHidden End Sub Sub ShowAllSheets() For Each sh In ActiveWorkbook.Worksheets sh.Visible = True Next sh End Sub Sub UpperSelection() For Each cell In Selection.SpecialCells(2, 2) ' 2, 2 means xlCellTypeConstants, Text cell.Value = UCase(cell.Value) Next End Sub Sub LowerSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = LCase(cell.Value) Next End Sub Sub ProperSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = Application.WorksheetFunction.Proper(cell.Value) Next End Sub Wenn Sie die QAT anpassen, wählen Sie Makros aus dem Dropdown-Menü oben links.
Wenn Sie ein Makro auswählen und auf Hinzufügen >> klicken, wird standardmäßig ein Flussdiagramm angezeigt. Klicken Sie unten rechts auf Ändern. Wählen Sie ein neues Symbol. Geben Sie einen guten Tooltip ein.
Hier ist eine Erklärung zur Verwendung dieser fünf Makros:
- Sehr ausblenden : Arbeitsblätter können sichtbar, ausgeblendet oder sehr ausgeblendet sein. Nur wenige Leute kennen sich mit Very Hidden Sheets aus, da Sie VBA verwenden müssen, um sie zu erstellen. Ein Arbeitsblatt, das sehr ausgeblendet ist, wird in den Arbeitsblättern Start, Formatieren, Ausblenden und Einblenden nicht angezeigt. (Danke an -Sagar Malik)
- Alle Blätter anzeigen : Es ist einfach, 12 Blätter auszuwählen und in einem einzigen Befehl auszublenden. Aber dann ist es ein Einzelfall, die Blätter einzublenden. Dieses Makro blendet alle Blätter ein (einschließlich sehr versteckter Blätter).
- Obere Auswahl : Konvertiert den gesamten Text in der Auswahl in Großbuchstaben.
- Kleinere Auswahl : Konvertiert den gesamten Text in der Auswahl in Kleinbuchstaben.
- Richtige Auswahl : Konvertiert den gesamten Text in der Auswahl in die richtige Groß- und Kleinschreibung.
Vielen Dank an MF Wong für den Vorschlag einiger dieser Makros.
