エクセルの学校：全文検索：Hyper Estraier：（Mook）

Results of 1 - 1 of about 1215 for （Mook） (0.001 sec.)

[[20150216091107]]: #score: 9211; @digest: 9a2ad8090dba9f4eec8ede338a83bbae; @id: 67281; @mdate: 2015-02-16T04:18:46Z; @size: 2585; @type: text/plain; #keywords: 月!! (21971), 棄在 (15497), 上廃 (15497), 産売 (15497), 畿支 (15241), 残生 (13533), 国支 (12117), 西支 (9777), 東支 (9178), 20141120215113 (7380), 庫[ (7064), 玲） (6676), 近畿 (6267), （玲 (5958), 店80 (5200), 日残 (4692), 店20 (4572), 廃棄 (4445), 支店 (3898), 店10 (3685), 店50 (3099), 中国 (3053), 関西 (3006), 関東 (2444), 月d (1948), sheetactivate (1755), 生産 (1642), 日前 (1630), 稲葉 (1608), scrollrow (1461), 月") (1438), hyperlink (1417); 『日付表へのハイパーリンク作成』（玲）
よろしくお願いします。月名シート（m月d日）が1年分あり、その中に日付の入った定型の表が多数ならんでいます（日付はD列）最初に開ける表からハイパーリンクで「今日」の表へ飛ぶことは可能でしょうか? =HYPERLINK(TEXT(TODAY(),"!#m月!!C"""&MATCH(TODAY(),INDIRECT(TEXT(TODAY(),"m月!!D:D")))&""""),"今日") これでシートまでは行くのですが D:D部分をm月d日(aaa)などの変えたのですがダメでした。よろしくお願いします。＜使用 Excel:Excel2010、使用 OS:Windows7 ＞ ---- 表の形がどうなっていて、どうなれば「うまい」のかわからないです。月別のシートがシート名「2月」だとして、このような表があって「今日」が2/2だったら、どのように「画面に表示」されればいいんですか? ↓ここが画面の始まりとする [D] [E] [F] [G] [H] [I] [ 1] 2月1日前日残生産売上廃棄在庫 [ 2] 関東支店 10 80 70 10 10 [ 3] 関西支店 50 30 50 10 20 [ 4] 中国支店 20 80 50 10 40 [ 5] 近畿支店 80 20 90 10 0 [ 7] [ 8] 2月2日前日残生産売上廃棄在庫 [ 9] 関東支店 10 50 60 0 0 [10] 関西支店 20 60 50 20 10 [11] 中国支店 40 40 60 0 20 [12] 近畿支店 0 80 50 10 20 （稲葉） 2015/02/16(月) 09:48 ---- 中の関数がきちんと動作しているか、確認しながら式を組み立ててはと思います。他にもおかしいところはありそうですが、TEXT(TODAY(),"m月!!D:D") では D列ではなく日付に変換されてしまいます。書式として変換したい部分だけをTEXT で記述し、そのほかの部分は文字列として書いた方が紛れが無いと思います。 =HYPERLINK("#"&TEXT(TODAY(),"m月")&"!C"&MATCH(TODAY(),INDIRECT(TEXT(TODAY(),"m月")&"!D:D"),0),"今日") で、どうでしょうか。 （Mook） 2015/02/16(月) 09:55 ---- 稲葉さん、Mookさんありがとうございます。 Mookさんの関数で無事動きました。稲葉さんのご指摘の部分、2月2日を選択できれば大丈夫ですが確かに、2月2日が画面の下の方に出てしまうと表自体が見づらいことに、動かしてみて初めて気づきました (^_^;) 2月2日を画面のトップに表示させるような方法があると助かりますが…可能でしょうか? （玲） 2015/02/16(月) 11:21 ---- [[20141120215113]] こちらの、ねむねむさんの回答が役に立つかと思われます。（稲葉） 2015/02/16(月) 11:53 ---- マクロ有りなら、VBE の ThisWorkbook に下記、なんていうのも。 Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveWindow.ScrollRow = ActiveCell.Row End Sub （Mook） 2015/02/16(月) 12:04 ---- 稲葉さん、Mookさん大変参考になりました。ありがとうございます。（玲） 2015/02/16(月) 13:18 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/201502/20150216091107.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ