| |
▼hiros2048 さん：
>さらにもっと楽な方法として、このセルのHyperlink関数を
>直接実行する方法は無いでしょうか?
Hyperlink関数は、リンクを内部的に設定するもので、
実際のジャンプ命令ではありません。
Hyperlink関数を直接実行する、とうことの意味がわかりません。
>hyperlink関数は以下のようなもので、実際の参照セルアドレスを求めるのはかなり面倒なマクロが必要です。
>=IF(B4="","",HYPERLINK("#sheet2!"&CHAR(64+COLUMN(D$3) )&ROW(A4),B4&"sheet2リンクへ"))
条件の後出しはやめたほうがいいですよ。
そのような規則的なルールがあるのなら、
式の意味を考えれば、ジャンプ先を求めるのは簡単です。
行と列それぞれの、その式が書かれているアドレスに対する相対位置が
決まっているのですから、文字列を解析しなくても導き出せます。
シートも可変なら、そこは""の中を調べなければならないかもしれませんが、
それは提案のあった方法を少し変えるだけです。
>このような方法を調べている理由は視覚障害の方がセルを選択した後そのセルから別シートのセルにジャンプするとき、そのセルにきた時(セル位置は読み上げてくれるの音声で判ります)エンターを押してジャンプするようのしたいためです。クリックしてジャンプする現在のHyperlink関数の方法では、目で見てマウスでポイントしてクリックする必要があるため、見えない人にはクリックできないからです。
>もし何かもう少し簡単にできる方法があればよろしくお願いします。
今の
Application.OnKey "{Enter}", "JumpHyperLink"
を使う方式の代案ということですか？
もう少し「簡単にできる」ということの意味を明記してください。
キー操作だけで行うなら、Enterが適当かどうかは別として、
なんらかのショートカットに割り当てるのが自然だと思います。
|
|
hint
- 12/2/17(金) 17:06 -
