VBA 正規表現　複数の文字列の繰り返し　パターン

Quick Edit Pencil 
    Dim v As Variant
    With CreateObject("VBScript.RegExp")    '正規表現を利用する為のオブジェクトを作成
        .Pattern = "^(\d{1,2}r((\d{1})|(\d{1}(15|30|45|00)))(,|$|, )?)+$"   '文字列パターンを設定
         v = .test(Str.Value) '結果を格納
         Debug.Print v
    End With

このブログの人気の投稿

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 »

googleスライドにリンクした表を更新するスクリプト

GASについて質問ですGoogleスライド内にスプレッドシート... - Yahoo!知恵袋 ↑の結果は 2024/7/17 9:34　の情報では 不可能 な様子でした。グラフはできるそうです。 googleスライドのリンクされた図のリンク更新方法 ↑の結果は 2023/06/25 12:30　の情報では 不可能 な様子でした。グラフはできるそうです。 キーワード googleスライド、リンクされたオブジェクトを更新、Google Apps Script
Read more »

googleスプレッドシートで名前範囲内のデータが更新された時にタイムスタンプを更新

function onEdit(e) { var sheet = e.source.getActiveSheet(); var range = e.range; var namedRange = e.source.getRangeByName("YourNamedRange"); // 名前付き範囲を指定 var timestampSheet = e.source.getSheetByName("YourTimestampSheet"); // タイムスタンプを表示するシートを指定 var timestampCell = timestampSheet.getRange("A1"); // タイムスタンプを表示するセルを指定 // 名前付き範囲内のセルが編集された場合 if (range.getA1Notation() === namedRange.getA1Notation() || (range.getRow() >= namedRange.getRow() && range.getRow() < namedRange.getLastRow() && range.getColumn() >= namedRange.getColumn() && range.getColumn() < namedRange.getLastColumn())) { if (timestampCell) { var currentDate = new Date(); var formattedDate = Utilities.formatDate(currentDate, Session.getScriptTimeZone(), "yyyy/MM/dd HH:mm"); timestampCell.setValue("Last Update Date: " + formattedDate); // 書式を指定してタイムスタンプを設定 } } } 名前付き範囲が複数ある場合 func...
Read more »

Macの「写真.app」アプリでオリジナルをFinderで表示するAutomatorサービス

イメージ
できるだけアプリやサードパーティプラグインをインスコしたくないので、写真アプリからオリジナルを表示するAutomatorサービスを書きました。 自分の環境用にパラメータを設定してあるので、必要な方は自分の使っている写真ライブラリ名に変数値を変更して使ってみてください。 マスターをFinderで開く.workflowをダウンロード Google ドライブに公開してますのでダウンロードしてくださ。 インストール方法 ダウンロードした「マスターをFinderで開く.zip」を解凍して「マスターをFinderで開く.workflow」をダブルクリックしてください。 Automatorで開くかインストールするかたずねるダイアログが出るので任意の方法を選んでください。 使い方 写真.appでオリジナルを表示したい写真を選択します。 Automatorで開いた場合 Automatorで「マスターをFinderで開く」再生してください。 インストールした場合 右クリックまたはアイコンから選択した写真の情報ウインドウを選択します。 情報ウインドウのファイル名あたりを右クリックして表示されたメニューから「マスターをFinderで開く」を選択します。 写真ライブラリ名を指定 Automatorで「マスターをFinderで開く.workflow」を開き、AppleScriptが記述されている部分に下記のコードがあるので、赤文字の変数値を自分の環境に合わせた写真ライブラリ名に変更してください。 --ユーザーの設定項目 set pictLib to " 写真 Library " --写真.appで使っているライブラリを指定 --以下編集不要 set pictFol to path to pictures folder from user domain as text --ピクチャフォルダのパスを取得 set pictOrg to ".photoslibrary:Masters" --マスターが保存されているパスを指定 tell application "Photos" set a to selection --写真.app(Photos)上で選択中の写真/ムービーのうち最初のものを処理対象に if a = {} the...
Read more »

Powershell: プロパティの詳細情報インデックスと項目名の列挙

# プロパティの詳細情報インデックスと項目名の列挙 # https://www.google.co.jp/search?espv=2&q=getdetailsof+properties+titles+PowerShell&spell=1&sa=X&ved=0ahUKEwjSzKfYhM7QAhUJXbwKHc4SCfwQvwUIGSgA&biw=1418&bih=941 # https://blogs.technet.microsoft.com/jamesone/2008/12/09/borrowing-from-windows-explorer-in-powershell-part-2-extended-properties/ $objShell = New-Object -ComObject Shell.Application $objFolder = $objShell.namespace(“C:\”) 0..400 | foreach {“{0,3}:{1}”-f $_,$objFolder.getDetailsOf($Null, $_)} 0:名前 1:サイズ 2:項目の種類 3:更新日時 4:作成日時 5:アクセス日時 6:属性 7:オフラインの状態 8:利用可能性 9:認識された種類 10:所有者 11:分類 12:撮影日時 13:参加アーティスト 14:アルバム 15:年 16:ジャンル 17:指揮者 18:タグ 19:評価 20:作成者 21:タイトル 22:件名 23:分類項目 24:コメント 25:著作権 26:トラック番号 27:長さ 28:ビット レート 29:保護 30:カメラのモデル 31:大きさ 32:カメラの製造元 33:会社 34:ファイルの説明 35:マスター キーワード 36:マスター キーワード 37:プログラム名 38:継続時間 39:オンライン 40:再帰 41:場所 42:任意出席者アドレス 43:任意出席者 44:開催者住所 45:開催者名 46:アラーム時刻 47:必須出席者アドレス 48:必須出席者 49:リソース 50:会議の状態 51:...
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 »