Excel VBA質問スレ Part6

1 名前：デフォルトの名無しさん mailto:sage [2008/03/11(火) 19:31:39 ] ExcelのVBAに関する質問スレです 質問前に　【 >>2-3 】　あたりを良く読むこと 前スレ pc11.2ch.net/test/read.cgi/tech/1197448064/ ★1 質問テンプレ(雛形)は用意しませんが､OSとExcelのバージョンは必ず書きましょう。 ★2 ExcelのVBA以外の部分に関する質問はNGです。 　　　但し､VBA無しでも出来ることだが､あえてVBAでやりたいって物に関してはOK。 ★3 ExcelのVBE(Visual Basic Editor)を使うとしても､VBAの分野以外に関してはスレ違いです。 　　　 　VBAとは､『Visual Basic for Application』の略で 　　Application 　　├Workbooks 　　｜└Workbook 　　｜　 ├Worksheets 　　｜　 ｜└Worksheet 　というApplication以下のオブジェクトを､VB言語で操作するものを指します。　 　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､ 　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。 ★4 とりあえず､Excelのインスタンスを作らずにVB6で出来ることは全てスレ違いだと思ってください。 ★5 レベルはどうあれ､ここはプログラマ用の板スレです。プログラマとは､自分でプログラムを組み 　　　コードを書く人の事なので､自分でやるきは全く無く､丸投げしようって人はお断りです。 　　　ヒントを貰えばあとは自力でなんとかしますって人のみどうぞ。 654 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 13:37:51 ] そしていざ解かなければならないとしても規模が小さければソルバーで解けてしまう。 それじゃソルバーで解けない場合はどうするのか？ VBAで組むのだろうか？ >>630はどうするつもり？ 655 名前：デフォルトの名無しさん [2008/05/05(月) 15:05:10 ] >>652 ふいた 656 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 15:59:27 ] >>653 >Excel使ってる人が現実に解かなければならない場面はほとんどないだろう。 その考え方は殆どExcelをExcelとして使っていないから出てくる考え方だな まぁいい。本来Excelなどをまともに使いこなせるのは２００年以上の人生経験（☆比喩） が必要な世界だからな。 Excelは RDBというリアルタイム志向でアブソリュートな情報の作成ツール を補佐するツールとして使えばいい。 >>630の問題で言えば、 最小コストと最大コストの推測、コストの分布の概略を掴む。（これを完全にやるのは まぁ無理だろう） これにより価格体系や家族構成に問題があるかないかを推測し、交渉する材料とかに するわけだ。 価格体系や家族構成の分布が悪いと、家族間や家族対ホテルで殺し合いが発生して 双方共に絶滅する可能性すらあるからな。 双方を双方の価値観を厳格に固執する態度じゃリアルタイムには問題は解決しないという 前提に立つのが賢い。 657 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 16:21:20 ] >>656 例えば客の家族構成に問題がある場合はどのような解決手段がある？ 658 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 16:34:31 ] >>656 君が組み合わせ最適化問題に興味を持っているのはわかった。 そして今の今までそれを専門家向けのソートと呼んでいたこともわかった。 659 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 16:37:43 ] パソコンなんだから全通り計算させたらしまいだろ 660 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 16:43:37 ] >>439>>443>>455>>549>>606>>630>>656 661 名前：デフォルトの名無しさん [2008/05/05(月) 17:22:14 ] >>656 >最小コストと最大コストの推測、コストの分布の概略を掴む。 最適化手法からそのような結果は出てこない。 662 名前：デフォルトの名無しさん [2008/05/05(月) 17:24:43 ] >>659 基本的にはその通りなんだが、けっこう大変なんだぞ。 663 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 17:43:23 ] >>658 組み合わせ最適化問題はどこにでも付きまとう問題で >>630のような問題は、その一つの例 興味を持たないで済ませられる人は余り居ない。 抽象化したら同じになるけど、問題が余りに広範なんで、 問題毎に使える手法に制限に色々とバリエーションが 出てくるので、問題毎に専門分野を作ってる 抽象化すれば>>630に類する問題をまともに扱っている 人はその道の専門家でいいんじゃないの？ そもそも一般人と専門家って両立する概念なんだから。 664 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 17:51:15 ] >>630と似たような感じの問題で、数理計画とか線形計画、GAの専門家なら聞いたことあるが、 ソートの専門家ってのは聞いたことないな。 665 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 17:52:19 ] >>663 組み合わせ最適化問題を解くことは非常に有益だし、興味ももっています。 しかし考えてみてください。>>630書いてるやつは>>443なんですよ。 666 名前：側近中の側近 ◆0351148456 [2008/05/05(月) 18:08:01 ] (っ´▽｀)っ テーブルを作って、その直積(デカルト積)を求めて、 ソートすればいいのでは？ とレスをあまり読まずに言ってみましたが何か？ 667 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 18:10:05 ] >>666 もう少しじっくり読んでくれ。 とりあえず>>443から順番に。 668 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 18:17:55 ] >>439>>443>>455>>549>>606>>630>>656とか なんか全部>>443が書いたみたいに思ってる奴がいるみたいだが ここじゃ皆「デフォールトの名無しさん」だろ？ >>439!=455とか 書いたところで無意味だし... ねぇ>>667 =? >>439 669 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 18:23:38 ] >>668 >>667だが>>439ではないよ。 >>439>>443>>455>>549>>606>>630>>656 この中で>>439だけは違うやつだと思う。 >>443>>455>>549>>606>>630>>656 こいつらは同じやつだと思う。 670 名前：側近中の側近 ◆0351148456 [2008/05/05(月) 18:29:13 ] |▽｀)っ 全て(っ´▽｀)っの自作自演だったらどうする？ ID無しの板っていいよね☆自作自演し放題で。 |彡☆ 671 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 19:15:32 ] そんなセンスねーだろよ。 672 名前：側近中の側近 ◆0351148456 [2008/05/05(月) 19:41:29 ] >>671 (っ´▽｀)っ ある！ (っ´▽｀)っは最高20人同時演出可能。 たまに自分のレスだと忘れて、そのレスにマジレスしてしまうことがある。 自分でも勘違いするぐらい、騙されるぐらい自演が美味い。。 673 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 19:50:21 ] 頭の壊れた奴が住み着いてすっかりスレが腐ってしまった 674 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 20:14:23 ] >>673 貴方をはじめ>All except >>443etc の腐ってない新鮮な 頭脳が残っただけが救いだと思おうよ 675 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 20:21:53 ] >>674 めでたいやつだな。 複素数の並べ替えはできたのか？ 676 名前：デフォルトの名無しさん [2008/05/05(月) 20:25:30 ] ソートの専門家 の検索結果 約 111,000 件中 1 - 10 件目 (0.14 秒) 677 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 20:32:45 ] >>674 >>630 ベクトルをグローバルに標準化はできないけど、恣意的に決めればローカルには定義できる。 つまり大小比較できるの？できないの？もっと詳しく説明してほしいな。 678 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 20:56:58 ] 674と630をどうしても結びつけたい頭の腐った人が居るようでつね 679 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 21:40:38 ] >>646 = >>678 680 名前：デフォルトの名無しさん [2008/05/05(月) 22:46:09 ] 教えてください。 ブックAに「計1-A」、「計1-B」、「計2-A」、「計2-B」、というシートがあって、 VBAで 「計1」と名をつけた新しいブックを作り、「計1-A」、「計1-B」をそこにコピーする、更に「計2」も同様に・・・ というのを一連の操作で行いたいのですが、 新しいブックの名前をどうつけてやったら良いのか分かりません。 sheets(Array("計1-A", "計1-B", ).CopyではただのBook1に保存されてしまいます。ぜひ名前をつけたいんですが、どうすればよいのでしょう ご教示願います 681 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 22:55:02 ] ファイル名とブック名を別にするのにはどうすればいいでしょうか？ 682 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:02:02 ] >>676 "ソートの専門家"の検索結果 2 件中 1 - 2 件目 両方とも、このスレｗｗｗ 683 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:12:27 ] saveas 684 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:17:39 ] >>682 ソートの専門家は種類が多過ぎてもはや専門家とはみなされてないだけだろ。 昔４８種に大分類されたらしいが、その後もでるわでるわバリエーションの山。 分類プロジェクトは頓挫中。 ソートくらい奥深い世界は無いみたいだ。たかがソート、されどソート。 685 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:21:26 ] NSPを解くのも、ソートの専門家なのか？ 686 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:22:05 ] ソートなんてクイックソート＋選択ソートで実装すればまず困る事は無いわ。 687 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:22:56 ] しっー そーとしておけ 688 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:23:38 ] 場合によってはバケツソートを使えないようでは ソートの専門家とは言えない。 689 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:24:52 ] >>684 もはや何を言いたいのかよくわからんが、今や専門家と看做されてないなら、 「ソートの専門家」じゃないだろ。 690 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:26:10 ] >>688 え？アルゴリズムが違うと、結果も違うのか？ 691 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:28:15 ] 「専門家」なら、バケットソートって言うだろ、JK 692 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:31:28 ] >>690 これはひどい 693 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:31:52 ] >>691 専門家はそんなくだらない事より本質を重要視する。 694 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:33:33 ] いいかげんにしとけよ 695 名前：デフォルトの名無しさん [2008/05/05(月) 23:51:17 ] 頭の中をソートしてくれ 696 名前：デフォルトの名無しさん mailto:sage [2008/05/05(月) 23:57:40 ] それはやめといたほうがいい てか、上げるなよ 697 名前：デフォルトの名無しさん [2008/05/06(火) 00:14:14 ] 専門家以前に人としてバルブソートだろ。 698 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 00:24:42 ] このスレのレスを、くだらない順にソートせよ 699 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 00:31:46 ] 専門家がいるのなら本の一冊や二冊出してるだろ 700 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 01:18:08 ] ソートの味方くらいでいいんじゃね 701 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 01:34:47 ] ソートに味方も敵もあるかよ 番号が付いてる限りソートされていると感じる 脳みそにとってはな 702 名前：デフォルトの名無しさん [2008/05/06(火) 11:43:51 ] グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー　グランドシティ大宮イーストタワー 703 名前：デフォルトの名無しさん [2008/05/06(火) 13:31:48 ] >>698 >>443>>455>>549>>606>>630>>656 704 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 14:30:12 ] 近未来と近過去 熱い場所だ 担当者ご苦労さん 705 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 19:16:16 ] ここはなんのスレ？ 706 名前：デフォルトの名無しさん [2008/05/06(火) 20:39:34 ] ソートの専門家専用スレです。 707 名前：デフォルトの名無しさん mailto:sage [2008/05/06(火) 21:37:06 ] その名はExceler 708 名前：デフォルトの名無しさん [2008/05/07(水) 02:11:55 ] なんで自演とかを気にするんだおまいら？ 709 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 08:26:19 ] ところで>>630よ。うまくソートできたか？ わしはできたぞ。 正確に言うとソートじゃない。最適な組み合わせを求めたということ。 710 名前：708 mailto:sage [2008/05/07(水) 09:20:21 ] >>708 こういうことが起こりうるから 711 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 11:08:37 ] M=1000の時でホテル代の価格の組が全部異なり 家族構成も全部異なる場合で実例が出てくるまで 誰も信じないと思う。本当にソートされてるのか も示せないとな。 712 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 11:55:25 ] >>711 M=14まででお願いします。ソルバーの制限で200変数までしか扱えないから。 ただしM=14の時に現実的な時間で解けるかどうかわからないけど。 それからソートと呼ぶのはやめないか？ 713 名前：デフォルトの名無しさん [2008/05/07(水) 12:40:47 ] 最適組み合わせの問題って、ノーベル賞クラスじゃなかったか？ 714 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 12:49:53 ] >>713 このスレからノーベル賞受賞者が（・∀・）ﾜｸﾜｸ 715 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 13:13:03 ] >>709がウソつき扱いされているみたいだな。不思議な話だ。こんなのできて当たり前なのにね。 前から思ってたんだかこのスレに出入りしてるやつら中学生が多いだろ。 レベル低すぎて話にならん。せめて高校出てからデビューしろ。 716 名前：デフォルトの名無しさん [2008/05/07(水) 15:16:37 ] 中学生が高校生に、受験の答え教えてくれって頼む、そんな主旨のスレだからだと思う 717 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 15:22:28 ] '''八島 良太'''（やしま りょうた、[[1975年]][[11月8日]] - ）は[[埼玉県]][[さいたま市]]出身の[[ウィキペディアン]]。 [[ウィキペディア]]でのアカウント名は[[User:Yassie]]、[[2ちゃんねる]]では◆sMt4YbtR06という[[トリップ]]を使用。 Nanassieというコテハンを使っていた時期もある。身長171cm、体重75kg。さいたま市[[大宮区]]在住。独身。 好きな歌手は[[サラ・マクラクラン]]、好きな女優は[[メグ・ライアン]]。 [[User:Aphaia]]（本名・木津尚子）や[[User:Mikihisa]]や[[User:ＮｉＫｅ]]や[[User:掃除屋ケンちゃん]]との死闘で知られており、 現在は[[User:Haruno Akiha]]や[[User:WhiteWing]]をウィキペディアから追放すべく策動を続けている。 ==経歴== [[埼玉県立浦和高等学校]]を経て、[[国際基督教大学]][[教養学部]]社会科学科に入学。学部時代は [[オハイオ州立大学]]に交換留学し、[[経営学]]を専攻。オハイオ州立大学への編入を望み、願書はほぼ完成していたが アジア経済危機の煽りを受けて学費を工面できなくなり、相思相愛の恋人をアメリカに残したまま、[[1999年]]、日本に帰国。 のちに当時のことを振り返って「精神面は相当荒れてたね」と語った。[[2000年]]に国際基督教大学を卒業して 外資系企業に入社し、[[英語]]を使用した事務的な職務を担当。[[2004年]]、Excel2002VBAスタンダードに合格。 [[2005年]][[12月27日]]から[[ウィキペディア日本語版]]で北米の地理に関する記事を翻訳・投稿。今日に至る。 私生活では、失恋の傷を忘れるため、[[1999年]]から[[ダンスダンスレボリューション|DDR]]に熱中し、 新宿チルコポルトや大宮タイトーインに出没していたが、自惚れの強さと事大主義ゆえに諸方の反感を買い、 2000年頃には撤退を余儀なくされた。 {{people-stub}} {{DEFAULTSORT:やしま りようた}} [[Category:インターネットの人物]] [[Category:埼玉県出身の人物]] [[Category:デブ]] [[Category:日本のダンサー]] [[Category:1975年生]] 718 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 16:16:48 ] 14*14=196 15*15=225 >200 つまりLPですね。よくできました。 719 名前：麻雀を作りたい mailto:sage [2008/05/07(水) 17:48:28 ] OS：winXP excel2000 VBA実行中に、ユーザにいったん制御をもどして、シート上の特定範囲のセルをクリック。 そのクリックをトリガーに処理再開。 というような事をしたいのですが、どうすれば実現できるかわかりません。 良い案やヒントないでしょうか・・？ 720 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 18:02:20 ] セルに対しては通常のクリックは検出できないと思うので、右クリックかダブルクリックのイベントを検出する どうしてもクリックがよい場合はクリックイベントを検出できるもの(ボタンやシェイプ)を追加する 721 名前：麻雀を作りたい mailto:sage [2008/05/07(水) 18:18:07 ] >>720 コメントありがとうございます。 BeforeDoubleClick SelectionChange とかを使えば良いのかなあとは思ってました。 引っかかってるのは、「VBA実行中に、ユーザにいったん制御をもどして」のところなんです。 中断前の変数の状態を保持したまま、いちどユーザに制御を戻して、シート上のセルを（ダブルor右）クリックでVBA再開。 つまり �@自分の番になったら一枚ツモってきて �Aいらいない牌を手牌の中から一枚選択して（シート上のセルをクリックして）、 �Bすてる。 ってことをしたいんですね。 �@まではVBAで処理して、�Aの動作はシート上のセルをクリックすることで選択して、 �BからはVBAにまた処理を戻す。 ･･･自分の実力じゃ無理かな･･･orz 722 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 18:40:04 ] >>721 セルを使わずに、全部ボタンをはっつけてしまったほうが楽なんで内科医? 723 名前：デフォルトの名無しさん [2008/05/07(水) 18:51:17 ] フォームとボタン使えば？ 724 名前：麻雀を作りたい mailto:sage [2008/05/07(水) 19:20:52 ] そーですね・・。 cell_雀みたいなの作りたかったですが、あきらめようかな。 725 名前：デフォルトの名無しさん [2008/05/07(水) 20:39:11 ] フォームを作成してデバッグ作業をすると、エラーが出たときにコードが表示されずに フォーム画面が出るため、どこの行でエラーが起きてるのかわかりません。 解決方法ご教授願います 726 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 21:32:21 ] ところで>>630はホテル料金の計算できたのか？ >>656 >その考え方は殆どExcelをExcelとして使っていないから出てくる考え方だな なんていうくらいだから当然できたんだろうな。 727 名前：デフォルトの名無しさん mailto:sage [2008/05/07(水) 22:04:47 ] >>719 こんなのじゃだめ？ Do While Len(ActiveCell.Value) = 0 DoEvents Loop 728 名前：デフォルトの名無しさん [2008/05/07(水) 23:44:06 ] Excelツールのテストを自動化したいと考えています。 別Bookのフォーム上のテキストボックスの値を取得する ことはできますか？ ツール側に関数を作ればできることはわかったのですが、 できればツール側に修正を入れたくないです。 ヒントお願いします。 729 名前：デフォルトの名無しさん [2008/05/07(水) 23:56:17 ] エクセルツールのテストって一般的な言葉？ 730 名前：デフォルトの名無しさん mailto:sage [2008/05/08(木) 00:09:24 ] 「Excelで作成したツールのテストを自動化したい」だから俺は別に違和感ないけど・・・ んなことより、>>728は無理じゃないのかなぁ？ フォームをキャプチャ→画像解析→テキスト取得とか？ごめん、嘘・・・ 731 名前：デフォルトの名無しさん mailto:sage [2008/05/08(木) 00:29:24 ] >>728 >>729 エスパー＆エクセル素人 732 名前：デフォルトの名無しさん [2008/05/08(木) 00:32:01 ] 728です。レスありがとうございます。 やっぱり無理なんですかね。 そもそも、MsgBoxとかもやっているので、どうやってＯＫ押すかとか前途多難です。 みんな手でテストやってるのかな・・・。 733 名前：デフォルトの名無しさん mailto:sage [2008/05/08(木) 03:08:30 ] >>732 Win32APIを使えば、OKボタンもAPIでクリックできるけど、より良い方法は、 テスト対象のメソッドでダイアログ入力待ちなどが起きないような設計にする。 とはいえ、どこかでMsgBoxを出さざるを得ないだろうから、そこはマニュアルテストとかかな。 734 名前：デフォルトの名無しさん mailto:sage [2008/05/08(木) 07:57:19 ] >>728の説明で回答できる人ってスゴイね 俺にはどっちがツールなのかすら分からないよ 735 名前：デフォルトの名無しさん [2008/05/08(木) 08:30:10 ] そんなに誉めるなよ 736 名前：デフォルトの名無しさん mailto:sage [2008/05/08(木) 16:11:05 ] いや実際、配列とか定数とか何に使うの？とか思ってる俺からしたら紙だ。 737 名前：デフォルトの名無しさん [2008/05/09(金) 13:03:03 ] モジュールの自動削除って出来るもの？ 738 名前：デフォルトの名無しさん [2008/05/09(金) 14:48:45 ] 自分は今セルをクリックしたら別のエリアに多行表示できるようにしたいと考えて。 例にすると セルをクリックしたら、そのセルについたコメント（７~８行ぐらい）の内容を A15に22R X 7C以上の範囲にそのコメント内容を載せる　という物を作ろうとしてるのですが 全く、できず困ってます。 こういうのは可能でしょうか？ 739 名前：デフォルトの名無しさん mailto:sage [2008/05/09(金) 17:20:23 ] セルに表示されないデータを埋めこむってこと？ソートとかかかったらどうなるんだろ？ってかできるの？ 740 名前：デフォルトの名無しさん mailto:sage [2008/05/09(金) 18:57:46 ] >>737 出来る >>738 可能 >>739 「セルのコメント」だろ 741 名前：デフォルトの名無しさん mailto:sage [2008/05/09(金) 22:52:31 ] ごめん、俺が今やりたいことを言ってしまった。で、できるの？3文字でいいからヒントください。 742 名前：デフォルトの名無しさん [2008/05/09(金) 23:37:18 ] >>741 でき れ 743 名前：デフォルトの名無しさん mailto:sage [2008/05/09(金) 23:39:06 ] どっちだよ？ >>737 ttp://www.cpearson.com/excel/vbe.aspx >>738 range.comment, range.notetext 744 名前：デフォルトの名無しさん mailto:sage [2008/05/09(金) 23:58:10 ] 並べ替えた後、セルを特定することは普通可能 それはソート前にセル探すのとどう違うんだ と言うか、出来るように設定しておけばいいだけでわ 745 名前：デフォルトの名無しさん [2008/05/10(土) 08:30:40 ] マクロにパスワードつけて触れないようにしたい。 どうしたらいい？ 746 名前：デフォルトの名無しさん [2008/05/10(土) 09:43:16 ] Function IsCommentCell(sAddress As String) As Boolean IsCommentCell = Len(Range(sAddress).NoteText) > 0 End Function Function GetFullCommentText(sRange As String) As String Dim sComment As String Dim iPos As Integer iPos = 1 While Range(sRange).NoteText(, iPos) <> "" sComment = sComment & Range(sRange).NoteText(, iPos) iPos = iPos + 255 Wend GetFullCommentText = sComment End Function 'コメント取得方法は分かったが 'それをA15に表示する方法がググレナイ… '例えば A1にあるコメントをクリックしたら（７行）A15以降にそのコメントが表示されて 'その後、B5にあるコメントをクリックしたら、A15に表示されたA1のコメントが消えてB5のコメントが表示できるようにしたい。 'どうしたら良いでしょうか？ 747 名前：デフォルトの名無しさん [2008/05/10(土) 10:07:09 ] 連レス失礼 A1から12R X 11Cのどのセルをクリックしても そのセルについてるコメントを A15に表示させるようにしたいです。 748 名前：デフォルトの名無しさん [2008/05/10(土) 10:55:14 ] >>745 VBEditorで ツール→VBAProject-プロジェクトプロパティ →保護タブ →パスワードを入れる 749 名前：デフォルトの名無しさん mailto:sage [2008/05/10(土) 11:23:54 ] >747 12R X 11C？ Private Sub Worksheet_SelectionChange(ByVal Target As Range)     If Not Target.Comment Is Nothing Then         Range("A15").Value = Target.Comment.Text     End If End Sub ？ 750 名前：デフォルトの名無しさん [2008/05/10(土) 11:44:56 ] >>749　できました！　ありがとうございます 751 名前：デフォルトの名無しさん [2008/05/10(土) 11:50:35 ] あとは A15の縦の長さを　常時コメントと同じ高さにあわせるように応用するだけか・・・ 752 名前：デフォルトの名無しさん [2008/05/10(土) 12:04:27 ] A15の高さ＝コメントの行数x18ピクセルになるマクロを組み込むには…どうすればええやろ。 753 名前：デフォルトの名無しさん mailto:sage [2008/05/10(土) 18:48:39 ] いい加減、マクロの記録に気づけよ 754 名前：デフォルトの名無しさん [2008/05/10(土) 23:53:59 ] ボタンのテキストをマクロで書き換える方法についての質問です。 フォームのボタンの場合は、 Dim s As Shape Set s = ActiveSheet.Shapes("Button 5") s.TextFrame.Characters.Text = "ほげほげ" のようにすれば書き換えられます。 では、コントロールのボタンはどのようにして書き換えればいいのでしょうか？ 同じように書くと、s.TextFrame.Characters.Textの行を実行するときに、 　オブジェクトは、このプロパティまたはメソッドをサポートしていません と叱られます。

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef