vba 結合されたセルの列を隠す

4月 17, 2021

sub セルの名前から列を非表示(myRange As Range)

'    Dim myRange As Range
'    Set myRange = ActiveCell
'    Set myRange = ActiveSheet.Range("名前")

If myRange.MergeCells Then '結合を検証
    
        '結合されている
    
'        Debug.Print myRange.MergeArea.Address
        
        For Each cell In myRange.MergeArea
        
            Columns(cell.Column).Hidden = True
        
        Next
        
    Else
    
        '結合されていない
        
        Columns(cell.Column).Hidden = True
    
    End If

End sub

このブログの人気の投稿

旧エッジの閲覧履歴を検索 MS Edge

9月 22, 2017

旧エッジに関する記事です。エッジから閲覧履歴の検索はできない。エッジの閲覧履歴の保存場所を検索することも無理。現時点での唯一の方法は、アドレスバーに覚えているキーワードやドメインを入力すると閲覧履歴からもリストが表示されます。訪れたサイトのドメインを覚えておく驚異的な記憶力が必要です。追記：Edgeの閲覧履歴を表示するソフトがありました。試してないですが検索も可能な感じです。 BrowsingHistoryView - View browsing history of your Web browsers 履歴を検索できないことを知らずにエッジを使っていた時期の履歴の検索方法は現時点では※上記しかありません。 ※私のスキルと検索力ではですが、バリバリのウインドウズ使いの方はプログラムを書いてエッジの閲覧履歴を検索できるかもしれません。ただし、エッジの閲覧履歴をエクスポートする方法は検討していません。英語の情報も漁ってみましたがやはり無理な感じです。閲覧履歴を検索する方はEdgeを使わない方が幸せですね。解決１、閲覧履歴を検索する唯一の方法はカークさんの答えにありました。検索するリンクの特定のキーワードを思い出すことができれば、アドレスバーに同じキーワードを入力してください。キーワードを入力すると、探している関連リンクを選択すると、オプションのリストが表示されます。これが機能するためには、ヒストリファイルがクリアされていれば、ヒストリリストは元の状態になります。解決２、マイクロソフトアカウントを使っている場合にBingの検索履歴が残っている：ロブあなたのMicrosoftアカウントにサインインすると、検索履歴がクラウドに保存されます。プライバシーと「クリックして検索」に移動します。私はあなたがBingのあなたの歴史をチェックすると、特定のウェブサイトや検索日を検索することもできます。これが少し助けてくれることを願っています。マイクロソフトアカウント＞プライバシー>検索 How can I search my browsing history in MS Edge? - Microsoft Community How do I ...

このブログを検索

TAGO.OK

prettify.css