Microsoft Office hat eine Menge von programmierten Funktionen helfen Ihnen bei der Automatisierung komplizierte Funktionen und Gleichungen . Es gibt keine programmierte Funktion auf jeder zweiten Zeile in Excel löschen, aber Sie können Ihre eigenen , indem ein Makro in der Visual Basic -Editor zu erstellen. Makros aufzeichnen Befehle , und Sie können sie selbst erstellen . Sobald Sie die richtige Makro können Sie diese Funktion in Excel verwenden, um automatisch zu löschen jede andere Zelle in Ihr Spreadsheet einfach durch Ausführen des Makros auf die markierten Zellen . Anleitung
1
Öffnen Sie eine neue Arbeitsmappe in Excel und geben Sie die Zahl "1" in Zelle A1 . Weiter Zelle A2 und geben Sie " 2 " in Zelle A3 . Wiederholen Sie diesen Vorgang, bis Sie die Zahlen 1 bis 5 eingegeben haben in die Zellen A1 bis A9 . Die folgenden Zellen sollte die folgenden Zahlen : "1" für A1, "2" für A3, "3" für A5, "4" für A7 und "5" für A9
2
Click. "Extras" und wählen Sie " Macro ". Klicken Sie auf " Visual Basic -Editor. "
3
Wählen Sie die Registerkarte "Einfügen" und klicken Sie auf "Module ".
4
Kopieren Sie das folgende Makro und fügen Sie es in der Visual Basic- Blatt :
Sub Delete_Every_Other_Row () TCM-
' . Dimension variables
Y = False' ändern Sie dies auf true , wenn Sie wollen
' löschen von Zeilen 1, 3, 5, und so weiter.
I = 1
Set XRNG = Auswahl
< br >
'Loop einmal für jede Zeile in der Auswahl.
XCounter = 1 To TCM-
xRng.Rows.Count "Wenn Y True ist, dann ...
Wenn Y = True Then TCM-
'... löschen eine ganze Reihe von Zellen .
xRng.Cells ( I) . EntireRow.Delete TCM-
' Ansonsten ...
Else TCM-
' ... inkrementieren ich von einem so können wir durchlaufen Bereich .
I = I + 1 TCM-
End If TCM- < p> ' wenn Y True ist, machen es falsch; . wenn Y False ist, machen es wahr
Y = Nicht Y TCM-
Weiter XCounter
TCM-
End Sub
5
Klicken Sie auf " Schließen und zurück zu Microsoft Excel" , um zu beenden , dann testen Sie das Makro , indem Sie Reihen A1 bis A9 auf der Excel Tabelle, die Sie vorhin sagten. Klicke auf "Extras ", dann " Makro " und klicken Sie dann auf "Makros ".
6
Wählen Sie " Delete_Every_Other_Row " aus dem Makro-Menü und klicken Sie auf "Ausführen". Die abwechselnden Reihen werden gelöscht und die Nummern 1 bis 5 wird nun in den Zellen A1 bis A5 angezeigt werden .