User Profile
Matt_C_Paradox
Copper Contributor
Joined 2 years ago
User Widgets
Recent Discussions
Combining Macro for Refreshing Queries across multiple protected sheets
Hi Im new to VBA so really have very little to go on. I found two scripts, one for refreshing queries in protected sheets and another which runs the former across multiple sheets at once i tried to put the code together as below but was met with a error regarding a "rogue end sub" Private Sub workbook_open() Sub Dosomething() Dim xSh As Worksheet Application.ScreenUpdating = False For Each xSh In Worksheets xSh.Select Call RunCode Next Application.ScreenUpdating = True End Sub Sub RunCode() 'your code here Sub DataRefresh() 'Update by Extendoffice 5/28/2019 ActiveSheet.Unprotect "123" ActiveWorkbook.RefreshAll Application.OnTime Now + TimeValue("00:00:01"), "DataRefresh2" End Sub Sub DataRefresh2() If Application.CommandBars.GetEnabledMso("RefreshStatus") Then Application.OnTime Now + TimeValue("00:00:01"), " DataRefresh2" Else ActiveSheet.Protect "123" End If End Sub End Sub I really have no idea what's gone wrong 😞Solved1.2KViews0likes3CommentsCondition Formatting on Date Values in a Pivot Table
Hi All, I'm attempting to create a live matrix of upcoming due dates, sourced from a series of appended external tables, I have all the connections stable. The final bit (the bit I need assistance on) is using the conditional format "date occurring" on an entity within the "values" section of my pivot table, however, it is greyed out... not happy 😞 I've tried to get around it with greater than/less than/between formatting but the formatting does not highlight cells according to my rules of "=Today()" "=Today()+7" etc... this is what i have right now (ignore the 1900 dates) vs what I want using the conditional formatting: Any tips and tricks would be greatly appreciated 😄1.2KViews0likes0Comments
Groups
Recent Blog Articles
No content to show