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

https://docs.google.com/spreadsheets/d/1X8YunZPSontqDoyhyxXK09IY3YBeNUfa/edit?usp=sharing&ouid=105959610555889487241&rtpof=true&sd=true

3) !!)

Public Sub VBACodeConvertPDF()

Dim saveAsPDF As String
saveAsPDF = Application.GetSaveAsFilename( _
InitialFileName:=ThisWorkbook.Path & "\", _
FileFilter:="PDF Files (*.pdf), *.pdf", _
Title:="Save Selection As PDF")

If saveAsPDF <> "False" Then
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=saveAsPDF, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End If

End Sub

-------------------------------------------------------------------------------------------------------------------------

3) !!!)

Public Sub SpellingMistakes()
Dim MyRange As Range
Set MyRange = ActiveSheet.UsedRange
MyRange.CheckSpelling SpellLang:=1033
End Sub