sabo10atamのプロフィール

@sabo10atam sabo10atam
ありがとう数4
質問数1
回答数2
ベストアンサー数
0
ベストアンサー率
0%
お礼率
100%

  • 登録日2010/03/22
  • JavaScriptのメソッドの呼び出し方について

    asp.netでの開発を想定しています。 JavaScriptを別ファイルにして、その中にあるメソッドを実行したいのですが、 たとえばオンロードだとか、オンクリックの際に呼び出す方法はわかるんですが、 ただ呼ぶ、ということはできないのでしょうか? イメージとしては <div>test</div> <font size ="2">test</font> test(); ↑当然ながら、こう書くとtest();という文字列がそのまま出てくるだけだと 思うんですが、このタイミングでtest();が実行されるようにしたいのです。 (jsの処理はクッキー発行するとかその類) 可能でしたらご教授ください。

  • VBAのコンボボックスについて

    Excelシート(Sheet1)にComboBox1とComboBox2とComboBox3を配置しています。 Sheet1のA列とB列とC列に下記のように「分類」「品目」「生産地」一覧が入力されています。     A     B     C 1  分類    品目   生産地   2 やさい   キャベツ  千葉 3 くだもの  もも     山梨 4 やさい   キャベツ  茨城 5 やさい   じゃがいも 北海道 6 くだもの  みかん   愛媛 ファイルOPEN時に「分類」「品目」「生産地」をそれぞれComboBoxに重複を除いて表示しています。 たとえば、ComboBox1の「分類」で”やさい”を選択されたら、ComboBox2の「品目」は、 重複を除いた”キャベツ”と”じゃがいも”が表示されるようにしたいのですが、どうしたらよいのでしょうか。 下記まではできたのですが、”キャベツ””キャベツ””じゃがいも”と重複データがそのまま表示されてしまいます。 ご教授下さい。 Private Sub ComboBox1_Change() Dim c, first As String ComboBox2.Clear With Worksheets("Sheet1").Range("A2:A30") Set c = .Find(Me.ComboBox1.Text, LookIn := xlValues) If Net c Is Nothing Then first = c.Row Do ComboBox2.AddItem Worksheets("Sheet1").Cells(c.Row,2).Value Set c = .Find Next(c) Loop While Not c Is Nothing And c.Row <> first End If End With End Sub