How to Show Progress on Status Bar using VBA?
The below code will add serial numbers up to 500 in your sheet and along with it will show progress on the status bar. Sub progressStatusBar() Application.StatusBar= “Start Printing the… Read more »
Author Archives: excelgoodies
Open XML File in Excel
Here are the primitive commands to open an XML file in Microsoft Excel. Sub Open_XMLFile() Dim OXML As Workbook Set OXML = Workbooks.OpenXML(“c:\sample.xml”) End Sub Sub Open_XML_File_As_List() Dim OXML As… Read more »
Why Vlookup when there is Index?
Vlookup: The syntax for Vlookup is: VLOOKUP(lookup_value,table_array,col_index_num,range_lookup) Index: The Syntax for Index is: INDEX( array, row_number, [column_number] ) Match: The Syntax for Match is: MATCH( value, array, [match_type] ) Problem:… Read more »
Merge text files using VBA
The below code merges around 50 ascii files into one It uses File System Object and you need to add a reference of Microsoft Scripting Runtime Sub Append_Text_Files() Dim F1… Read more »
How to Reverse the Text in a Cell?
All you have to do just enter “reverse” function in a cell and refer to the cell in which you have text which you want to reverse. Public Function reverse(ByVal… Read more »
How to convert Text to Speech using VBA?
Just select a range and run this code, excel will speak all the text what you have in that range, cell by cell. Sub Speak() Selection.Speak End Sub Do wonders… Read more »
How to save each Worksheet as a single PDF?
The below code will let you save each Worksheet as a single PDF Sub SaveWorkshetAsPDF() Dimws As Worksheet For Each ws In Worksheetsws.ExportAsFixedFormat xlTypePDF, “ENTER FOLDER NAME HERE” ; ws.Name… Read more »
Add a calculator to the Excel toolbar
There’s a calculator in Excel 2010 but by default this feature is hidden, to get the calculator on your Excel screen navigate to Quick Access toolbar options, it’s the down… Read more »
How to highlight cells with mis-spelled words using VBA?
The below code will check each cell from the selection and highlight the cell where is a misspelled word. Sub HighlightMisspelledCells() Dim rng As Range For Each rng In ActiveSheet.UsedRange… Read more »
How to Repair Excel Workbook using VBA?
The following code uses VBA to open and repair the workbook (the option available using Excel Open Dialog) Sub OpenAndRepairWorkbook() Dim oWB As Workbook On Error GoTo Err_Open Set oWB… Read more »