[[20160408202439]]　『別シートの今日の日付にジャンプ』（ハイランド）　ページの最後に飛ぶ

『別シートの今日の日付にジャンプ』（ハイランド）

シート名：入力　のセルA1にハイパーリンク関数を　
シート名：管理　のB列にある今日の日付にジャンプするには？
右クリックでハイパーリンクの挿入だと決まったセルにしかジャンプしません。
ハイパーリンク関数を教えてください。

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

 手抜き回答ですみません。

 「今日　日付　ジャンプ」で検索してみました。
https://www.excel.studio-kazu.jp/kw/estindex/estseek2.cgi?navi=0&phrase=%E4%BB%8A%E6%97%A5%E3%80%80%E6%97%A5%E4%BB%98%E3%80%80%E3%82%B8%E3%83%A3%E3%83%B3%E3%83%97&attr=&attrval=&order=&perpage=10&clip=-1&qxpnd=0&gmasks=-1&prec=0&pagenum=1&similar=0
（カリーニン） 2016/04/08(金) 21:04

 A1セル =HYPERLINK("#管理!B"&MATCH(TODAY(),管理!B:B,0),"飛ぶよ")

（半平太） 2016/04/08(金) 21:06

カリーニン　さま　
半平太　様
ありがとうございました。

検索したらいっぱい出ますね。
で、同じブックにハイパーリンクを張る時は，#をつけます。　　ですね。
（ハイランド） 2016/04/08(金) 21:56

 追加でひとつおたずねします。

 そしてこのハイパーリンク関数を図形に設定できますか？

（ハイランド） 2016/04/09(土) 11:31

 図形は、セルじゃないので、多分無理。

 こんなプロシージャを標準モジュールに書いて、その図形にマクロ登録したらどうですか？

 Sub 飛ぶよ()
     Dim pos
     pos = [MATCH(TODAY(),管理!B:B,0)]
     Application.Goto reference:=Sheets("管理").Range("B" & pos), scroll:=True
 End Sub

（半平太） 2016/04/09(土) 16:03

 こんばんは
 半平太様　ありがとうございます。
 とても便利になりました。
 他でも使えそうです。

（ハイランド） 2016/04/09(土) 19:03

コメント返信：

[ 一覧(最新更新順) ]

[[20160408202439]] 『別シートの今日の日付にジャンプ』（ハイランド） ページの最後に飛ぶ

[[20160408202439]]　『別シートの今日の日付にジャンプ』（ハイランド）　ページの最後に飛ぶ