From e9698716656d2f8d9ab2fca9d37564d65e961efa Mon Sep 17 00:00:00 2001 From: alanbjohnston Date: Sat, 2 Feb 2019 17:04:12 -0500 Subject: [PATCH] Delete cleanup.bas --- spreadsheet/cleanup.bas | 135 ---------------------------------------- 1 file changed, 135 deletions(-) delete mode 100644 spreadsheet/cleanup.bas diff --git a/spreadsheet/cleanup.bas b/spreadsheet/cleanup.bas deleted file mode 100644 index 9982fb33..00000000 --- a/spreadsheet/cleanup.bas +++ /dev/null @@ -1,135 +0,0 @@ -Attribute VB_Name = "Module1" -Sub Cleanup() -Attribute Cleanup.VB_Description = "Cleans up AFSK telemetry by deleting every other row. Make sure the first row is the timestamp, not the telemetry data." -Attribute Cleanup.VB_ProcData.VB_Invoke_Func = "t\n14" -' -' Cleanup Macro -' Cleans up AFSK telemetry by deleting every other row. Make sure the first row is the timestamp, not the telemetry data. -' - -' - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Selection.Delete Shift:=xlUp - ActiveCell.Offset(1, 0).Range("A1").Select - Rows("1:1").Select - - End Sub