{"title":"ExcelVBA\u3067\u9ad8\u901f\u5316\u306e\u305f\u3081\u306e\u8272\u3005ON/OFF","author_url":"https://blog.hatena.ne.jp/shikaku/","author_name":"shikaku","width":"100%","height":"190","categories":["ExcelVBA"],"image_url":null,"provider_name":"Hatena Blog","type":"rich","url":"https://blog.systemjp.net/entry/2020/07/09/130227","blog_title":"shikaku's blog","description":"Sub Focus(aSheet As Worksheet, aFlag As Boolean) Application.ScreenUpdating = aFlag Application.DisplayStatusBar = aFlag Application.Calculation = aFlag aSheet.EnableCalculation = aFlag Application.EnableEvents = aFlag aSheet.DisplayPageBreaks = aFlag Dim i For i = 0 To aSheet.PivotTables.Count - 1 \u2026","provider_url":"https://hatena.blog","published":"2020-07-09 13:02:27","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fblog.systemjp.net%2Fentry%2F2020%2F07%2F09%2F130227\" title=\"ExcelVBA\u3067\u9ad8\u901f\u5316\u306e\u305f\u3081\u306e\u8272\u3005ON/OFF - shikaku&#39;s blog\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","version":"1.0","blog_url":"https://blog.systemjp.net/"}