User Profile
Matt_C_Paradox
Copper Contributor
Joined Jan 17, 2023
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.3KViews0likes3CommentsCondition 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.4KViews0likes0Comments
Recent Blog Articles
No content to show