advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 13164 for 日付 (0.003 sec.)
[[20150128130742]]
#score: 2423
@digest: b00c737ee46e805e8c19b0bdd8c2f4b6
@id: 67157
@mdate: 2015-01-28T12:20:56Z
@size: 2904
@type: text/plain
#keywords: 月!! (14647), subaddress (5728), ク又 (4966), hyperlinks (4313), 付セ (4266), 年m (3109), 間日 (2538), イパ (2538), 月シ (2505), カレ (2257), ーリ (2208), 今日 (2191), 月d (1948), ハイ (1816), evaluate (1641), パー (1617), 各月 (1591), 日付 (1427), hyperlink (1417), レン (1405), ンダ (1238), 日") (1232), 日( (1222), 2015 (1167), ダー (1147), リン (1133), ンク (1113), 示書 (1036), 「今 (1012), 水) (967), ト上 (889), 日」 (812)
『今日のハイパーリンクを選択し飛ぶ』(kiki)
よろしくお願いします。 1日1セルのカレンダーが1年分並んでいるシートがあります。 他のシートには365日付入りの表が1シート1月分で並んでいます。 カレンダーのそれぞれの日には、ハイパーリンクが入っており 他のシートの日付セルとリンクしております。 今考えているのは、カレンダーのトップに 「昨日」「今日」「明日」というハイパーリンク又は マクロボタンを作って、カレンダーを探さなくても 直近の日に飛べるようにできないか…ということです。 シート名に日付を入れていれば =HYPERLINK("#'"&TEXT(TODAY(),"m月d日(aaa)")&"'!A1","今日") で出来ることをここの検索で知りました。 今日の日付をシート内で探し、そこが示しているハイパーリンクへ 飛ぶ…ということが可能なのでしょうか? または、マクロでできるでしょうか? よろしくお願いします。 < 使用 Excel:Excel2010、使用 OS:Windows7 > ---- とんちんかんなレスをしてましたので削除しました。 13:39 (β) 2015/01/28(水) 13:31 ---- あれ。。。? 回答したつもりが。。。 更新し忘れたかも? 「今日」の例。 =HYPERLINK(TEXT(TODAY(),"!#yyyy年m月!!A"""&MATCH(TODAY(),INDIRECT(TEXT(TODAY(),"yyyy年m月!!A:A")))&""""),"今日") ※年間日付のシートから各月シートの日付にリンク。 ※シート名 「2015年m月」みたいな感じを想定。 ※各月シートのA列に日付で、A列にリンク。 (GobGob) 2015/01/28(水) 13:50 ---- このシート上の日付の表示書式はどういうものですか? (β) 2015/01/28(水) 14:17 ---- βさん、GobGobさん 返信遅くなり申し訳ありません。 シート上の表示ですが カレンダーは d 表はm"月"d"日"(aaa)です。 きっとGobGobさんの関数もそのあたりの問題なのでしょうか うまく動きませんでした。(私の説明不足で申し訳ありません) 私も頑張って考えてみます。 (kiki) 2015/01/28(水) 18:51 ---- マクロだとこんな感じでしょうか。 Sub Test() Dim r As Range Set r = Cells.Find(What:=Format(Date, "m月d日(aaa)"), LookIn:=xlValues, LookAt:=xlWhole) If r Is Nothing Then MsgBox "今日の日付がありません" Exit Sub End If If r.Hyperlinks.Count = 0 Then MsgBox "今日の日付セルにハイパーリンクの設定がありません" Exit Sub End If Application.Goto Evaluate(r.Hyperlinks(1).SubAddress).Parent.Range("A1"), True End Sub (β) 2015/01/28(水) 19:12 ---- βさん 試してみました。 日付のある表のシートのA1に飛びますが 日付のあるセルに飛ばすことは可能でしょうか? (kiki) 2015/01/28(水) 19:57 ---- 日付のある表の日付は、どこに入っていますか? 書式が d らしいので、 たとえば 28 なんてのを検索すると、日付じゃない 28 もシート上にありそうで。 (β) 2015/01/28(水) 21:01 ---- ↑「他のシートの日付セルとリンクしております」 これをみていなかった。 Application.Goto Evaluate(r.Hyperlinks(1).SubAddress).Parent.Range("A1"), True これを Application.Goto Evaluate(r.Hyperlinks(1).SubAddress) これで試してみてください。 (β) 2015/01/28(水) 21:20 ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201501/20150128130742.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97034 documents and 608188 words.

訪問者:カウンタValid HTML 4.01 Transitional