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

Quick Edit Pencil 
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

このブログの人気の投稿

PowerShellのGetDetailsOf メソッドでプロパティの詳細情報のID番号と項目名を列挙します

※PowerShell初心者 ※下の方に画像が持つExif情報を列挙する方法もあります。 例えば、あるJPG画像（C:\IMG_0001.JPG）のカメラ機器のモデル名とExifの撮影日時に関する情報が欲しいとします。 1. PowerShellでは、Get-ItemPropertやGet-ChildItemを使いFileInfoプロパティ取ることができます。 $path = "C:\IMG_0001.JPG" Get-ItemProperty $path | Select-Object * | Format-List $path = "C:\IMG_0001.JPG" Get-ChildItem $path | Format-List -property * 結果: しかし、Get-ItemPropert等を使い取ることができるFileInfoプロパティには必要な情報がありません。 そこで、 GetDetailsOf を使い、ファイルプロパティの詳細情報から必要な情報を取得します。 PSPath : Microsoft.PowerShell.Core\FileSystem::C:\IMG_0001.JPG PSParentPath : Microsoft.PowerShell.Core\FileSystem::C:\ PSChildName : IMG_0001.JPG PSDrive : C PSProvider : Microsoft.PowerShell.Core\FileSystem Mode : -a---- VersionInfo : File: C:\IMG_0001.JPG InternalName: OriginalFilename: FileVersion: FileDescription: Product: ...
Read more »

ヤバい！JAPANNEXT WQHD対応 27型ワイド液晶ディスプレイ「JN-IPS2716WQHD」を注文してみた！！！

イメージ
注文翌日にはブツが届き、梱包も本体にもおおむね満足している。通電も映像も設定も問題はない。メーカー対応は未知数だが品物はクールだ。さらに詳しくは下に... 何かと怪しさ満点のJAPANNEXT IPS液晶モニターのJN-IPS2716WQHD 27型 WQHD ディスプレイをアマゾンで注文してみたレポ。２０１６・５・５ JN-IPS2716WQHD 27型 WQHD モニター 60Hz対応ワイド液晶ディスプレイ （2560×1440 ) HDMI/DVIポート搭載 アマゾンが発送するので品物が届かないという不安は無さそうなのでお遊びで注文してみたが...
Read more »

書字方向　横書方向変換スクリプト　左書きから右書きへ（コピペ用途）

左横書きを右横書きへ簡易変換します．（コピペ用途） 変換処理はウェブブラウザだけで完了．ネットワーク通信が発生しないので安心．注，複数行の場合は一行になりそう．また，句読点（符号），顔文字の正確な変換は１００％無理っぽ． 変換する文字列（横左方向→） テスト 変換した文字列（←横右方向） 書字方向　横書方向変換スクリプト　HTMLソース JavaScriptコード 変換する値（横左方向→） <form name="form1"> <textarea cols="50" name="textarea1" rows="5" value="1">テスト</textarea> </form> <input onclick="clickBtn1()" type="button" value="変換" /> <input onclick="clickBtn2()" type="button" value="クリア" /> <p>変換した値（←横右方向）</p> <p id="rtl" style="background-color: lightgrey; box-sizing: border-box; color: darkslategrey; line-height: 1.6; overflow: auto; padding: 1rem; text-align: right;"></p> <script> function clickBtn1(){ // 値を取得 const ta1 = document.form1.textarea1.value; const reversed = [...ta1].reduceRight((p, c) => p + c);// 配列に変換し右から左へたたみ込む。 document.getElementById(...
Read more »

Blender Illustrator のパスを取り込む

イメージ
Blender v 2.49.2 / MacOSX 10.6.4   Illustratorからの書き出しをdxf（書出）とsvg（別名保存）で使い分け。   環境   Blender v 2.49.2 / MacOSX 10.6.4 / Adobe Illustrator CS4   特徴   dxf 縮尺を決めてblenderにインポートできる。 複雑な曲線はちょっと変形されてインポートされる。   svg 縮尺を決めてblenderにインポートできない。 複雑な曲線はきれいにインポートされる。   dxfでの書き出しとインポート   Adobe Illustrator CS4で描いた2Dのパスを、部品としてBlenderに取り込む方法。   Illustrator > 書き出し > dxf   書き出しのダイアログが出るが、デフォルトの設定で問題はない。Blenderはm[メートル]扱い（と思う）なので、必要なら縮尺を合せる。   Blender > インポート > AutoDesk dxf  (.dxf .dwg)   下記のダイアログが出るので、インポートするファイルを選択。部品として取り込みたいので、newSceneはオフにする。取り込みたいレイヤーを指定して、STARTIMPORTボタンを押す。確認して、EXITする。     svgでの別名保存とインポート   Illustrator > 別名保存 > svg   書き出しのダイアログが出るが、デフォルトの設定で問題はない。   Blender > インポート > Paths  (.svg...   Blender v 2.49.2 / MacOSX 10.6.4 / Adobe Illustrator CS4
Read more »

Blender: 辺の長さを数値で指定するアドオン

イメージ
二つのアドオンが見つかりましたが、開発者は同じの方のようです。 二つ試しましたが、どちらも便利に使うことができます。とても重宝します。 距離が入力できるアドオン（2.7用） ブレンダーで設定した単位が反映、 単位（m,cm,mm） を入力値で指定 可能 、入力値に スケールは 反映されない 。 mesh_edges_length.py (ver1) mesh_edges_length_unstable.py （ver2） ダウンロード blender_addons/mesh_edges_length.py at master · peppelinux/blender_addons · GitHub 距離と角度が入力できるアドオン（2.7用） ブレンダーで設定した単位が反映、 単位（m,cm,mm） を入力値で指定 不可能 、入力値に スケールが反映 される。 mesh_edges_length_angle_yi.py ブレンダーフォーラム [Addon] Directly Set Length(edge) and Angle(edges) [v0.2] 日本語の情報 Blender Addon Review: 辺の長さを数値入力で設定できるアドオン（Directly Set Length(edge) and Angle(edges)） – CGrad Project お気に入りの設定
Read more »

AppleScript 改行 コード 置換

改行を置換 returnキーはLF、ASCII character (10)と\nはLF、ASCII character (13)と\rはCR、controlキー + returnキーはラインブレーク   (* テスト文字列を変数にセット *) set str to "1LINE(LF)" & ( ASCII character (10)) & "2LINE(CR)" & ( ASCII character (13)) & "3LINE(LineBrake) 3LINE_2" log " ★生 str: " & str & " ★ " (* ★生 str: 1LINE(LF) 2LINE(CR) 3LINE(LineBrake) 3LINE_2 ★ *)   (*LF 置換 *) set LFstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\n//g'" log " ★ LF 置換 str: " & LFstr & " ★ " (* ★ LF 置換 str: 1LINE(LF)2LINE(CR) 3LINE(LineBrake) 3LINE_2 ★ *)   (*CR 置換 *) set CRstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\r//g'" log " ★ CR 置換 str: " & CRstr & " ★ " (* ★ CR 置換 str: 1LINE(LF) 2LINE(CR)3LINE(LineBrake) 3LINE_2 ★ *)   (* ラインブレーク置換 *) set LAINBLAKEstr ...
Read more »

簡単　YouTube動画をダウンロード、音声のみ保存する方法　2019

初心者も安心 簡単な動画ダウンロード方法、簡単な音声分離、保存方法を解説します。 ウェブブラウザと１つの無料ソフトだけでダウンロードと音声保存が可能です。パソコンはWindowsでもMacでもオッケーです。 使用するソフトは古くからある無料のVLC media playerを使います。 目次 ようこそ VLC media player （ ダウンロード ） （ インストール ） YouTube動画 ダウンロード ※VLC media playerで音声のみへの変換／保存が存可能 （ 準備：動画ロケーションURLの取得方法 ） （ ウェブブラウザで動画を保存・ダウンロードフォルダに保存される ） （ VLC media playerで動画を変換／保存・名前を付けて任意の場所に保存できる ） 音声のみを保存 （ VLC media playerで動画を変換／保存 ） ようこそ ここではパソコン初心方でも、比較的簡単に動画をダウンロードして音声を分離できる方法を解説します。 YouTube動画のダウンロードは推奨できる行為ではありませ。（本来YouTubeのサイトやアプリでオンラインで視聴するのが正統な楽しみ方です。） しかし、自分がアップロードした動画のマスターを失った場合などはダウンロードしてローカルにバックアップしたいものです。 本記事の内容は私的利用に限ります。 VLC media player （ダウンロード） VLCメディアプレイヤーの公式ダウンロード - VideoLAN VLC media playerダウンロードは窓の杜からも可能です。 「VLC media player」定番の無料メディアプレイヤー - 窓の杜 （インストール） インストール方法は、次の解説サイトをご紹介しておきます。 VLC Media Playerのダウンロードとインストール方法 - ぼくんちのTV 別館 Googleの検索リンクも貼っておきます。 VLC media player インストール方法 - Google 検索 YouTube動画 ダウンロード （準備：動画ロケーションURLの取得方法） ウェブブラウザで目的のYouTube動画を表示...
Read more »

Automatorの変数をAppleScript内で使う

Automatorで設定した変数をAppleScript内で変数名を指定することはできない なので、AppleScriptでinputの値を変数に格納する on run {input, parameters} set val1 to item 1 of input set val2 to item 2 of input set cnt to (count of input) end run 参考サイト AutomatorでAppleScriptに値を渡す http://ameblo.jp/softwaredeveloper/entry-11988473204.html AppleScriptのサンプル on run {input, parameters} set pictFol to path to pictures folder from user domain as text --ピクチャフォルダのパスを取得 set searchCha to item 1 of input --Automatorで受け渡された変数値（ファイル名）を取得 set the clipboard to searchCha --クリップボードにコピー return input end run
Read more »