Dim wkb As Workbook Dim wks1 As Worksheet Dim wks2 As Worksheet Dim rng As Range Set wkb = Application.ThisWorkbook 'turn off updates to speed up code execution -> With Application .ScreenUpdating = False .EnableEvents = False .Calculation = xlCalculationManual .DisplayAlerts = False End With Set wks1 = wkb.Sheets("Sheet9") Set wks2 = wkb.Sheets(Sheet17)
|Troubleshooting a Worksheet Graphic||8||25|
|Formula or Macro to determine variance||17||75|
|Filling Blank Cells||14||19|
|Copy/paste a range in one worksheet from the same row when a cell in an identified column changes from blank.||10||25|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
12 Experts available now in Live!