Option Explicit
' Our main subprocedure
Sub ConsolidateCleanAndExport()
' Define our variables
Dim ws As Worksheet
Dim wsMaster As Worksheet
Dim wb As Workbook
Dim rng As Range
Dim LastRow As Long, LastCol As Integer
Dim wsName As String
Dim MyCSVFileName As String
' Create a new worksheet called "Master"
Set wb = ThisWorkbook
Set wsMaster = wb.Sheets.Add(After:=wb.Sheets(wb.Sheets.Count))
wsMaster.Name = "Master"
' Loop through each worksheet in the workbook
For Each ws In wb.Sheets
' Avoid the Master sheet itself
If ws.Name <> wsMaster.Name Then
' Find the last row with data on column 1
LastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
' Find the last column with data on row 3
LastCol = ws.Cells(3, ws.Columns.Count).End(xlToLeft).Column
' Check if the sheet has the necessary structure
If LastRow > 2 And LastCol > 0 Then
' Copy from row 3 down where the first cell isn't empty
' and paste into the last row of Master sheet
Set rng = ws.Range(ws.Cells(3, 1), ws.Cells(LastRow, LastCol))
rng.Copy Destination:=wsMaster.Cells(wsMaster.Cells(wsMaster.Rows.Count, 1).End(xlUp).Row + 1, 1)
End If
End If
Next ws
' Sort the Master sheet by Column 2
With wsMaster.Sort
' Set the range for the sort as all the cells with data
.SetRange wsMaster.Range("A1").CurrentRegion
' Specify that the data has headers
.Header = xlYes
' Specify that the case of the data doesn't matter for the sort
.MatchCase = False
' Specify the direction of the sort
.Orientation = xlTopToBottom
' Specify the method to use for the sort
.SortMethod = xlPinYin
' Apply the sort
.Apply
End With
' Remove duplicates based on Column 1 and 2
wsMaster.Range("A1").CurrentRegion.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
' Export the Master sheet to a CSV file
wsName = wsMaster.Name
' Define the path and name for the CSV file
MyCSVFileName = wb.Path & "\" & wsName & ".csv"
wsMaster.Copy
With ActiveWorkbook
' Save the copied sheet as a CSV
.SaveAs Filename:=MyCSVFileName, FileFormat:=xlCSV, CreateBackup:=False
' Close the workbook that was created when the sheet was copied
.Close False
End With
' Confirmation message box
MsgBox "Data Consolidated and Exported Successfully!"
End Sub
How about APL where overstrike characters mean something different than individual characters. We would need a new (or very old) font library. I learned that on an IBM printing terminal with a type ball that you would change for APL. In APL you seldom used comments and most often entire programs were on just one or two lines. My final project took 3 lines.
I am shocked and saddened that #!/usr/bin/perl was not one of the canonical language choices.
Also, on a personal note, I think that a lot of the messages on here recently have had an unfortunate accusatory tone to them. We should not be spamming the official shipping thread with inflammatory or speculative comments regarding the veracity of updates (e.g. assuming that the customs holdup is in fact a front for manufacturing or supply chain issues). I don’t know what the appropriate forum for those concerns is, but creating a negative/hostile atmosphere, if anything, disincentivizes timely updates from being shared with us. I for one look forward to my uConsole sometime between now and the heat death of the universe; until then, I am content to wait patiently, and check this thread daily for updates.
Not trying to be perfect, just pointing out that yelling at the only person providing updates and calling them a liar is maybe not the best way to get more updates.
I think we’ve all gone through the various stages of grief through the pre-order process. Hopefully whatever the holdup is gets resolved soon.
We’ve seen a couple leaked clips of developers messing around with a uConsole in the past week, which is a good sign. I would love to see more official posts from Hal, and maybe a look at the new alloy chassis.
I thought that the text blade looked great, just about ordered one years ago. I know they shipped a few out. I did a bit of research first, it didn’t look good. There are many startups with pre-order type things. Some make it and some don’t. Not worried about ClockworkPi, I already have a DevTerm, the uConsole will ship when it can.
Well, Although nothing’s concrete yet, I’m merely responding to the desire of seeing product photos, trying to prove with or without them, it won’t make shipping any faster lol.
For official updates, I think it is time to start a dedicated thread in the " Announcement and News" category where only the team can post.
The way this thread is going, users will not receive updates properly.
edit:
We need a place to post concerns and questions, but I believe there should be a separation between that and official announcements.
Yea, all the bitching and complaining is just going to piss someone off and they’ll close the threads again. No one knows when they’ll ship until customs approves everything.
I think the old Wen Ship thread was actually healthy for this community, and closing it caused the issues. People are waiting for a device that’s now 6 months late, and it was a place to commiserate, but also to maintain that excitement. That thread was light and fun. I was really excited to be a part of this community, but when that thread closed I kind of lost that excitement. I still check back here because i want my device, but once i get it i’ll probably play with it for a while and then it’ll end up on a shelf (like the pocketchip) and I probably won’t come back here.
The device being late didn’t damage any good will – most projects like this end up being late. The good will was damaged by 1) lack of communication from clockworkpi (even a periodic note that says “We know you’re excited, we’re working on it” would have been good), and 2) silencing the community (Godzil closing the Wen Ship thread killed this community)
