-yellowtail- の回答履歴

社内文章の表を作成しているのですが、あまりにもデータ量が多く、関数での算出が難しくなってきたので、 マクロを導入したく思っているのですが、検索しても当てはまるものが無く、困っています。。。 　｜　A　　｜　B　　｜　C　　｜　D　　｜　E　　｜　F　　｜　G　　｜　H　　｜　I　　｜　J　　｜　K　　｜ １｜名称1｜名称2｜数量　｜種類1｜数量1｜種類2｜数量2｜種類3｜数量3｜条件1｜条件2｜・・・ ２｜　　　　｜　　　　｜　　　　｜　　　　｜　　　　｜　　　　｜　　　　｜　　　　｜　　　　｜　(1)　｜　(1)　｜・・・ ３｜*****｜*****｜*****｜***** ｜***** ｜*****｜*****｜*****｜*****｜ (2)　 ｜ (2)　 ｜・・・ 上記のような表があり、今までは関数にて、(1)のセルに検索条件を入力し、(2)のセルに「=SUMIF(D2:H2,A2(1),E2:I3)という式を入れ計算していました。 種類1～種類3に入力されている情報と(1)が合致したら、数量1～数量3を合計した値を(2)へ記入したいのです。 この検索条件が60項目あり、行数も2000行を超えているのですが、、全てのセルに関数を入れている状態です。

『よくある質問』で、まだ回答が無いものであれば、マイページから削除できるとありますが、できません。なぜでしょうか？

いつも恋愛をすると、独りよがりな考えになってしまったり、周りの意見を聞かずに結果、したくもない失敗をする事が多いです。 なので今回はなるべく多くの人の助言を聞いて明るく！楽しく恋愛したいと思い、相談させていただきました。 今回私は、以前から素敵だなと思っていた先輩の町に 遊びに行こうと計画しているのです。 というのは、ふとしたきっかけで先輩と1年ぶりにメールした際に、 「こっちに来たら連絡ちょうだいね～」 という風に言ってもらえました。 彼のことをもっと知りたいと思っていた私にとって その言葉はとても嬉しく、社交辞令だったとしても なんらかの発展のきっかけになるかも！と意気込みました。 そこにタイミングよく、彼と同じ県内に住む友人の家に 私が遊びに行くことになりました。 彼とも共通の友人なので、一緒に飲みにでも行きましょうという 計画を立て中です。 ・・しかし私の悪いクセで、恋がはじまるとマッハで独走してしまうのです。大切な恋の始まり、勝手にひとりで燃え上がりすぎてせっかくのチャンスを逃す事はしたくないのです。 彼とは2人きりで話したこともなく、関係の濃さは他人の次のランクくらいです。でも、今回遊びに行ったことによって なるべく良い印象を残し、 もっと親密な仲になれたらいいな、と考えています。 皆様の空いた時間にどんな小さな事でもかまいませんので、 自分ならこうする、や　これはしないほうが良い、 こうされたらドキっとくる！　などなど 上手くいく戦法をアドバイスしていただけたら嬉しいです★ ちなみに彼は、 ・1つ上です ・社会人なり立てで一人暮らしをしているようです ・彼女がいるかどうか分かりません←以外と重要な事が分かっていませ　んね　笑 ・会社がキツい　と言っていました

昨日のことなのですが、 金曜～土曜にかけて先週から彼の家にお泊りするという約束になっていました。 で、私も彼も夕方まで仕事。 私は急遽仕事が長引いてしまい、彼に「少し遅くなる」とメールしました。（といっても何時に行くという約束までしてませんでした。） そして仕事が終わって準備して、いざ出発と思い、駅へ向かいました。 すると彼から、「大学時代の友達がこれからうちに来るっていってるんだ。どうしよう・・・」 というメールがきました。 内心、どうしようって、どういう意味？とおもってしまいましたが、私のほうがずっと前から約束してたので、優先してもらえるかな？と思い、とりあえず電話したんです。 私：「友達くるの？」 彼：「うん、お前も来る？」 私：「気まずいよ。」 彼：「そっか・・・（沈黙）」 私：（試しに）「今日私行かないどこうか？」 彼：「うーん・・・そうだな～（沈黙）また次の機会に来る？」 ということで、私より友達の方を優先されてしまいました。 ちなみにその友人というのは男女で、どうやら彼の家に行きたいと言い出したのはそのメンバーの中の女の子のようです。 それを聞いてすごくショックでした。 前から約束してた私よりも友達（しかも女もいる）を選んだんだなと。 その時は私は、 「私はいつでもいけるし、いいよ。気にしないで」 といい電話を切りました。それから電話を切った後に何もメールもなく。 昨日までは彼は 「今日お前が来るの楽しみにしてるから！」とメールでくれ、私よりむしろ彼の方が楽しみにしてただったのでショックが大きいです。 私ってそれだけの存在？ これが例えば仕事でのお付き合いの飲み会だったら素直に 「気にしないで」といえたのですが、何だか複雑です。 今日までメールは来てません。 今日はこの時間仕事があると言ってました。 ただきっと仕事が終わったらいつものように「終わったよ～」とメールが来るのかな・・・とおもうと、返事を返したくない、彼を怒ってる自分がいます。 こんな私はおかしいですか？ヤキモチやきでしょうか？ 皆さんのご意見お聞かせください。

助けて下さい！ 来月の彼女の誕生日を祝うため、六本木周辺で、オーブンや食器なども付いていて本格的に料理が出来るホテルを探しています。 ドラマ「電車男」で、電車男扮する伊藤淳史がエルメス扮する伊東美咲のために予約したホテルが僕の中でのイメージなんですけど、どこか適当な場所を知りませんか？もし知っていたら、初めての記念日にあたるデートを無事成功させるためにも是非教えていただけたらなと思っています。 完全に自分のためで申し訳ないのですが、どうかよろしくお願いします！！僕を男にしてください！！

管理表.xlsのブックにシートが１月～１２月まで１２枚あります。 ２月シートに作成したマクロボタンで,１月シートの[Ａ１：Ｂ３０]をコピー　→ ２月シート[Ａ１：Ｂ３０]に貼り付けたいのですが、 「新しいマクロの記録」でそれを行うと、２月シートが開いている状態で １月シートのコピー元を範囲指定するときに、１月シートが表示されてしまします。 これを１月シートを表示させずにコピペするにはどのようにすれば良いのでしょうか。 解りずらい説明で申し訳ありません。 「新しいマクロの記録」しか使ったことがなく、全くの初心者ですがよろしくお願いします。

最近、片思いの女の子とよく遊びます。 それはそれはよく遊ぶもので、最近「遊ぼう」と言って会ってもネタ切れで何をしてよいやら・・・。 あ、ちなみに年は１９歳です。 そもそも皆さんは「遊ぶ」といっても何をしますか？ ・食事 ・遊ぶ(ボーリング・カラオケ・スポッチャ・映画) ・運動（一緒にジム行ったり、ランニングしたり） ・ドライブ（夜景を見に行く） ・買い物（各地のショッピングモールや下北沢みたいなところで） ・一緒に温泉に行く ざっと上のことはもうしてしまいました。 温泉に行ったり、ランニングしたりなんてことはホント何度も何度もしています。割とよく使うネタではあります。 上で「遊ぶ」に部類した、カラオケやボーリングなんかも何度も行っているのですが、彼女も彼女で友達とだっていくので、そう年中誘えるネタでもなく・・・。 ショッピングしようにもお互いお金もそんなにない。 夜景を見に行こうにも、ガソリン代も今高く、年中見に行っているので夜景スポットもネタ切れ中・・・。 彼女彼氏の関係でもないので、なかなか自宅に呼んで遊ぶというのも無いんですよねぇ。 僕は彼女といる時間が、人生のどの瞬間よりも幸せだと感じていて、一緒にいられればそれでいいのですが、彼女はそうでもない様子。 遊ぼうと誘えば「何して～？」とメールが返ってきます。 無計画に遊ぶのが嫌いだそうで、会ってから「どうしよっかー」ってなるのがイヤみたいです。 友達という関係から発展してみようとは思ったのですが、実はフラれてしまいました。 フラれてからも結構遊んでいて僕自身あきらめていません。 そういう話は置いておいて・・・。 そんなわけで、彼女と一緒にすごす時間を楽しむためにはネタが必要。 皆さんは「遊ぶ」っていうと何をしますか？ 上記以外で「私はこんなことよくするよ」とか、「あそこの駅前はアレもあって、アレもあって遊べるよ」なんて回答お待ちしております。＾＾

現在使用しているエクセルのブックがあり、ブック名はA(Ver1.0)とします。 このブックにApplication.Run "'A（Ver1.0）.xls'!(1)"…Application.Run "'A（Ver1.0）.xls'!(20)"というマクロがあります。 ブック名をマクロ実行前に必ず変更しなければならなくて、そのブック名は毎回違ったものになります。 わざわざブック名を変更せずに、現在開いているブックのマクロを実行するという風にしたいのですがどうしたらいいですか？ よろしくお願いします。

宜しくお願いします。 例えば、 　│Ａ　Ｂ　Ｃ　Ｄ　Ｅ 　┼─────────── １│　　イ　ロ　ハ　ニ ２│あ ３│い ４│う ５│え 　│ と文字列が入っているとします。 そこで セルB9 に =B1&A2 セルB10に =C1&A3 セルB11に =D1&A4 セルB12に =E1&A5 という数式を入れます。 すると セルB9 =イあ セルB10 =ロい セルB11 =ハう セルB12 =ニえ と表示されると思います。 そこで質問です。 セルB9～B12の数式をそのままセルD9～D12に一括コピー したい場合、どのようにすればよいでしょうか? 予め$を使えば(セルB9に =$B1&$A2など)簡単かと思いま すが、$を使わず　編集→形式を指定して貼り付け　などで コピーする方法はありますか?

PowerPointの質問です 音読説明文章を手元操作PCだけに表示して、スクリーン上には表示させない方法は出来るのでしょうか？

お世話になります。 Excel2007で、ファイルを複数開いている状態から右上隅の「×」をクリックすると、各ファイル毎に閉じていきます。（クリック1回につき1ファイル） 複数ファイルを一括で閉じられるように設定するには、どうしたら良いのか教えてください。 なお、エクセルを別々に起動しているわけではありません。

お世話になっております。皆さんよろしくお願いします。 Aという名前のエクセルファイルのsheet1に次のような名簿が入力してるとします。 　　A　　　　　B　　　　C　　　　　D 1　申請日　　名前　　　住所　　電話番号 2　　4/1　　　甲　　　東京　　　00－0000 3　　4/2　　　乙　　　大阪　　　11－1111 4　　4/3　　　丙　　　京都　　　22－2222 ・　　4/3　　　虎　　　北海道　　33－3333　　　 ・　　・　　　　・　　　・　　　　　・ こういう名簿が3000件くらいあります。申請日は一件しかない日もあれば、数百件ある日もあります。また、申請日は一概に4/1から順になっていないところもあります。 この名簿を他のBというエクセルファイルに指定した期間ごとに抽出したいと考えています。 例えば、Bファイルのsheet1に、 　　A　　　　　B　　　　C　　　　 ～　　G 1　4/3　　　　4/4　　　4/5　　　　～　　4/9 と一週間分を入力し、コマンドボタンを押したら、Bファイルのsheet2 に、 　　A　　　　　B　　　　C　　　　　D 1　申請日　　名前　　　住所　　電話番号 2　　4/3　　　大田　　　京都　　　22－2222　　 3　　4/3　　　佐藤　　　北海道　　33－3333　　　 ・　　・　　　　・　　　　・　　　　・ ・　　・　　　　・　　　　・　　　　・ 11　 4/9 　　 山田　　　愛知　　44－4444　　　 できたら嬉しいのですが、できるのでしょうか？どなたかお知恵をお貸しください。 よろしくお願いします。

こんにちは。ＶＢＡをはじめたばかりの者です。 変数の使い方で教えていただきたいことがあります。 Dim myFLName As String myFLName = ThisWorkbook.Path & "\001.xls" Workbooks.Open Filename:=myFLName, ReadOnly:=True Workbooks("dbase.xls").Activate Range("A2").Select ActiveCell.Value = 1 ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("R3") ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("C2") ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("R2") ActiveCell.Offset(1, -3).Select 001.xls～（連番でない）200.xlsくらいまでのファイルがあり、 同じフォルダにdbase.xlsを作って1ブックから１レコードになるようにしたいと 思います。 こんな感じで１行目はできたのですが、２行目の１列目に「2」を入れ、 2列目からは001.xlsの次のブックを開いてセルの中身をコピーしたいのです。 変数の使い方がよくわからないのですが、教えていただけますでしょうか。 よろしくお願いいたします。

こんにちは。ＶＢＡをはじめたばかりの者です。 変数の使い方で教えていただきたいことがあります。 Dim myFLName As String myFLName = ThisWorkbook.Path & "\001.xls" Workbooks.Open Filename:=myFLName, ReadOnly:=True Workbooks("dbase.xls").Activate Range("A2").Select ActiveCell.Value = 1 ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("R3") ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("C2") ActiveCell.Offset(, 1).Select ActiveCell.Value = Workbooks("001.xls").Worksheets(1).Range("R2") ActiveCell.Offset(1, -3).Select 001.xls～（連番でない）200.xlsくらいまでのファイルがあり、 同じフォルダにdbase.xlsを作って1ブックから１レコードになるようにしたいと 思います。 こんな感じで１行目はできたのですが、２行目の１列目に「2」を入れ、 2列目からは001.xlsの次のブックを開いてセルの中身をコピーしたいのです。 変数の使い方がよくわからないのですが、教えていただけますでしょうか。 よろしくお願いいたします。

エクセルで、去年のデータを今年のフォームに貼り付けたいのですが、 今年のフォームには結合セルが含まれています。 去年のフォームは Ａ　Ｂ　Ｃ　Ｄ　Ｅ　Ｆ　Ｇ １　２　３　４　５　６　７ 今年のフォームは Ａ　ＢＣ　ＤＥ　Ｆ　Ｇ　Ｈ　Ｉ １　２　　３　　４　５　６　７ となっています。 貼り付けると、セルの結合が取れてしまうのですが 上手に貼り付ける方法はないのでしょうか？

エクセルのVBAについてですが、 指定された列に情報が何もないときは、 次の処理。 指定列に情報が一つだけの場合は そのひとつだけの情報をコピーして、 別シートへ貼り付け。 指定列に情報が複数ある時は、 すべてを選択コピーして、 上記と同様のシートへ付け足して貼り付け。 …というような処理を行いたいのですが、 構文がわかりません。 これが出来ないおかげで、情報が何もないときに、 シート全体をコピーして貼り付けるため、 エラーが発生します。

エクセルで空白を含む列の中から　空白以外のセルを順に表示させたいのですが、可能でしょうか？ 例えば、 社名　　 売上額 A社　　　1,000 　　　　　2,000 　　　　　3,000 　　　　　4,000 B社　　　　5,000 　　　　　6,000 　　　　　7,000 C社　　　　8,000 　　　　　9,000 　　　　　10,000 　　　　　11,000 　　　　　12,000 の表を 社名　　売上　計 A社　　　10,000 B社　　　18,000 C社　　　50,000 の様に集計表を作るのに、社名の列の空白の行を詰めて表示させたいのですが、 オートフィルタや並べ替えを使わずに関数で抽出したいと思っているのですが、可能でしょうか？ 宜しくお願いします。

Ｅｘｃｅｌ２００７のシート見出しの色が薄くて、どのシートを選択しているのかわかりにくくて困っています。見出しの標準の色を２００３のように設定が出来ますか？

入力用シートを作り 　　　A　　　　B　　 　　C　　　 　D　　 　E 1　　品名　　申込日　　申込者　　住所　　 電話　 2 ●　　　　11/3　　　aaa ****** 123-456 3 ◆　　　　11/30　 　bbb ****** 456-789 4　　▲　　　　11/30　　 ccc 　 ****** 111-333 5 ◆ 12/1 aaa ****** 111-777 6 ▲　　　　12/1　　　ttt　　 ****** 668-125 7 ●　　　　12/2　　　ppp　 　****** 555-779 と入力すれば シート●には 　　　A　　　　B　　 　　C　　　 　D　　 　 　　申込日　　申込者　　住所　　 電話　 1 11/3　　　aaa ****** 123-456 2　 12/2　　　ppp　 　****** 555-779　 シート◆には 　　　A　　　　B　　 　　C　　　 　D　　 　 　　申込日　　申込者　　住所　　 電話　 1 11/30　 　bbb ****** 456-789 2　 12/1 aaa ****** 111-777 同じ様にシート▲ と言う風に出来ないでしょうか？？ よろしくお願いします

エクセルでマクロ初心者です。よろしくお願いします。例えば1列目にデータ名が入力されていてその個数が可変である場合（小計は末尾ではありません）小計行の1列目から数式をいれたいのですが、行数が固定でないため小計と書かれたセルの行数を取得したいのですが、わかりません。いい方法をお願いします。 　　 A B C D データ aa bb cc 小計 ・ ・