/ / Ausrichten von Daten in zwei Spalten in Excel VBA - Excel-VBA, VBA, Excel

Ausrichten von Daten in zwei Spalten in Excel VBA - Excel-VBA, VBA, Excel

Ich bin neu in VBA Excel. Ich wollte einen Code schreiben, der Daten in Spalte A an die in Spalte B ausrichtet und dann die leeren Zeilen links löscht Mein Datenbeispiel ist wie folgt:

Unsortierte Daten

Gewünschte Ausgabe sieht so aus.

Sortierte Daten

Antworten:

1 für die Antwort № 1

Angenommen Daten sind wie folgt

Bildbeschreibung hier eingeben

Dann probiere den folgenden Code aus

Sub Demo()
With ThisWorkbook.Worksheets("Sheet7")  "change Sheet7 to your data sheet
.Range("A1:B23").Cells.SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp
End With
End Sub

Ändern Sie den Bereich gemäß Ihren Daten. Dies ergibt das Ergebnis als

Bildbeschreibung hier eingeben