Die MS Office-Apps sind sehr intelligent gestaltet und ich sage das nicht, nur weil sie meine Arbeit unendlich erleichtern. Ich sage es, weil es wahr ist. Vor ein paar Tagen haben wir einen Beitrag zum Einfügen von YouTube-Videos in Office 2013 geschrieben und festgestellt, dass die Option in MS Excel nicht vorhanden ist, nur weil sie dort nicht benötigt wurde. Dies ist die Art von Intelligenz, von der ich spreche. wissen, welche Funktionen in einem bestimmten App-Typ benötigt werden. Dadurch wird sichergestellt, dass nichts Unwichtiges in das endgültige Angebot kommt. Ich war jedoch überrascht, als ich herausfand, dass Sie, wenn Sie in Excel mehr Zeilen in ein Arbeitsblatt einfügen können, nicht die Anzahl der Zeilen auswählen können, die Sie hinzufügen möchten. Sie haben andere Problemumgehungen, um dies zu erreichen, z. B. die Anzahl der hinzuzufügenden Zeilen aus den vorhandenen Zeilen auswählen und dann die Einfügefunktion verwenden. Oder Sie können den Schritt zum Einfügen einer Zeile für beliebig viele Zeilen wiederholen. Es wiederholt sich, aber wenn Sie fünf Minuten Zeit haben, kann dieses kleine Makro die Arbeit für Sie erledigen.

Da hierfür ein Makro erforderlich ist, müssen Sie Ihre Datei als makroaktivierte Excel-Datei speichern. Klicken Sie dazu im Fenster "Speichern unter" auf die Dropdown-Liste "Dateityp" und wählen Sie "Excel Marco Enabled Workbook" (* xlsm).

Als nächstes ist es Zeit, das Makro zu schreiben. Gehen Sie zur Registerkarte Ansicht und klicken Sie auf Makros, um einen neuen zu erstellen. Nennen Sie es, wie Sie möchten und klicken Sie auf "Erstellen". Das folgende Fenster wird automatisch geöffnet.

Was hier relevant ist, sind die Zeilen „Sub“ und „End Sub“. Die Sub-Zeile enthält den Namen Ihres Makros, während der End-Sub das Ende der Commnads in diesem Makro markiert. Da Sie es gerade erst erstellt haben, sollte zwischen diesen Zeilen nichts sein, wie in der Abbildung oben. Fügen Sie das Folgende zwischen diesen beiden Zeilen ein.

CurrentSheet als Objekt dimmen 'Alle ausgewählten Arbeitsblätter durchlaufen. Für jedes CurrentSheet in ActiveWindow.SelectedSheets 'Fügen Sie 5 Zeilen oben in jedes Blatt ein. CurrentSheet.Range ("a1: a5"). EntireRow.Insert Next CurrentSheet

Dieser Code fügt fünf Zeilen von ganz oben ein. In dem Code wird es als A1: A5 bezeichnet. Um ihn an Ihre Bedürfnisse anzupassen, müssen Sie diesen Bereich bearbeiten. Der erste Wert dient als Referenz, wo die Zeilen eingefügt werden. Wenn Sie es in A100 ändern, werden die Zeilen nach den ersten neunundneunzig Zeilen eingefügt. Nach dem Setzen des Referenzpunkts müssen Sie die Anzahl der Zeilen eingeben.

Zeilennummern werden durch den Zellbereich A1: A5 definiert. Dieser Bereich fügt 5 Zeilen ein. Um den korrekten Bereich für Ihre Zeilenanzahl zu ermitteln, möchten Sie beispielsweise 25 Zeilen aus A99 einfügen, fügen Sie dem Referenzpunkt 25 hinzu, so dass es sich um A99 und minus einer Zelle davon handelt. Das heißt A100 + 99 - 1 = A198. Sie fügen Zeilen und keine Spalten hinzu, so dass sich nur die Nummer und nicht der Spaltenbuchstabe ändert. Das Makro muss jedes Mal aktualisiert werden, wenn Sie Zeilen enmass einfügen müssen, aber es ist nur eine kleine Bearbeitung und es funktioniert wirklich gut.

Makro über den Microsoft Support

Arbeitete Für Sie: Robert Gaines & George Fleming | Möchten Sie Uns Kontaktieren?

Kommentare Auf Der Website: