- ベストアンサー
リストボックスの選択をURL名に反映
kappa_nekoの回答
こんな感じかな？ <html> <head> <script> function jump_(){ with(document.form1){ article_ = article[article.selectedIndex].value; day_ = day[day.selectedIndex].value; url = 'http://test.com/hin_' + article_ + '_day' + day_ + '.html'; // alert(url); window.open(url); } } </script> </head> <body> <form name="form1"> <select name="article"> <option value="AAA">商品A</option> <option value="BBB">商品B</option> <option value="CCC">商品C</option> <option value="DDD">商品D</option> </select> <select name="day"> <option value="1">1日</option> <option value="2">2日</option> <option value="3">3日</option> <option value="4">4日</option> </select> <button onclick="jump_();">表示</button> </form> </body> </head>
関連するQ&A
- リストボックスでデータを呼び出し→修正を反映させる方法を教えてください
マクロ初心者です。（エクセル２００３使用＿ユーザーフォーム） リストボックスで表示した行のデータをユーザーフォームに呼び出し、修正を加える方法を教えてください。 （Sheet1のデータ） 客先 管理番号 品名 注文数量 出荷数量 出荷日 完納状況 Ｇ社 1324 パソコン 30 20 Ｋ社 1554 プリンタ 250 70 8月9日 Ｊ社 7634 テレビ 40 25 Ｋ社 4653 パソコン 75 75 6月4日 完納 Ｇ社 6675 パソコン 170 60 Ｇ社 7789 プリンタ 200 120 表の行数は、日々変動し、出荷日や完納状況欄は、分かり次第記入や変更をするため、空白の箇所もあります。 （コマンドボタン１まで動く（日付が数字になってしまうが）コード） Private Sub UserForm_Initialize() With ListBox1 .ColumnWidths = "50;50;50" .ColumnCount = 2 .RowSource = "Sheet1!A2:G" & Worksheets("Sheet1").Range("G" & Rows.Count).End(xlUp).Row End With End Sub →リストに表示されるが、本当は＜管理番号＞と＜品名＞を表示させたいです。（今は、客先と管理番号です） Private Sub CommandButton1_Click() TextBox1.Value = ListBox1.List(ListBox1.ListIndex, 5) →日付が数字ででてしまいます。 TextBox2.Value = ListBox1.List(ListBox1.ListIndex, 6) End Sub Private Sub CommandButton2_Click() TextBox1.Value = ListBox1.List(ListBox1.ListIndex, 5) →動きません。 TextBox2.Value = ListBox1.List(ListBox1.ListIndex, 6) →動きません。 End Sub 空白は、空白のまま表示させたり、修正したいと思っています。 （例 管理番号1554の日付を８月１４日にのみ修正したい時、そこは修正し、完納欄は空白のまま表示され、空白の状態でコマンド２を押すことができてほしいということです） すみませんが、どなたかご回答よろしくお願いいたします。
- 締切済み
- Visual Basic
- ACCESS2003 リストボックスについて教えて頂けませんか？
こんにちは、何度も助けていただいているのですが、 また、わからないことがありまして進めなくなってしまいました。 どなたかアドバイス頂ければと思います。 現在Access2003にて会社の勤務表を作成するという課題に 取り組んでおります。 今回の疑問点は 入力用のフォーム フォーム1にはユーザー名コンボボックス、 日付Calendarコントロール、出社時間、退社時間、作業時間、 作業内容テキストボックス、登録、クリアコマンドボタン、 勤務状況表示リストボックスの各コントロールがあります。 登録をする際には各コントロールを選択ないし入力をし、 登録ボタンで各コントロールの値を勤務状況表示リストボックス に表示するようになっています。（1日分の登録を1行で表示。 登録状況に関わらず1ヶ月毎に表示しているので、まだ何もしていなく ても1ヶ月分の31行が表示されており、毎日登録をしていくことで 時間などがうまっていくようになっています。） ここまでは何も問題ないのですが、 勤務状況表示リストボックスに表示されている任意の日付、 例えば8日の行を選択した時に8日の行に表示されている ユーザー名、日付、出社時間、退社時間、作業時間、作業内容を 入力をした各コントロールと連動し表示させるようにしたいのです。 いろいろ調べてはいるのですがなかなかいい方法が見つかりません。 今の段階では1日の行しか選択できない状態です。 どなたかよい方法をご存知ありませんでしょうか？ よろしくお願いします。
- ベストアンサー
- その他(データベース)
- Excel 2002 excelでHTMLページを作成しています。選択した項目によって表示/非表示とする行を変える方法を教えて下さい
excelでHTMLページを作成しています。 HTMLに変換後、ブラウザにて表示・操作することを考えています。 内容は、フローチャートのようなものです。 ユーザの選択した項目によって、表示/非表示とする行を変えたいと思うのですが、方法が分からず困っています。 良い方法を教えて下さい。 内容がフローチャートであるため、「オートシェイブ」が入っている行についても表示/非表示の対象にしたいです。 例： (1)Ｗｅｂページが表示 （excelで作ったページ） ・ユーザの選択項目を表示 例： Ｘはこちら Ｙはこちら Ｚはこちら ・他の全行は、表示されている (2)ユーザが、選択項目を選ぶ（例：自分の選びたい項目をクリック） 例：「Ｘはこちら」をクリック等 (3)選択項目に応じて、表示される行が変わる（同じページ） 例： Xを選択した場合 すべての行を表示（(1)と変わらない） Yを選択した場合 ５行目だけを非表示 Zを選択した場合 ５行目と７行目を非表示 説明が舌足らずかもしれません。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- セルを選択するマクロ(エクセル)
Sub test() x = ActiveCell.Row y = ActiveCell.End(xlToLeft).Column z = ActiveCell.End(xlToRight).Column Range(Cells(x, y), Cells(x, z)).Select End Sub アクティブセルが含まれている行のみで、データが入力されている連続したセルを選択状態にするマクロとして、上記を考えました。 上記を違った形でもっと簡潔に表すことは可能でしょうか？
- ベストアンサー
- オフィス系ソフト
- エクセル 選択するマクロ
a列に日付があります。 c列の、a列のx日から6日後までの計7日間の行 (ただし、6日後の日付がa列にない場合、6日未満の一番近い行) を選択するマクロの構文を教えてください。 わかりにくい表現ですみません… x日を2013/01/01とした場合、選択範囲は画像のとおりです。 どうぞよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCELコンボボックスに表示されません。
ＥＸＣＥＬでユーザーフォームの中にコンボボックスを作りました。日付を選択したいので「１１月１日、１１月２日・・・」とズラズラ表示されるのですが選択するとコンボボックスに表示されるのは「３８６７０」などの数字が表示されます。ここにちゃんと日付を表示するにはどこを変えたらいいでしょうか？ やり始めたばかりの初心者で質問内容が幼稚かもしれませんが、宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- 日付の入ったセル範囲から、ある日付を選択したい（再
今日、表題のとおりの質問に次のとおり教えていただきました。 自分としては、８月の21でなく、９月の２１を選びたいです。 Sub 日付選択() Range("AL4:CU4").Select Selection.Name = "日付範囲" Range("日付範囲").Find(What:=Day(Range("AJ2")), LookIn:=xlValues).Select End Sub セルAJ2には、2015/9/21が入っています。 AL4からCU4には ８月18日から10月17日の間の、日にちだけが、はいっています。 上のコードを実行すると、８月21日を選択します。 これを9月21日のところを選択するようにしたいです。よろしくご教示お願いします。
- ベストアンサー
- Visual Basic
- エクセルのハイパーリンクのシート名の一括変更
お世話になります。 エクセル2010で、シート上部の７×5の35個のセルにその月の1から35日間のカレンダーを作りました。（左上のセルに日付を入れて「そのセル＋１」をコピーして簡単にその月の1日から35日先まで日付を埋めました。 そのカレンダーの日付をクリックすると所定のセルにジャンプするように35回リンクを貼ったのですが、そのシートをコピーして12か月分のシート作るとリンクが最初のシートのカレンダーの当該日にジャンプしてしまうことに気付きました。 各シートのハイパーリンクのリンク先のシート名をせめて１シート毎に、リンク先のシート名を一括で変更できない者でしょうか？ 35回Ｘ11枚のシートは気が遠くなりそうです。
- ベストアンサー
- Excel（エクセル）
- アクセスで折れ線グラフを作成。日付表示
テーブルに品名、計測日、大きさ、重さ、糖度などの項目があり、 折れ線グラフをグラフウィザードで作成しようとしています。 アクセスは2002です。 選択クエリで各品名を選び各品名ごとにグラフを作成したいので クエリでやってみるのですが軸を計測日にすると大きさ、重さ、糖度が 合計や平均でしか選択できません。 軸をドラックせず大きさや重さを選択するとうまくいくのですが ざっくりの日付でもいいので表示したいのですが調べても分からず困っています。 どうかご指導お願い致します。
- 締切済み
- オフィス系ソフト
- リストボックスで選択してさらにリストボックスで選択
都道府県のリストボックスを作って、たとえば北海道を選択したら北海道の市町村が出てくるようなのを作りたいのですが、やり方がわかりません。。 どうしたらいいですか？
- ベストアンサー
- CGI
お礼
うまく行きました。 すばらしい回答をありがとう御座いました。