Project 2 - Create a report using PowerQuery, Macro VBA, List Functions and Data Validation functions for Data Reporting of Supply Chain Management companies

Link for file

https://drive.google.com/drive/folders/1w_HRkhOURMf8FurXGHtu8pvqNsRESP5U?usp=share_link

Separate Worksheet for data Data Summary

Macros

(To Check Spelling mistakes)

Sub Highlight_Misspelled_Words()
Dim cell As Range
For Each cell In ActiveSheet.UsedRange
If Not Application.CheckSpelling(Word:=cell.Text) Then cell.Interior.ColorIndex = 6
Next
End Sub

(to convert selected data into pdf)

Sub Save_As_PDF()
Dim saveLocation As String
saveLocation = "D:\EXCEL\ExcelPDFFile.pdf"
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=saveLocation
End Sub

(Conditional Formatting, Freezing Panes)

(applying conditional formating to CONTRACT_TYPE and freezing first row and column)

Sub Conditional_Formatting()
Dim MyRange As Range
Set MyRange = Range("C:C")
MyRange.FormatConditions.Delete

MyRange.FormatConditions.Add Type:=xlTextString, TextOperator:=xlContains, String:="Revolving loans"
MyRange.FormatConditions(1).Interior.Color = vbBlue

MyRange.FormatConditions.Add Type:=xlTextString, TextOperator:=xlContains, String:="Cash loans"
MyRange.FormatConditions(2).Interior.Color = vbYellow

Range("B2").Select
ActiveWindow.FreezePanes = True
End Sub