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

macro for formating and freezing

vba code for spelling check

Public Sub SpellCheck()
Dim Rng As Range
For Each Rng In ActiveSheet.UsedRange
If Not Application.CheckSpelling(Rng.Text) Then
Rng.Interior.Color = RGB(255, 0, 0)
End If
Next Rng
End Sub

vba code for converting excel to pdf

Public Sub convertPdf()
Dim wb As Workbook
Dim ws As Worksheet
Dim Rng As Range
Dim path As String
Dim fname As String

Set wb = ThisWorkbook
Set ws = wb.Worksheets("vbapdf")
Set Rng = ws.Range("A1:N19")
path = "C:\Users\Shivani Gautam\Documents\"
fname = ws.Range("D23").Value & ".pdf"

Rng.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=path & fname, _
IgnorePrintAreas:=True
End Sub

not able to attach file bcz of large size