Excel総合相談所 74 - 暇つぶし2ch

Excel総合相談所 74 at BSOFT

1:名無しさん＠そうだ選挙にいこう
08/10/08 19:47:24
Excelに関する質問は、ここで！

▼━ 質問のしかた ━━━━━━━━━━
★1 質問するときは環境や条件はきちんと書いてね。情報後出しはダメ。
★2 要望は具体例や図を使って明確かつ具体的に。
★3 質問前に>>2-10あたりの注意書きやQ&Aを必ず読むこと。
★4 質問テンプレ(雛形)は必須じゃないけど、
　　　OSやExcelのバージョン､VBAの可否など(下記テンプレ1～4の情報)は必須情報。

▼━質問テンプレ (出来れば使ってね) ━━━━━━
【1 OSの種類　　　　 .】 Windows**
【2 Excelのバージョン　】 Excel**
【3 VBAが使えるか　　 .】はい･いいえ
【4 VBAでの回答の可否】可･否
【5 検索キーワード　　】 Googleやヘルプでの検索キーワード

※【4】は、VBAはわからないけどコード書いてくれるならVBAでもいいって場合は｢可｣
　 VBAを使うのは避けたいって場合は｢否｣にしましょう。丸投げする場合は､必要に応じてブックをアップすること。

※【5】は、あなたがGoogleやヘルプで検索した際に使ったキーワードを書いてください。
　まだ検索してないなら、質問の前にGoogleやヘルプで検索してみてください。
　 URLﾘﾝｸ(www.google.co.jp)

前スレ
Excel総合相談所 73
ｽﾚﾘﾝｸ(bsoft板)

2:名無しさん＠そうだ選挙にいこう
08/10/08 19:48:18
▼━質問時の注意･決まり事━━━━━━━━━━
･1 現行スレ内で既出の質問が無いか、ページ内検索をしよう。(Ctrl+F)
･2 図やコードを書く場合、TABや連続する半角スペースは無視されるので注意
･3 VBAコードを貼る場合は、部分的に伏せたり省略したりせずに全て貼りましょう。何レス使っても構いません。
･4 2回目以降の質問では名前欄に初回質問の番号を入れよう。
･5 回答内容でわからない部分があっても、すぐに聞き返さずにヘルプやGoogleなどで検索しましょう。
･6 バグ･動作上の不都合･仕様に関する質問などはマイクロソフトのサポートを受けましょう。
　　ここは技術的な質問のみで。
･7 VBAはプログラム言語のVisualBasic(6以前)に近い処理が可能でExcelに関係ないことも出来ます。
　　Excelの操作に関係ない部分は、スレ違いなのでここで聞かずにVB言語やAPI､COMについて自分で勉強し､
　　どうしてもわからない部分はVBスレやAPIスレなどの該当スレで質問しましょう。
　　但し向こうはプログラマのスレなので､構文規則などの最低限の事は覚えてから質問しましょう。
　　ここみたいに丸投げはダメですよ。
･8 うまくいかなかったにしても自分でやってみたこと(組んだ数式やコード)は書きましょう。
　　例えエラーになる式やコードでも、何をやりたいのかを的確に把握する手がかりになります。
　　その上で、どううまくいかないのかを具体的に書きましょう。
　　エラーが出るなら、何処でどういうエラーが出るのか、
　　想定外の結果が出るなら、条件と想定上の結果、実際の結果などを詳しく書いてください。
･9 マルチはダメ。一度マルチしたら､謝っても他のスレの質問を取り下げても回答は得られないと思ってください。
･A テキストボックス(エディトボックス)、コンボボックス(ドロップダウンリスト)、リストボックス、コマンドボタン、
　　チェックボックス、オプションボタン(ラジオボタン)、スピンボタン、スクロールバー、等の質問をするときは、
　　ユーザーフォーム、コントロールオブジェクト、フォームオブジェクトのどれなのかを必ず書くこと。
･B 書籍や解説サイトの紹介依頼はスレ違い。ここは技術的な質問のみで。

3:名無しさん＠そうだ選挙にいこう
08/10/08 19:48:59
上記｢Excelで出来ないこと、仕様上の制限｣は､一般的に出来ないとされていること､出来ないと思われるものです。
間違いがある可能性もあるので､上記に挙がってるもので｢コレはこうすれば出来るよ｣というものがあったらご指摘ください。
Excel2007についても未確認な項目が多いので変更点が有ればご指摘下さい。

また､ここに書かれてないことでも､Excelで出来ないことはたくさんあります。
ここに書かれてないからといって必ず出来るはずだなんて思わないように。

＞▼環境･書式
＞･セルのサイズ(幅､高さ)を､長さの単位(ミリメートルなど)で指定する
補足
2007ではページレイアウトビューの表示時に限り、幅・高さともｃｍ単位で表示され、
指定も同じくcm単位でできる。
ただし大元がインチ系なのでなかなかピタリの値は出ない。1cm→0.98cmのように
近い値に勝手に丸められる。

4:名無しさん＠そうだ選挙にいこう
08/10/08 19:49:34
★ルールを無視すると…
　>>1-2あたりのルールに従うか否かは自由だけど､従わないと以下のような不利益があるよ

　1．マルチをしてしまったら…
　A．謝っても他での質問を取り下げても､以後その質問に対する回答は付かない物と思ってください。
　　　それが嫌なら初めからマルチなんてしないように。>>2にマルチ禁止と書いてあり､
　　　マルチの意味が分からなければ検索すれば出てくるので､｢知らなかった｣は通用しません。

　2．>>1★4に従わず､必要な情報を出さないと…
　A．自分の使用しているバージョンで使えない機能を答えられたり､VBA使えないとか使いたくないと書かないと
　　　VBAでの解決OKで自分でコード書けるものと勝手に解釈されて､｢VBAで出来るから自分でコード書いて｣程度の
　　　適当な回答を返されたりします。また､ここではVBAコード書けない人の丸投げ依頼を許可してますが
　　　これはきちんとルールに従って質問､依頼した人のみの特権です。

　3．情報･条件を後出しすると…
　A．後から出された情報は意図的に無視されたり､質問自体を放置されたりします。
　　　>>1★4の必須情報はもちろんのこと､要望や条件､既に試したことなどは､
　　　長文になってもいいので詳細かつ明確かつ具体的に書きましょう。

★VBAについて
　VBAとは､『Visual Basic for Application』の略で
　　Application
　　├Workbooks
　　｜└Workbook
　　｜　 ├Worksheets
　　｜　｜└Worksheet
　というApplication以下のオブジェクトを､VB言語で操作するものを指します。
　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､
　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。

5:名無しさん＠そうだ選挙にいこう
08/10/08 19:50:07
★ Excelで出来ないこと、仕様上の制限 (括弧内は代用法)

　▼環境･書式
　･列数を256列以上、行数を65'536行以上に増やす (Excel2007では16'384列､1'048'579行扱える)
　･ Excel2003以前で条件付き書式を3つ以上設定する (文字色だけなら、入力規則でも3つ設定可能。それ以外はVBA)
　･行の高さを0.25きざみ以下の単位で指定する
　･セル内の文字を○で囲む、一部のみ2段にする (オートシェイプ、オブジェクト)
　･オートフィルタで英字の大小文字を区別する (小文字 → 半角、大文字 → 全角、と使い分ける)
　･祝日を判断する (作業セルに祝日を列挙、VBA)
　･同一列内でセル(行)ごとに列幅を変える、同一行内でセル(列)ごとに列高を変える (セルの結合)
　･ヘッダー･フッターのページ番号の開始番号任意指定、ページ番号演算、同シート内で違ったものを指定など
　･セルのサイズ(幅､高さ)を､長さの単位(ミリメートルなど)で指定する (プラグイン)
　･罫線幅の自由指定
　･表示形式で｢10/ 1｣といった書式を指定し､日付が一桁の場合のみ日付の前にスペースを入れる (TEXT関数､VBA)
　･書式設定の｢折り返して全体を表示する｣と｢縮小して全体を表示する｣を同時に使う (折り返しを有効にして､手動で文字サイズを調整)

　▼操作
　･ファイラーの右クリックメニューからの新規作成で、Excelで設定したシート数のブックを作る (任意のシート数のテンプレートを作成)
　･複数シートを選択して入力規則やシートの保護を設定する (VBA)
　･オートコンプリート機能を、別列や離れたセルで動作させる (VBA)
　･選択範囲から一部を除く､Ctrlを押しながらの複数選択で一部を取り消す (VBA)
　･優先キーを3つ以上指定しての並べ替え (優先度の低い方から順に並べ替える)
　･ 1セルを分割 (分割したいセル以外を結合)

6:名無しさん＠そうだ選挙にいこう
08/10/08 19:50:41
　　　||
　　　||　━ 質問のしかた ━
　　　||
　　　||　★1 質問するときは、環境や条件をキチンと書くこと。情報後出しはダメ。
　　　||　★2 要望は具体例や図を使って明確かつ具体的にしる。
　　　||　★3 質問前に>>2-20あたりの注意書きやQ&Aを必ず読むこと。
　　　||　★4 質問テンプレ(雛形)は必須ではないが、
　　　||　　　　OSやExcelのバージョン､VBAの可否などは必須情報。
　　　||
　　　||　　　　　　　　　∧ ∧ 　。
　　　||　　　　　　　　　　( ,,ﾟДﾟ)／　ｼﾞｭｳﾖｳ!!　　　　　　Ｅ[]ヨ
　　　￣￣￣￣￣￣￣ﾉ　　つ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
　　　　　　　　 / ￣￣￣ ./| ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　　　　　　　　 |￣￣￣￣| | |
￣￣￣￣￣￣￣￣|＿＿＿＿|/｜
　　　　　　　　　　　　　　　　　￣￣￣￣￣￣￣￣￣￣￣￣￣
　　　　　　＼　　　　は～～～～い　　　　　　／
　　　　∧ ∧　　　　∧,,∧　　　∧ ∧
　　　 ( ,,　∧▲　　ﾐ　 ∧ ∧　(　　∧ ∧
　　～（＿(　　∧ ∧＿(　∧ ∧＿ﾐ･д･∧ ∧
　　　　＠（＿(,,・∀・)＠ (　　 *)～ミ＿ ( 　　,,)
　　　　　　＠（＿__ﾉ　～（＿__ﾉ　　～（＿__ﾉ

エクセルの技術的な質問と関係ない議論・雑談は下記スレッドで。

【質問不可】Excel総合相談所スレの雑談・議論スレ2
ｽﾚﾘﾝｸ(bsoft板)

7:名無しさん＠そうだ選挙にいこう
08/10/08 19:51:26
【このスレの登場人物】
┌─質問者──────
どこにでもいるごく普通の初心者だったり
会社で上司に無理難題を押しつけられて困っている人だったりする。
たまに学生が宿題を持ち込んでくることも。
┌─回答者──────
テンプレを使わないと無視したり、質問を小出しにするとキレたりするくせに
自分は回答を小出しにして優越感に浸りニヤニヤしている嫌なヤツ。
┌─自称回答者─────
質問者を煽ったり、回答者を煽ったり、とにかくスレを引っかき回すだけで
何の役にも立たない賑やかし。単なるヒマ潰しでこのスレを見ている。
┌─VBA厨 ──────
VBAは万能と信じ、どんな単純な問題もついVBAで解いてしまう。
Module1がデフォルトで挿入されている世界を夢見るが、いまだ実現していない。
その実態はほとんどが理系の(元)学生。ピボット厨に目の敵にされている。
┌─ピボット厨─────
ピボットテーブルの機能が強力すぎるため、なんでもできると錯覚している。
口癖は「データを正規化して出直せ」「ピボッと参上ピボッと解決」など。
弱点は大嫌いなVBAを使わないとテーブルのリアルタイム更新ができないこと。
┌─啓蒙先生─────
ピボット厨一派の過激派。Excelはピボットテーブルだけのためにあり、
それ以外の機能はワークシート関数すら不要と言い切る。ピボットテーブルで
解決できない質問からは威嚇しながら逃げる。最初から出てこなきゃいいのに。
┌─そのほか─────
ワークシート関数厨……何重にも入れ子になった複雑怪奇な数式を作り出し、
関数だけでどんな問題も解いてしまう。たまに自分でも何をやっているか
わからなくなる。悩みは数式バーが1行しかないこと、頭が薄くなってきたこと。

配列数式厨……意外と使えるやつだが滅多に出てこない、というか出番がない。
極めてマイナーな存在。見かけたらその日はいいことがあるかも。

ナレーター……誰か知らない人。

8:名無しさん＠そうだ選挙にいこう
08/10/08 19:53:05
453
テンプレ終了だけどうわああ順番が違う
次スレは>>1-2　>>4 >>5 >>3　>>6-7の順でおねがいします

9:名無しさん＠そうだ選挙にいこう
08/10/08 20:04:55
【1 OSの種類　　　　 .】 Windows2000
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】少しだけ
【4 VBAでの回答の可否】可
【5 検索キーワード　　】 Find search

Sheet1のB列に10000行の数字が並んでいます。
Sheet2のC列に100行の数字が並んでいます。
Sheet2にある数字がSheet1のB列にあれば
Sheet1の方のセルの色を変えたいのですが
お願いできないでしょうか？

10:名無しさん＠そうだ選挙にいこう
08/10/08 20:33:34
Sub TEST()
For B = 1 To 10000
For C = 1 To 100
If Sheets("Sheet1").Cells(B, 2) = Sheets("Sheet2").Cells(C, 3) Then Sheets("Sheet1").Cells(B, 2).Interior.Color = vbYellow
Next C
Next B
End Sub

11:9
08/10/08 20:41:29
>>10
ありがとう。助かったよ

12:名無しさん＠そうだ選挙にいこう
08/10/08 20:41:29
重すぎﾜﾛﾀ

13:名無しさん＠そうだ選挙にいこう
08/10/08 21:13:33
A1、A2,、A3　のそれぞれ数字６，７，８が入ってるとします。
以下の数式を、B1に書きます。
＝A1+A2+A3

その際、B1のセルに、個　という単位をつけて、出力させたいです。
B1セル内に、「～」個、みたいに書いておいて、計算の出力は「～」の部分のみに出力
されるなど、方法はないでしょうか？　

14:名無しさん＠そうだ選挙にいこう
08/10/08 21:37:18
>>13
書式で「0個」

15:名無しさん＠そうだ選挙にいこう
08/10/08 21:37:47
書式に　#"個"　と入れる

16:名無しさん＠そうだ選挙にいこう
08/10/08 21:38:11
>>13
B1に
=(A1+A2+A3)&"個"

17:名無しさん＠そうだ選挙にいこう
08/10/08 21:50:41
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2000
【3 VBAが使えるか　　 .】 a little
【4 VBAでの回答の可否】可
【5 検索キーワード　　】 VBA 抽出　重複
宜しくお願いします。
以下のようにあって、kudamono(1)=メロン　kudamono(2)=リンゴ　kudamono(3)=バナナ
kazu(1)=3 kazu(2)=2 kazu(3)=1という感じで格納したいとき、どの様にすればいいでしょうか？
ちなみに、果物は3種類とは限りませんし、セルが空白の場合もあります。
------------------------------------------------------------
メロン
バナナ
リンゴ
メロン
メロン
リンゴ

18:名無しさん＠そうだ選挙にいこう
08/10/08 22:03:38
>>17
ピボットテーブルでよくね

19:名無しさん＠そうだ選挙にいこう
08/10/08 22:25:10
>>1乙！
スマン、前スレで順番間違えたのは俺なんだ、、、、
許してくんろ。。。

20:名無しさん＠そうだ選挙にいこう
08/10/09 06:34:56
○の中に文字が書いてあるものを表現したいんですが、何か方法はありますか？

21:２０
08/10/09 06:38:47
URLﾘﾝｸ(mb1.net4u.org)

のようなものを表現したいんですが

22:名無しさん＠そうだ選挙にいこう
08/10/09 07:12:48
見れない
とりあえず図形と重ねるとか。重なりは最背面に設定

23:名無しさん＠そうだ選挙にいこう
08/10/09 08:41:35
>>21
URLﾘﾝｸ(www.vector.co.jp)
こいつで作れると思う
使ったことないけどｗ

24:名無しさん＠そうだ選挙にいこう
08/10/09 10:01:09
excelの表に数式を入れたら、枠内の左上に
緑の三角が表示されるのですがこれはどういう意味でしょうか？
また、これを消すにはどうすれば良いですか？

25:名無しさん＠そうだ選挙にいこう
08/10/09 11:18:17
知るかボケ
バージョンさえ書かない奴に答える口はねえ

26:名無しさん＠そうだ選挙にいこう
08/10/09 12:35:25
>25
まあまあ、初心者にはもう少しやさしくしましょう。
>24
このスレの№１と２をよく読みましょう。質問テンプレートを使いましょう。
で、ヒントを
ツール－オプション－エラーチェックのタブを見てください。それから
エクセルのヘルプで「エラーインジケータ」を調べるとわかるでしょう。

27:名無しさん＠そうだ選挙にいこう
08/10/09 14:04:05
>>20
オートシェイプでできる。そのままでも文字は入れられるけど、位置を微調整したいならテキストボックスを重ねる。

28:名無しさん＠そうだ選挙にいこう
08/10/09 14:04:46
>>24
まずはその三角をクリックしてみ

29:名無しさん＠そうだ選挙にいこう
08/10/09 14:12:54
すんまそん、ちょいと教えとくれやす
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2002
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否
【5 検索キーワード　　】エクセル　区切り位置　大量
ながいながーい数字が何行もありやして
=LENで見ると192やら384やらくらいの桁らしいんだぎゃ
ほんでもってこれを全部1セルにつき2ケタずつに分割したいんすっけど
区切り位置てーやつで2ケタずつクリックしていくのはマジKYてなもんでして
=MID(数字,1,2)、=MID(数字,3,2)・・・みたいな方法しかないでがんすか？
なんかこうセクシィにスマートにずんばらりんっと切り抜ける方法を教えてけろ

30:名無しさん＠そうだ選挙にいこう
08/10/09 14:18:41
>17
これって、配列と集計に関するＶＢＡマクロの一部に関する質問ということでしょうか？
セルアドレス表記が質問文中にひとつもなく、配列変数のことが書いてあるので。

dim kudamono(10) as string, kazu(10) as long １０種類と仮定して

kudamono(1) = "メロン"
kudamono(2) = "リンゴ"
kudamono(3) = "バナナ"
～
kudamono(10) = "＊＊＊＊"
ここらへんはシート上のデータから出現順、もしくは別の一覧データからの転記として、

If kudamono(n) = Cells(tate,yoko).value Then
　kazu(n) = kazu(n) + 1
End If
みたいなことがしたいんですか？

31:名無しさん＠そうだ選挙にいこう
08/10/09 14:20:04
>>29
A1にその数字、
B1=MID($A$1,(ROW()*2)-1,2)
後は下にオートフィル
横がよければrow()をcolumn()にすれば良いが、列が足りなさそうね

32:名無しさん＠そうだ選挙にいこう
08/10/09 14:27:04
>>29
VBAでTextToColumns使えばすぐに解決できそうだけど
>【4 VBAでの回答の可否】否
だからなぁ・・

33:名無しさん＠そうだ選挙にいこう
08/10/09 14:33:42
>29
どうしてもＶＢＡを使いたくないんであれば、以下の手順ではどうでしょう。

１　処理対象の行だけのシートにして（別の新規シートにコピーでも可）、テキストファイルとして保存
　　（拡張子はtxtがいいかも、csv(カンマ区切り)ではないですからね）
２　ファイル－開く－テキストファイル－スペースによって右または左に揃えられた固定長フィールドのデータ
　　→テキストファイルウィザード２／３の画面で２桁ずつ区切りを作成
　　（最大３８４桁ということは１９１回クリックすることになるのかな）
３　テキストファイルウィザード３／３の画面でデータ形式を文字列にしましょう
いかがでしょうか？

34:名無しさん＠そうだ選挙にいこう
08/10/09 14:39:08
>25
解答者の、人のレベルも色々混ざってるんだねぇ。
>26
テンプレートの件大変失礼しました。
お陰で解決しました。
以降このレベルの質問は初心者板でします。

35:29
08/10/09 14:58:16
>>31
おおぉぉぉありがたや～
それのcolumnでうまくいきやっした

>>32
すんまそん、村長から
「VBは悪魔の領域！けして近寄るでないないない」
と言われとるもんで・・・

36:名無しさん＠そうだ選挙にいこう
08/10/09 14:58:39
>34
「初心者板で」というか、ここがエクセル総合相談所だからここでいいんでは？

37:名無しさん＠そうだ選挙にいこう
08/10/09 15:14:45
>36
そうだね。
では、これからも質問させてもらいます。

38:名無しさん＠そうだ選挙にいこう
08/10/09 15:20:13
>>36 >>37
自演うぜー

39:名無しさん＠そうだ選挙にいこう
08/10/09 15:46:33
>>17

Sheet1の中にべた書きした。作業列が必要になったがB列に果物名を入れる。
作業列なくてもできると思うけど汚いよね。
ちなみに配列は０スタートなので・・いやなら-1いらない子

Public Sub FruitCount()

Dim ArrFruit() As Long
Dim Count As Long

Count = 1

Do
If Sheet1.Range("B" & Count).Value = "" Then
Exit Do
End If

ReDim Preserve ArrFruit(Count - 1)

ArrFruit(Count - 1) = WorksheetFunction.CountIf(Sheet1.Range("A:A"), Sheet1.Range("B" & Count).Value)

Count = Count + 1
Loop
End Sub

40:17
08/10/09 20:54:03
>>17です、いろいろご意見頂き有難うございます。
皆様の意見を参考にし以下のように出来上がりましたが、
もっと短く出来そうな気もしますので、何かありましたらご意見下さい。
---------------------------------------------------------
Sub くだものだもの()

Dim kudamono(10) As String
Dim kazu(10) As Integer
Dim count As Integer
Dim last As Integer
Dim f As Integer, y As Integer

last = Cells(65536, 1).End(xlUp).Row
count = 1

For y = 1 To last
If Cells(y, 1).Value <> "" Then
For f = 1 To count
If Cells(y, 1).Value = kudamono(f) Then
kazu(f) = kazu(f) + 1
GoTo Fruit
End If
Next

kudamono(count) = Cells(y, 1).Value
kazu(count) = 1
count = count + 1
End If
Fruit:
Next
End Sub

41:名無しさん＠そうだ選挙にいこう
08/10/09 21:02:03
勤務表を作成しているのですが

　A　　　　　B　　　　C　　D
始業　　　終業
8：00　　　17：00

このような表でCの列に9：00（8時から17時までの実働時間）と表示させたい場合
どのような式をCに入れたらよいのでしょうか？
昼休憩は考慮しなくていいです。

42:名無しさん＠そうだ選挙にいこう
08/10/09 21:03:50
>>41
B1-A1
場合によっては書式設定を[h]:mm等にすることも(合計などで、24:00以上を表記させたい場合)

43:名無しさん＠そうだ選挙にいこう
08/10/09 21:10:16
小出し申し訳ありません
23：00　　　1：00　などのように日をまたぐと＃＃＃＃になりますが
この対応はどのようにしたらよいでしょうか？
小出しほんとうにすいません

44:名無しさん＠そうだ選挙にいこう
08/10/09 21:15:58
>>43
時間はマイナスにできないから
=B1-A1+IF(B1-A1<0,1,0)

45:名無しさん＠そうだ選挙にいこう
08/10/09 21:23:58
ありがとうございました。
式の意味はわかりませんが無事できました。
時間はマイナスにできない　ってちょっとカッコいいですね。
浪漫を感じます。

46:名無しさん＠そうだ選挙にいこう
08/10/09 21:27:40
=MOD(B1-A1,1)

47:名無しさん＠そうだ選挙にいこう
08/10/09 22:39:58
>>45
分かりやすく変えると
=IF(B1<A1,B1-A1+1,B1<A1)
つまり終了が開始より前(日付をまたいでる)と、1(24:00)を足し、そうじゃなければそのまま引き算

最近このスレ全体でしき全体をネストするより式の一部をネストする式がはやってるよね
回答者が回答者に即発された・・のかな？

48:名無しさん＠そうだ選挙にいこう
08/10/10 02:16:47
excelでA4やA3に印刷する時収まりがいい行列の数あるんですか？
いままではなんとなくA4ぐらいかな？って作って改ページやら幅変えたり
して収めてたんですが最初からこんなレイアウトで作り進めばいいって感じがあるんでしょうか？
100％時、1セル縦横何ミリとか決まってますか？

49:名無しさん＠そうだ選挙にいこう
08/10/10 02:23:48
>>48
決まってません

50:名無しさん＠そうだ選挙にいこう
08/10/10 03:43:00
Excel2007の印刷プレビューで罫線が出なかったり太かったりするのは仕様ですか？
拡大⇔縮小で全然見た目違うしクリックした場所で変わったりするし
まるでプレビューにならんのですが…orz

51:名無しさん＠そうだ選挙にいこう
08/10/10 04:20:41
>>50
仕様です
Excelで印刷物を作るなら避けられない宿命です

>>48
改ページプレビューや
メニュー⇒印刷範囲の設定
などいじってると少し対処が見えてくるかも

Excelは「文書作成」ではなく「表計算」ソフトだから
成果物が紙ベースなのにExcelで作るなら
それなりの不便さと対処方を身につけないといけません

52:名無しさん＠そうだ選挙にいこう
08/10/10 07:12:12
複数のセルを囲むと合計数が表示されるオートSUM機能がありますが、これを
任意のセルを囲むと、たとえば（合計数＋４）÷２の結果ができるように
変更することはできないのでしょうか？
突然ですが、どうしても解からないので御助言よろしくお願いします。

53:名無しさん＠そうだ選挙にいこう
08/10/10 07:25:13
>>52
できないよ

54:名無しさん＠そうだ選挙にいこう
08/10/10 07:42:12
>>52
右下に出る奴ならオートカルクだよ
アレは合計・平均とあとなんか。ぐぐればすぐに見つかる

55:名無しさん＠そうだ選挙にいこう
08/10/10 09:30:48
>>53

普通に出来るだろｗ

56:名無しさん＠そうだ選挙にいこう
08/10/10 10:13:54
>>55
>普通に出来るだろｗ
だったらやり方書いとけｗｗ

57:名無しさん＠そうだ選挙にいこう
08/10/10 10:35:29
ぐぐってみたけどわからん。とりあえず代替案

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
　For Each r In Selection
　　合計数 = 合計数 + r.Value
　Next
　Application.StatusBar = "コマンド　　計算結果=" & (合計数 + 4) / 2
End Sub

58:名無しさん＠そうだ選挙にいこう
08/10/10 14:18:59
【1 OSの種類　　　　 .】 Windows2000
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】否
【5 検索キーワード　　】関数　参照　など
関数で数式そのものを参照することは出来ますか?
B1以降に=A1などの数式が入ってるとき、このA1という値が本当に入ってるかどうか、
作業列などで確認したいのです

59:名無しさん＠そうだ選挙にいこう
08/10/10 14:43:18
>>58
数式そのものを調べるのはちょっとめんどくさいよ。

調べたい列がB列で、作業列がC列とする。
まずC1セルをクリックして選択→メニューバーから「挿入」→「名前」→「定義」を選ぶ
次に「名前」のところに「suusiki」と入れて、その下の「参照範囲」のところに「=GET.CELL(6,B1)」と入れてOK
最後にC1に =ISNUMBER(FIND("A1",suusiki)) という式を入れれば、B列の式に「A1」が含まれるかどうかがわかる。

60:名無しさん＠そうだ選挙にいこう
08/10/10 15:03:22
>>58
書いててリロードしたら先越されてたｗ
なので少し>>59に補足
作業列の先頭(C1)を選択した状態で名前の定義をすること
それ以降のセルに書く場合は定義した定義した名前は変更しなくてよし

61:60
08/10/10 15:04:56
訂正
×それ以降のセルに書く場合は定義した定義した名前は変更しなくてよし
○それ以降のセルに書く場合は定義した名前は変更しなくてよし

62:名無しさん＠そうだ選挙にいこう
08/10/10 17:38:25
>>59
ありがとうございます!

63:名無しさん＠そうだ選挙にいこう
08/10/10 22:46:33
【1 OSの種類　　　　 .】 Windowsxp
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可･否
【5 検索キーワード　　】 excel vba worksheets.count
オープンしたブックのワークシート数をカウントして、String型の配列変数に格納したいのだが、いくらシート数があるかわからない場合、どうやって、WSheets()の()の中の数値を決めるのですか？
書き方を教えてください。
'******************************
'ファイルを開く
'******************************
Private WSheets() As String
Public Sub Main()
If OpenFile Then

End IF
End Sub
Function OpenFile() As Boolean
OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls")
If OpenFileName <> "False" Then
Workbooks.Open OpenFileName
For i = 1 To Worksheets.Count
MsgBox ActiveWorkbook.Sheets(i).Name
Next i
OpenFile = True
Else
OpenFile = False
End If
End Function

64:名無しさん＠そうだ選挙にいこう
08/10/10 23:04:00
Yes Takasu Clinic

65:名無しさん＠そうだ選挙にいこう
08/10/10 23:05:33
>>63
シートの数はWorkSheets.Countで求められる。配列のサイズをあとから変更するのはReDim。
つまり
ReDim WSheets(Worksheets.Count)

66:名無しさん＠そうだ選挙にいこう
08/10/11 00:48:31
24時間で主に15分単位くらいで
観測していて

10月10日
21：00-21：45
23：30-24：00
2：30-5：30

10月11日
23：15-23：30

このようなデータをとっているのですが
これを一日単位で折れ線グラフとして活用したいと思ってます。

　　　　　　10/10　　　10/11　　10/12　　10/13

2：00
1：45　　　　　　　　　　　│
1：30　　　　　　
1：15　　　　│
1：00　　　　│

たとえばこのようにグラフとして活用するための方法をおしえてもらえないでしょうか？
よろしくお願いします。

67:名無しさん＠そうだ選挙にいこう
08/10/11 01:02:47
>>66
グラフとして活用すればいいんじゃないでしょうか？

68:名無しさん＠そうだ選挙にいこう
08/10/11 02:28:55
>>66
・どういう形式のデータを取ってるのか分かりません。
何時から何まで、という時間のデータだけですか？
開始終了時刻はひとつのセルに入力されてるんですか？
・主に15分というが、15分おきに24時間とり続けてるの？
・事例がよく分からない。1日の始まりとして定めている時間はいつ？
・1日に何度もデータを取っているのに、横軸が日付で縦軸が時間だと
一般的な折れ線グラフとして書けないと思う。どういうのを考えてるの？

69:名無しさん＠そうだ選挙にいこう
08/10/11 02:57:31
　　　　　　10/10　　　10/11　　10/12　　10/13

2：00　　　　＼　　　　　｜　
1：45　　　　　｜　　　　│
1：30　　　　／　　　　　＼
1：15　　　　＼　　　　　　　＼
1：00　　　　　＼　　　　　／

こういうの想像した、無理っぽい気がする。

70:名無しさん＠そうだ選挙にいこう
08/10/11 03:27:29
正方形の中に1本だけ対角線を引き、できた片方の三角形に数字、もう片方の三角形に「月」などの文字を入れ
曜日付きの日付みたいな欄を作りたいのですが、うまくいきません。
どうやるのが一番スマートでしょうか？
（後々、第三者が数字部分などを書き換えて使いまわしできるようにしたいです）

71:名無しさん＠そうだ選挙にいこう
08/10/11 03:30:39
>>70
オートシェイプとテキストボックス

72:名無しさん＠そうだ選挙にいこう
08/10/11 04:52:31
Excelってなんでこんな何年も言われてる機能付けないの？馬鹿なの？死ぬの？

73:名無しさん＠そうだ選挙にいこう
08/10/11 07:02:50
>66
絵を見ていたら、「株価チャート（グラフウィザードの左上の絵）」に一番近いので、
元データを株価チャートに対応するように加工したらどうですか？
ただし、株価チャートには短い横棒がくっつくので目障りか。

どうしても66のような絵にしたいんだったら、VBAでオートシェイプ（直線）を配置する
ように工夫するしかないかな。

まずは№１と２をよく読んでテンプレートに沿って質問を。

74:73
08/10/11 07:46:54
株価チャートだと、縦方向にはひとつの縦棒しか表示できないな。
66の絵は元データとずいぶんかけはなれている。１０月１０日の分は
３件の時間帯があるのに、ひとつの縦棒だけ。
もっと具体的に元データと、ほしい結果の絵を示してもらわないと無理。

それか、セルをグラフの画素のように使う方法ならいろいろできるかも。

75:66
08/10/11 10:29:24
説明下手ですみませんです。
色々な回答をしていただきありがとうございます。

見本をつくってみました。まだわかりづらいかとは思いますが・・
URLﾘﾝｸ(www.uploda.org)

こういうことがしたいというだけで
グラフの形、項目の場所（行、列）などはあまり考慮してないです。

青で塗りつぶしてるエリアはデータ部分です。（1画面で見やすくするためにここに置いてます）

～やりたい事～
・同日にとびとびの時間を記録している
・同日の観測地点ごとに記録してある開始時間～終了時間までをグラフ化したい
・同日に観測地点が複数でる
・観測時間が重複？することがある（10/1茨城の部分のような感じ）

よろしくお願いします。

76:66
08/10/11 10:31:35
書き忘れました

【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】可
【5 検索キーワード　　】グラフ　集計　などで検索しましたがあまり効果的ではなかったので
主にできる大事典などの書籍で調べてます

77:73,74
08/10/11 11:17:30
>75,76
自分の今の技術だけだと７４で書いた「セルを画素として使う方法」がいいみたい。
アップローダを使ったことがないので画面イメージは下記を参考にしてください。

１：２　の高さ　40
３～　　の高さ　10
Ａ列の幅　　7
Ｂ列の幅　　2
Ｃ列の幅　　0.5
Ｄ列の幅　　2

A3:A4をセル結合、以下A5:A6、A7:A8・・・というようにセル結合
A3セルには　00:00　と文字で、以下下方向に00:15、00:30、00:45、01:00・・・と入力

B1:D1の横３列分を結合、E1:G1、H1:J1・・・というようにセル結合
同様にB2:D2、E2:G2、H2:J2・・・というようにセル結合

B1セルに'10/1を入力、B2セルに茨城を入力
C10:C25セルを黒に設定→０：４５～２：４５の時間帯に黒い縦棒が現れる。

もしくは、縦棒をセルの罫線（左、右どちらか）にしてもいいかな。
横方向は同一日で複数の箇所があったら３セル分ずつ右側にずらしていけばいい。

78:名無しさん＠そうだ選挙にいこう
08/10/11 13:32:47
ちょっと質問シテクダサイ

えーとタトエバ
・Ａでハジマルのかどうか
と
・Ｂでオワルのかどうか
というフタツのジョウケンをカンガミタ時
でてくるコタエは４通りあるだと思うます
それはスナハチ
１．Ａではじまるダケ
２．Ｂでおわるダケ
３．ＡではじまってＢでおわるダケ
４．ＡではじまないしＢでおわらいダケ

そこでこれをEXCEL計算式にしようとしたら
コマカイ部分はハシオリますが
IF(Ａではじまるか,IF(Ｂでおわるか,３,１),IF(Ｂでおわるか,２,４))
きっとこうなるますか？
シカシこの場合だと「IF(Ｂでおわるか,」という部分がダブルで使われているタメ
なんだかジョーチョウな気がしてします

もっと簡単な短い計算式にはならんのですか？

79:名無しさん＠そうだ選挙にいこう
08/10/11 14:49:32
Aではじまるか*2+Bでおわるか
でどう？

80:名無しさん＠そうだ選挙にいこう
08/10/11 15:48:08
>>78
＞２．Ｂでおわるダケ
ハジマリがナイのに、オワリがアルの？
ヘンなジョウケンだね

81:名無しさん＠そうだ選挙にいこう
08/10/11 16:20:48
>>78
何がやりたいのか、数値や文字列などを具体的に書けば、いろいろな関数を組み合わせて
もっとシンプルな式にできるかもしれない。

あと読みづらい。ちゃんとした回答が欲しかったら普通の日本語で書け。

82:名無しさん＠そうだ選挙にいこう
08/10/11 16:58:45
>>66
k5をJ6に
B5=IF(AND(A5>$J$5;A5<$J$6);"｜";"")
下にオートフィル。これでJ3に日付J4に地域書いて右へ右へ作っていけばいいんじゃないかな
当然この入力欄は別のところに作らないとその内かぶってしまうけど

83:名無しさん＠そうだ選挙にいこう
08/10/11 17:03:59
>>78
A1がA始まる場合B1に2を足す
A1がBで終わる場合B1に4を足す
じゃなきゃB1
なんて場合
=b1+if(left(a1,1)="A",2,0)+if(right(b1,1)="B",4,0)
って感じ
文字列だと＆演算子でつなげるとか

84:83
08/10/11 17:04:57
=b1+if(left(a1,1)="A",2,0)+if(right(a1,1)="B",4,0)
でした、失礼

85:名無しさん＠そうだ選挙にいこう
08/10/11 17:34:38
79で答え出てるのに馬鹿がウザい

86:名無しさん＠そうだ選挙にいこう
08/10/12 00:26:01
エクセル２００２　ウインドウズｘｐ　で質問！

①列を選択
②ダイアログＢｏｘに文字を入れ検索
③検索にヒットしたセルの左のセルに*を入力

具体例
①’Ｄ列・Ｆ列を選択
②’ダイアログＢＯＸに検索したい文字　イロハ　を入力
③’　イロハニホ　が入力されてるセルＤ１の左Ｃ１と
　　アイロノカニ　が入力されてるセルＦ３の左Ｅ２に*を入力

この作業のうち②と③（例は②’③’）をマクロで効率化したいと思っています。
詳しい方、コードを教えて下さい　m( )m

87:86
08/10/12 00:32:01
訂正

×・・・アイロノカニ　が入力されてるセルＦ３の左Ｅ２に*を入力
○・・・アイロノカニ　が入力されてるセルＦ３の左Ｅ３に*を入力

88:名無しさん＠そうだ選挙にいこう
08/10/12 04:36:40
イロハを検索してんのに、どうしてアイロノカニがヒットすんの？

89:名無しさん＠そうだ選挙にいこう
08/10/12 05:50:47
>>86
こんな感じか

Sub aaa()
　Set R = Selection.Find(What:=InputBox("検索文字列"), LookAt:=xlPart)
　If Not R Is Nothing Then
　　E = R.Address
　　Do
　　　R.Offset(0, -1) = "*"
　　　Set R = Selection.FindNext(R)
　　Loop Until R.Address = E
　End If
End Sub

90:名無しさん＠そうだ選挙にいこう
08/10/12 12:15:45

質問です。よろしくお願いします。
OSはWin-XP　ExcelのVerは2003です。

UserForm上に20前後のTetboxが配置してあります。
フォーカスの位置が分かりづらいために、Focusされている
Textboxの色を変えようとしていますが、色は変わるのですが
focusが外れた時に色を戻すことがどうしてもできません。

まずは、Textbox**_enterでFocusされたボックスの色が変わります。
入力が終わり、次のボックスへFocusが移動すると次のボックスの色も
変わりますが、元のボックスの色はそのままになってしますます。
ちなみに、Exit、及びLostfocusも試したのですがだめでした。

どなたか、ご指導いただけないでしょうか。。。。。
よろしくお願いします～。。。。

m(__)m

91:90
08/10/12 12:19:23

すみません。>>90　です。
一つ書き忘れてしまったので追記です。

TextboxのTabIndexは、上から順番になっていますが、
使う側が必ずも上から順に使ってもらうという想定ではないので
次のTabに移動したら色を戻す設定も失敗でした。

以上、追記です。すみません。よろしくお願いします。

m(__)m

92:86
08/10/12 12:53:18
>>89
ご回答ありがとうございます！火曜から仕事が楽になります！

欲張りな質問で恐縮ですが
全角・半角区別なく検索し、横のセルに*をつけることは可能でしょうか？

例

全角または半角のイロハで検索→全角と半角のイロハにヒットし、隣のセルに*

93:名無しさん＠そうだ選挙にいこう
08/10/12 14:10:44
ｽﾚﾘﾝｸ(tech板:496番)

94:名無しさん＠そうだ選挙にいこう
08/10/12 20:16:32
>>70
後々のメンテナンス考えたらセルの書式だけで片付けるのがいいかも
A1からB2をひとマスと考えれば
A1からB2の全体に外枠を付けて四角形にする
B1とA2には斜線も入れる（A列とB列は列幅を同じにしておく）
文字入力はA1とB2で

後は全体の書式設定上手にやればそこそこの見栄えになる

95:名無しさん＠そうだ選挙にいこう
08/10/12 21:38:06
>>90
普通に出来るけど
例えばこんな感じ
TextBox1_Enterイベントに
TextBox1.BackColor = RGB(0,0,0)を
TextBox1_Exitイベントに
TextBox1.BackColor = RGB(255,255,255)
で出来ないかい？

96:名無しさん＠そうだ選挙にいこう
08/10/12 23:14:38
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】全く分かりません
【4 VBAでの回答の可否】非
【5 検索キーワード　　】エクセル列　高さ

Sheet1の1から20行までのＡ列とＢ列を罫線で囲んでいます。
1から10までは行の高さを20、11から15はに設定しています。(各セルにはデータを入力してます)
同じサイズのセルを、同一Sheet内に限界まで縦に作りたいのですが、どうすれば良いですか？
(一番左上には連番を振りたいです。)

ちなみに、コピーして貼り付けをするとデータは保持されるのですが、行の高さが保持されておりません。
「形式を選択して貼り付け」も考えましたが、もっと効率の良い方法を探してます。

よろしくお願いします。

97:90
08/10/12 23:18:30

>>95さん　ありがとうございます。

簡単なシートを別に作成してやってみました。
確かにおっしゃるとおり普通に動きますね～。。。。
どうやら原因は当方の別にあるようです。

どうもお手数をおかけしました。何とか原因を見つけて見ます。
ありがとうございました。m(__)m

98:名無しさん＠そうだ選挙にいこう
08/10/13 00:10:30
>>96
今パソコン立ち上げてないから自信ないけど
（C列以降はデータがないとして）セルではなく行を選択してからコピー貼り付けでも駄目？

連番に関してはA1に
=(ROW()-1)/20+1

99:名無しさん＠そうだ選挙にいこう
08/10/13 00:18:22
>>96
限界まで選択して右クリック→行の高さ

100:名無しさん＠そうだ選挙にいこう
08/10/13 01:06:24
フィルタの詳細設定で、セルに指定した検索条件から該当行の抽出を行いたいのですが、

日時
2008/9/29 22:50
2008/9/29 22:55
2008/10/2 21:10
2008/10/2 23:31
2008/10/3 21:20

のような行の場合に、

日時
2008/10/*
や
2008/10*

のように検索条件を入力して、10月の行を抽出したいのですが、うまくいきません。
日時以外の列で違う値を指定すると抽出出来るので、
日時の検索条件に間違いがあると思い検索条件を錯誤してみましたが分かりませんでした。。
お分かりになる方おりましたら教えて頂ければ幸いです。

101:名無しさん＠そうだ選挙にいこう
08/10/13 01:15:25
>>100
日時がシリアル値なら「39722以上」かつ「39753未満」で10月が抽出できる

102:名無しさん＠そうだ選挙にいこう
08/10/13 01:20:33
>>100
シリアル値に慣れないうちは
2008/10/01以上
AND
2008/11/01未満
と打ち込んだ方がいいかも

っていうか私は今でもそうやってる

103:名無しさん＠そうだ選挙にいこう
08/10/13 01:36:58
WinXPでExcelは2007です。質問ですがお願いします。
="a"+(B1)　のような感じで、A1のセルに、
先頭に指定の文字列＋B1の値を入力したい場合はどうすればよろしいでしょうか。

104:名無しさん＠そうだ選挙にいこう
08/10/13 01:51:36
>>101,102
シリアル値にして検索に当たるようにする方法というのもあるのですね。
慣れない内はそのようにさせて頂きます。レスどうもありがとうございます。

105:名無しさん＠そうだ選挙にいこう
08/10/13 01:58:08
>>103
そういう場合は＋じゃなくて＆を使えばおＫ。

もしくは書式設定で"文字列"@といれても

106:名無しさん＠そうだ選挙にいこう
08/10/13 01:59:48
>>103
="a"&B1

107:103
08/10/13 02:00:32
自己レスです。
後方では　=(B1)&"a"で出来たのですが、
先頭にやる方法をご存じの方教えて下さい（´・ω・｀）

108:名無しさん＠そうだ選挙にいこう
08/10/13 02:01:23
>>105,106
ありがというございます！感謝！！

109:名無しさん＠そうだ選挙にいこう
08/10/13 02:53:19
(;´Д｀)ﾊｧﾊｧ

110:名無しさん＠そうだ選挙にいこう
08/10/13 18:48:15
質問です。A20～A100の中にデータの入ってるセルは何件あるかを
A15に表示させたいのですが、どのように入力すれば良いでしょうか。
EXCELは2007です。

111:名無しさん＠そうだ選挙にいこう
08/10/13 18:58:51
=COUNTA(A20:A100)

112:名無しさん＠そうだ選挙にいこう
08/10/13 19:03:16
>>111
感謝です。どうもありがとうございます。

113:77
08/10/13 19:59:36
>76　　観測データのグラフ化の件
遅くなりましたが、セルを塗りつぶす方法（№７７で示したシート利用）で作ってみました。
データシートにはＡ列：日付、Ｂ列：観測地点、Ｃ列：観測開始時刻、Ｄ列：観測終了時刻で
２行目から記録してください。長いので２レスに分けます。
Option Explicit
Dim TATE As Long, RETU As Integer
Dim SAVE_DATE As Date, SAVE_CHITEN As String
Dim WORK_DATE As Date, WORK_CHITEN As String
Dim WORK_TM_S As Date, WORK_TM_E As Date
Dim ST_G As Excel.Worksheet, ST_D As Excel.Worksheet
Sub 図作成()
Set ST_G = Worksheets("Sheet1") 'グラフ用シート
Set ST_D = Worksheets("Sheet2") 'データシート
ST_G.Activate
TATE = 2
SAVE_DATE = 1
SAVE_CHITEN = ""
RETU = 0
Do
WORK_DATE = ST_D.Cells(TATE, 1).Value
WORK_CHITEN = ST_D.Cells(TATE, 2).Value
WORK_TM_S = ST_D.Cells(TATE, 3).Value
WORK_TM_E = ST_D.Cells(TATE, 4).Value
Call PROC1
TATE = TATE + 1
If Not IsDate(ST_D.Cells(TATE, 1).Value) Then
Exit Do
End If
Loop
Set ST_G = Nothing
Set ST_D = Nothing
End Sub

114:77
08/10/13 20:02:02
Private Sub PROC1()
Dim TATE_S As Long, TATE_E As Long, YOKO As Integer

If (WORK_DATE = SAVE_DATE) And (WORK_CHITEN = SAVE_CHITEN) Then
Else
RETU = RETU + 1
ST_G.Cells(1, RETU * 3 - 1).Value = WORK_DATE
ST_G.Cells(2, RETU * 3 - 1).Value = WORK_CHITEN
End If
YOKO = RETU * 3
TATE_S = Hour(WORK_TM_S) * 8 + Int(Minute(WORK_TM_S) / 15) * 2 + 4
TATE_E = Hour(WORK_TM_E) * 8 + Int(Minute(WORK_TM_E) / 15) * 2 + 3
Range(Cells(TATE_S, YOKO), Cells(TATE_E, YOKO)).Select
With Selection.Interior
.ColorIndex = 1
.Pattern = xlSolid
End With
End Sub
１行目のセル書式は、日付（月/日）としておいてください。

115:名無しさん＠そうだ選挙にいこう
08/10/13 22:07:37
質問です。

A列とB列の数値を参照して
B>Aだった場合のB列のセルを装飾（塗りつぶし等）したいのですが、
どうやったらいいでしょうか？
Excelのバージョンは2007です。

116:名無しさん＠そうだ選挙にいこう
08/10/13 22:14:53
>115
セルの塗りつぶしだったら、操作の記録をしてみてどのようなマクロができるのか見ればいいですよ。
ちなみに、すぐ上の１１４のレスにセルの塗りつぶしのコードがあります。

117:名無しさん＠そうだ選挙にいこう
08/10/13 22:15:47
OSはビスタです。
すでに2007のExel、Wordが入っていますが、使いづらいので
以前使っていた2003のでやりたいんですが、変えられるんでしょうか？
できるのであればやり方を教えてもらえないでしょうか？
今までそういった質問はあったかと思いますが、お願いします

118:116
08/10/13 22:41:28
>115
マクロじゃなくて、セルの「条件付書式」が簡単だった。
ヘルプで調べてみるとわかると思います。
自分はエクセル２００７を持ってないので誰かお持ちの方、回答どうぞ。

119:名無しさん＠そうだ選挙にいこう
08/10/13 22:50:52
>>117
できません

120:名無しさん＠そうだ選挙にいこう
08/10/13 23:10:12
>>117
URLﾘﾝｸ(www.vector.co.jp)
メニューバーのことかね
有料版しか見つからなかったが、無料版があるなら俺も知っておきたいわ

121:115
08/10/13 23:15:48
>>118
条件付き書式で出来ました。
ありがとうございました。

122:名無しさん＠そうだ選挙にいこう
08/10/14 00:34:59
1 OSの種類　　　　 .】 Windows vista
【2 Excelのバージョン　】 Excel2007
【3 VBAが使えるか　　 .】使えないです
【4 VBAでの回答の可否】不可
【5 検索キーワード　　】 log 対数　グラフ　表

一つの表(例えば横軸が電圧、縦軸が抵抗のような表)を用いて、
横軸が対数・縦軸も対数のグラフを作りたいのですが
レイアウト→主縦軸→対数目盛で軸を表示
で縦軸は対数のグラフにできたのですが、横軸を対数に取ることができません。

可能なやり方がわからないので、助言お願いします。

123:名無しさん＠そうだ選挙にいこう
08/10/14 01:08:06
>>122
グラフの種類を『散布図』にすれば横軸も対数に出来ますよ

124:名無しさん＠そうだ選挙にいこう
08/10/14 01:18:44
>>123
完璧です。今までただの折れ線でやってました。
ありがとうございました。

125:名無しさん＠そうだ選挙にいこう
08/10/14 05:02:07
【1 OSの種類　　　　 .】 Windows2000
【2 Excelのバージョン　】 Excel2000
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否

すみません初歩的かもしれませんが
エクセルで挿入した図に○（丸）で印をつけたいのですがうまくいきません。
図形描画ツールバーの楕円を選択すると、画像がくりぬかれて楕円の中が白くなってしまいます。
しょうがないのでオートシェイプ→フリーハンドでやっているのですが、線が細くて見づらいです。
出来れば太くて赤などの目立つ線で丸で印をつけたいのですがどなたか教えていただけないでしょうか。
お願いいたします。

次ページ