VBScript Excel Exact Formula

FAQ
1

To apply the exact formula between 2 different sheets in Excel

:arrow_down:

Set objXLApp = CreateObject("Excel.Application")
objXLApp.Visible = False
objXLApp.DisplayAlerts = False
Set objXLWb = objXLApp.Workbooks.Open("C:\Robusta\Output\Pivot.xlsx")
Set oSheet = objXLWb.Worksheets(1)  
Set oSheet2 = objXLWb.Worksheets(2)  

Dim rowCount
rowCount = oSheet2.Range("A1").CurrentRegion.Rows.Count


oSheet.Range("D2").Formula ="=EXACT(A2,PivotBackupGuncel!A2)"
oSheet.Range("D2:D" & rowCount).FillDown

oSheet2.Cells(2,4).Value="Exact"

objXLWb.Save
objXLWb.Close
objXLApp.Quit