rukuku の回答履歴

いつもお世話になっております Access2007を最近使い始め、以下のようなことをしようとしております。 フォームを作成して、IDという名前のついたリストボックス内にテーブルのデータが2列分表示されるようにしました。 <テーブル> ID　名前　詳細 1　山田　東京都 2　佐藤　神奈川県 3　田中　千葉県 その後、同じフォーム上にテキストボックスを作成して リストボックスで選択したデータの詳細部分が表示されるように テキストボックス内に以下の式を入れました。 =DLookUp("[詳細] ","テーブル","[ID]= " & [Forms]![フォーム]![ID]) すると、テキストボックス内に結果が表示される行とされない行があります。 式のどこかが悪いと思うのですが、どこが悪いのか分かりません。 お手数ですが、ご教示願えればと思っております。 足りない情報がありましたら提示いたしますのでお申し付けください。 よろしくお願いいたします。

ループ処理で、1つのセルに次のように1行ずつ追記するプログラムを作成しようとしています。 ■文字列1 ■文字列2 ■文字列3 　　： セル内で改行したいので、2行目以降はChr(10)でつないでいます。 「文字列」の箇所は黒字でいいのですが、「文字列」の内容によって、「■」の文字色を5色で色分けしたいです。 色は「文字列」の内容によって決まるので、あるときは、1行目の「■」は緑、2行目の「■」はピンク、…であっても、 またあるときは、1行目の「■」はピンク、2行目の「■」は青、…というように、可変です。 そこで、次のようなソースを書いたのですが、うまくいきません。 　For i = 1 to 10 　　out_str = "■" & mojiretsu(i) 　　Cells(i, j).Select 　　outchar_start = Len(ActiveCell.Value) 　　If outchar_start = 0 Then 　　　　ActiveCell.Value = out_str 　　Else 　　　　ActiveCell.Value = ActiveCell.Value + Chr(10) + out_str 　　End If 　　ActiveCell.Characters(Start:=outchar_start + 1, Length:=1).Font.color _ 　　　　= RGB(ReturnColor(mojiretsu(i), RR), _ 　　　　　　　ReturnColor(mojiretsu(i), GG), _ 　　　　　　　ReturnColor(mojiretsu(i), BB)) 　　ActiveCell.Characters(Start:=outchar_start + 2).Font.color = RGB(0, 0, 0) 　Next 　　※ ReturnColor関数は、文字列の内容に応じて、RGBのコードを返す自作の関数です。 1回目のループ終了後は、「■」のみ色がつき、「文字列」は黒字という状態なのですが、 2回目以降のループが実行されると、セルのすべての文字に色が付いてしまいます。 （ActiveCell.Value = ActiveCell.Value + Chr(10) + out_str で上書きしているので、その時点で文字のプロパティが無効になってしまうのでしょうか？？） ちなみに、上のソースでは、説明の便宜上、For文で10回ループさせていますが、 実際はテキストファイルを読込み、そのファイルの行数によって、1セルに書きだす行数が決まりますので、 何行出力させるかは、固定ではありません。 また、追記させるセルも1セルだけではなく、50セルくらいあるうちのどのセルに追記するかをその他の条件により判定しています。 セルの何文字目を何色にするかという情報を別に記憶しておいて、 最後に文字のプロパティを変更させることも考えたのですが、 上記のことを考慮すると、あまりスマートなやり方ではないのかなと思いました。 不慣れなためプロパティの考え方が間違っているだけかもしれませんが、 何かいい方法がありましたら、ご教示お願いします。

エクセルについての質問です。できるかどうかわかりませんがご指導お願い致します。 　　A　 　B　 　C　　 D 　　 E 1　△　 200　 △ 　200　 △の合計（この場合B1＋B4+D1+D2で1000） 2　□　 300　 △　 300 　□の合計（この場合B2+D3で500） 3　○　 500　 □　 200 　○の合計（この場合B3+D4で1100） 4　△　 300 　 ○ 600 A、Cの欄に記号　B、Dに数字　を入れるようにしてありますのでできればこのままの状態での質問です。 A、Cの欄にある同じ記号（例えば△）の横にある（B、Dの欄の数字）の合計を出したいです。 上の図で例えるE１に△の合計（B1＋B4+D1+D2）です。 図では書けないですが、かなり数字と記号があります。（A、Cが100くらい） どれだけ記号と数字が増えても記号ごとの集計ができるような式があれば教えていただきたいと思います。 わかりにくいとは思いますが宜しくお願い致します。

例えば、このようなデータベースが作りたいです。 名前　 趣味 A　　　野球、サッカー、音楽鑑賞 B　　　野球、旅行 C　　　インターネット 趣味の列のように、一つのセルに複数の値を指定したいです。 そして、例えばオートフィルタで野球で絞り込むというような事がしたいのです。 このような事は、エクセルで実現できるでしょうか？ またエクセルよりも適したソフトがあるようでしたら、そちらの紹介もして頂けると幸いです。 どうかよろしくお願いします。

フォトショップ５．５を使用しています。今合成に挑戦しているのですが、コピーペーストまではできました。でも切り取った画像を拡大縮小しようとしたら、縦横の比が変わってしまい、人物が太ったり痩せたりします。拡大縮小を縦横の比を変えないでする方法を教えて頂きたいのです。よろしくお願い致します。

こんにちは。 ショップのアルバイトを初めて3ヶ月の大学4年生です。 初めは生活リズムを整えようと始めたバイトですが、 最近卒業制作、ゼミ、就職活動をしているため忙しく、辞めたいですが、人手不足で辞めると言い出せません。 バイトは学校がない日に8時間フルで入り、行き帰りの時間を合わせると11時間も潰れてしまいます。 ショップなので売上に関して厳しく指導され、さらに4人でお店を回しているため、一人にかかる責任が重いです。 さらに、私のいる前で店長と他の先輩スタッフに悪口を言われ、接客を見て笑われたりします。（売上げはそこそこ取れてるし、最近はミスも注意されることもあまりないのでよく分かりません） 時間も削られるし精神的にも厳しく、バイトのない日まで気を取られてしまって辞めたいんです。他の社員の人は皆体調を崩して病院に通っているほどハードです。 慢性的に人手不足で、お店が回らないので1月のセールは強制的に出なくてはいけないと言われたのですが出たくないです。 せめてセールが終わったらやめたいです。 質問は、 ・店長には契約と違うとよく言われますが、面接では「来年の3月まで続ける」と言っていたのですが辞めれますか？ ・先輩からは「辞めると言ったのに勝手にシフトを入れられるので辞めれない」と聞いたのですが、もしそうされても行かなくてはいけないのですか？ ・辞めるまでの人間関係の対処法などがあれば教えてください。 こんな時期にこんなハードなバイトを始めてしまった事自体がよくなかったと思いますが、どうか上手く辞める知恵を貸してください。

私はフリーでインテリアデザインの仕事をしていて、クライアントにプランを提案したり、フリーペーパーのコラムを担当しています。 いつもお世話になっている建築会社から、セミナーで話をしてほしいと頼まれました。 私がしている提案の事例を交えながら、新築のお客さんに簡単にインテリアについて話してほしいということでした。 パワーポインントで内容は作りこんだのですが、その画面を見ながら話すと支離滅裂になり、 「えーと」とか「あのー」とかばかりになってしまいます。 簡潔明瞭に、しかも笑いをとれるような楽しい話をするにはどうしたらいいか教えてください。

大気圧P、水の密度ρ、重力加速度gとします。 断面積S、高さhの円柱が水に浮いていてxだけ沈んでいます。 この時上面にかかる圧力がPSというのはわかりますが、 なぜ下面には、PS+ρxgの力がかかるのでしょうか？ 大気圧は空気が下に押す力、ρxgは水が下に押す力です。 水中に潜れば下から水圧がかかることはイメージできますが、理屈付けができません。作用反作用でしょうか？ 上に力がかかる理由を教えてください。

携帯電話以外で、ケーブルなどでＰＣから転送したデータを表示できる（文字ぐらいの表示でいいです） 持ち運び可能なディスプレイというか表示機器はありますか？ モバイルPCがあるのですが、高いしそこまでの機能はいらないです。 イメージとしてＰＣから携帯電話に転送して外出中にそのデータを見る感じなのですが、携帯電話以外で

office2003を使用しています。 アクセスのあるテーブルから、エクセルにデータを書き出す際、テーブルを選択→ツール→officelink→excelに出力　をして、データを書き出しています。 上記の作業をエクセルマクロにて実行したいのですが、 エクスプローラー上にある指定のアクセスファイルを開く→該当のテーブルを開く→officelinkを選択→excelに出力を選択　をマクロで自動化することは可能でしょうか？ エクセルマクロは初心者レベルですがコーディングをした経験はあり、上記の自動化方法を調べ中なのですが、マクロにてエクセルとは別のアプリを操作した事が無く、困っております。 ご存知の方、ヒントだけでも結構ですのでお教え下さい。

アマゾンのマーケットプレイスで書籍を出品するのですが、プリンタがいると聞き、安くていいので購入しようかなと 考えています。ヤフーオークションでも購入できるのですが！ パソコンに付随して作動するのか不安ですので入札を控えております。 ちなみにパソコンは、Dell製品で Windows Vistaです。 家電製品店で買おうかと思っています。 本当に安くて、黒色にみ使用可能っていうプリンタありますでしょうか！ EPSONのカラリオみたいに安くても、購入はしようとは おもいません！ 5色入っているので遠慮したいです。それにインクの減りも半波になく早いです。 今まで EPSON ペンタックス キャノン を使用していましたが！ どれもこれも経済効率が悪い「頻度・使ってお箇所が ポイントを抑えて使用したいのに、大幅にインクを使いすぎで無駄が多すぎます」 いいのありますか！

至急VBAが詳しい方教えてください！！ こんにちわ。 マクロ作成の課題を出され、初心者なのでとても苦戦しています。 Do while notを２回使ってマクロを作成したいです。 画像のようなExcelデータがあり、A列(分類)～E列(商品名)までのデータは元から入力されています。 F列(重複)～H列(個数)にデータを入れるマクロを作りたいです。 F列(重複)⇒品名が重複していたら重複と文字を入れる G列(商品名)⇒重複していた商品の名前を反映させる。 H列(個数)⇒重複していた商品の個数を反映させる。 毎日勉強しているのですが、期日が迫っており焦っています。 よろしくお願いします。

下記のように同じセルの中に英数字が入力されています。そして３文字目には様々な記号が入っています。 これを必ず-（ハイフン）に置き換える時のVBAでの書き方を教えて下さい。よろしくお願いいたします。 A02/4567 A02/4568 A02/4569 A02/4570 A02*4571 A02/4572 A02/4573 A02*4574 A02/4575 A02+4576

現在PHPにてメールフォームを作成しております。 フォーム→確認画面→送信という順に作成しています。 フォームの段階でプルダウンを作成していますが、確認画面でフォームの内容(プルダウンの項目)を表示させようとしたときに、そのまま表示されず、1年4月1日などと表示されます。 例→フォームでは1990年04月10日としたら確認画面では1年4月1日。 1990年04月10日のように表示させたい。 確認画面でどのように記述したらよろしいでしょうか? フォームの記述は <?php if (count($_POST) > 0) { $year = @$_POST['year']; $month = @$_POST['month']; $day = @$_POST['day']; } print '<select name="year">' . "\n"; $start = date('Y') -20; $end = date('Y') -10; for ($i = $start; $i <= $end; $i++) { print '<option value="' . $i . '">' . $i . '</option>' . "\n"; } print '</select>年' . "\n"; print '<select name="month">' . "\n"; for ($i = 1; $i <= 12; $i++) { print '<option value="' . $i . '">' . $i . '</option>' . "\n"; } print '</select>月' . "\n"; print '<select name="day">' . "\n"; for ($i = 1; $i <= 31; $i++) { print '<option value="' . $i . '">' . $i . '</option>' . "\n"; } print '</select>日' . "\n"; ?> です。 確認画面のスクリプトは $year = isset($_POST['year']) ? $_POST['year'][0] : NULL; $month = isset($_POST['month']) ? $_POST['month'][0] : NULL; $day = isset($_POST['day']) ? $_POST['day'][0] : NULL; と<?php print h($year[0]) ;?>年<?php print h($month[0]) ;?>月<?php print h($day[0]) ;?>日 です。 またセッションも使用しております。 $_SESSION['year'] = $year; $_SESSION['month'] = $month; $_SESSION['day'] = $day; です。 ご教授お願いします。

エクセル2003で、マラソンのタイムの記録と管理をしたいのですが、例えば、２８分51秒のつもりで28：00と入力すると4：50になります。 記入した蘭を見ると　勝手に「1900/1/1 4:50:00」となっており、どうやら時間ではなく時刻と認識しているようです。 これを分秒にの指示にするにはどうすればよいでしょうか？

エクセル2003で、マラソンのタイムの記録と管理をしたいのですが、例えば、２８分51秒のつもりで28：00と入力すると4：50になります。 記入した蘭を見ると　勝手に「1900/1/1 4:50:00」となっており、どうやら時間ではなく時刻と認識しているようです。 これを分秒にの指示にするにはどうすればよいでしょうか？

温度計の種類として大きく３つに分かれると学びました。 1) 白金測温抵抗体 2) サーミスタ 3) 熱電対 この3つはどのような違いがあるのでしょうか？（原理、利点、欠点） またそれぞれ身近な物で言えばどこに使用されていますでしょうか？ どうかご回答頂けます様、何卒宜しくお願い申し上げます。

この間、PCの不具合からリカバリしたんですが、 保存した画像を表示するのが初期のものになりまして 今使ってるのがとても不便で困っています 前に使っていたものの名前がわからず困ってます 特徴としては ・アイコンの左下に目のマークがついてる ・マウスのスクロールで次の画像に ・フォルダAの画像を開きフォルダBの画像を開くとフォルダAの画像が終わるとBの画像にいく 特徴について質問があればお答えします。 よろしくおねがいします ちゃんと調べてからきたんで、調べろ関係の返答はなしでお願いします

残像ってありますよね？ たとえばＸがＡ地点からＢ地点に行くとして、 Ｘを見ている人がそばにいたとします。 ものすごく速く動けば、 ＸはＢ地点に行っているのに Ａ地点にいるＸがまだ止まっている ように見える残像はあるのですか？ また、残像というのは（最大で）何秒まで伸ばせますか？

オートフィルターで表示してある所だけを対象としてcountifで対象 値の数を出したいのでのですが できますでしょうか? Sub countif() Range("C1") = Application.WorksheetFunction.countif(Range("A:A").SpecialCells(xlCellTypeVisible), Range("B1")) End Sub イメージはこんな感じなのですがよろしくお願いします。