🎄teratailクリスマスプレゼントキャンペーン2024🎄』開催中!

\teratail特別グッズやAmazonギフトカード最大2,000円分が当たる!/

詳細はこちら
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Visio

VisioはMicrosoft 製品の一つで、 設計図やダイアグラムなど図を書くためのソフトウェアです。

Q&A

解決済

2回答

1044閲覧

(Office Visio)接着していないコネクタを赤く表示する

horiegom

総合スコア152

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Visio

VisioはMicrosoft 製品の一つで、 設計図やダイアグラムなど図を書くためのソフトウェアです。

0グッド

0クリップ

投稿2022/01/17 02:59

Microsoft Visio:シェイプシートを用いることで、コネクタが図形に接着しているか否かでコネクタの色を変えることができないか検討しています。

具体的には、
Line Format - LineColorの条件文に
IF("接着しているかどうか?", 2, 0 )と記載予定です。

接着しているかどうかの判定には

Glue InfoのBegTrigger、EndTrigge
もしくは
1-D EndpointsのBeginX BeginY
の値が使えるのではないかと考えています。

接着している場合

BegTriggerの値
_XFTRIGGER(操作.476!EventXFMod)

BexinXの値
PAR(PNT(操作.476!Connections.Out.X,操作.476!Connections.Out.Y))

接着していない場合

BegTriggerの値
_XFTRIGGER('フロー線.1138'!EventXFMod)

BexinXの値
45mm

従って、条件文は例えば
「BeginXの値が関数PARかどうか」と書ければいいのですが、その方法がわかりません。

関数が記載されているかどうかの判定で構わないと思い、以下の様に書きましたがシェイプシート中ではISFORMURA関数は使えないようです。
IF(ISFORMURA(BeginX),2,0) 

何かいい解決策があれば教えてください。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答2

0

自己解決

=IF(OR(BegTrigger=1, EndTrigger=1), 2,0)

投稿2022/01/17 04:27

編集2022/01/17 04:42
horiegom

総合スコア152

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

0

マクロを使えばいいと思います。

投稿2022/01/17 03:02

jmdajmw

総合スコア349

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

horiegom

2022/01/17 03:04

マクロ以外でお願いします
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.36%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問