Excel Macro to Merge multiple Spreadsheets to one Workbook

Have you ever had several spreadsheets that have different content but they have have same characteristics (Rows different but columns are same)

This is an excel macro that will import all spreadsheets in a given directory into s single spreadsheet with all the data in one workbook.

To execute the code in excel (from a bland spreadsheet) from the Excel Ribbon: View > Macros > Provide Macro Name > Create

Sub simpleXlsMerger()
Dim bookList As Workbook
Dim mergeObj As Object, dirObj As Object, filesObj As Object, everyObj As Object
Application.ScreenUpdating = False
Set mergeObj = CreateObject("Scripting.FileSystemObject")


'change folder path of excel files here
Set dirObj = mergeObj.Getfolder("c:\folder\path")
Set filesObj = dirObj.Files
For Each everyObj In filesObj
Set bookList = Workbooks.Open(everyObj)


'change "A2" with cell reference of start point for every files here
'for example "B3:IV" to merge all files start from columns B and rows 3
'If you're files using more than IV column, change it to the latest column
'Also change "A" column on "A65536" to the same column as start point
Range("A2:IV" & Range("A65536").End(xlUp).Row).Copy
ThisWorkbook.Worksheets(1).Activate


'Do not change the following column. It's not the same column as above
Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial
Application.CutCopyMode = False
bookList.Close
Next
End Sub

Then Run the Macro and all the excel files located in the c:\folder\path will be merged into one worksheet

Update Ubuntu from command line

Instead of using the UI I do a lot of the administration from command line. These are the commands you must enter a Ubuntu Linux Command Prompt to update/patch your server.

sudo apt-get update # Fetches the list of available updates sudo apt-get upgrade # Strictly upgrades the current packages sudo apt-get dist-upgrade # Installs updates (new ones)

How to cleanup unused kernels from /boot

This is very handy command that I run maybe once or twice a year or when I need to clean up space off the /boot partition on my Linux Servers.

dpkg -l 'linux-*' | sed '/^ii/!d;/'"$(uname -r | sed "s/\(.*\)-\([^0-9]\+\)/\1/")"'/d;s/^[^ ]* [^ ]* \([^ ]*\).*/\1/;/[0-9]/!d' | xargs sudo apt-get -y purge

How to list empty Directories via powershell

I had a need the other day to list directories that was empty. This code does just that.

(gci C:\Scripts -r | ? {$_.PSIsContainer -eq $True}) | ?{$_.GetFileSystemInfos().Count -eq 0} | select FullName

(replace C:\Scripts with the root directory)
Output example:

FullName ------- C:\Scripts\Empty C:\Scripts\Empty Folder 2 C:\Scripts\Empty\Empty Subfolder C:\Scripts\New Folder\Empty Subfolder Three Levels Deep