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

Ans )

Sub SaveActiveSheetsAsPDF()
Dim saveLocation As String
saveLocation = "C:\Users\marks\OneDrive\Documents\myPDFFile.pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=saveLocation
End Sub
 
Ans )

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

https://docs.google.com/spreadsheets/d/1GJeShf44DWNssx3lbZQQj4VfCDku-ZAE/edit?usp=sharing&ouid=109962829966642940250&rtpof=true&sd=true