Project 2 - Create a report using PowerQuery, Macro VBA, List Functions and Data Validation functions for Data Reporting of Supply Chain Management companies
Section 1
in attachment
section 2
1 case answer:-
=Filter(array,Include,[if empty])
step1 provide array
step2 provide condition
step3 condition not satisfy then write some text (ex. 0)
case 2 and 3 are in attachment
Section 3
Case 1 in attachment
Case 2 answer
Public Sub SaveActiveSheetAsPDF()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\nirva\Documents\gggg.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
End Sub
Case 3 answer
Public Sub HighlightErrorcell()
Dim rng As Range
For Each rng In ActiveSheet.UsedRange
If Not Application.CheckSpelling(rng.Text) Then
rng.Interior.ColorIndex = 6
End If
Next rng
End Sub