Excel総合相談所 54

Excelに関する質問は、ここで！

▼━ 質問のしかた ━━━━━━━━━━━━━━━━━━━━
★1 質問するときは環境や条件はきちんと書いてね。情報後出しはダメ。
★2 要望は具体例や図を使って明確かつ具体的に。
★3 質問前に>>2-20あたりの注意書きや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やヘルプで検索してみてください。
　 ttp://www.google.co.jp/

前スレ(53)：http://pc10.2ch.net/test/read.cgi/bsoft/1169806266/

▼━質問時の注意･決まり事━━━━━━━━━━━━━━━━━━━━
･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 書籍や解説サイトの紹介以来はスレ以外。ここは技術的な質問のみで。

★ルールを無視すると…
　>>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
　　｜　 ｜└Worksheets
　というApplication以下のオブジェクトを､VB言語で操作するものを指します。　
　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､
　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。

★ 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セルを分割 (分割したいセル以外を結合)

★ Excelで出来ないこと、仕様上の制限 (括弧内は代用法)

　▼数式･関数
　 ･ 表示形式以外の書式の取得設定、書式情報を条件とする数式 (ユーザー定義関数)
　 ･ 関数式でセルの選択状態を取得する (VBA)
　 ･ セルの値でパスを補完して、開いてないブックのセルを参照する (VBA)
　 ･ 入力したセルに結果を返す (VBA)
　 ･ 範囲を引数にしての文字列連結 (ユーザー定義関数)
　 ･ 値の書き換え、値の保持 (VBA)
　 ･ 複数の結果を抽出、不定な数の結果を返す (VBA、結果の最大数が解っていれば最大数以上の式を論理式で組む)
　 ･ 空白のセルの部分を上詰め、左詰めなどで表示する (作業セルを使って別セルに詰めて表示なら可能、それ以外はVBA)
　 ･ VLOOKUP,HLOOKUP,MATCH等の関数で､検索語を全半角両方にマッチさせる (ユーザー定義関数)

　▼VBA
　 ･ ExecuteExcel4Macroの参照で空セルと0値を区別する
　 ･ セルの値や変数値で直接変数名を指定する (配列、コレクション)
　 ･ VBのコントロール配列と同じような操作をしたい
　　　(イベント以外ならコントロール名を｢同名+連番｣にしてControls(名前 & インデックス)で処理､イベントはクラスでWithEvents)

　▼ユーザーフォーム
　 ･ フォーム上から変更したプロパティ値の保持 (シートや外部ファイルに書き出して、次回読み込む)

　▼グラフ
　 ･ 棒グラフでひとつだけ突出したデータがあった場合に波線を入れて位置を合わせる
　 　(オートシェイプなどで見た目だけそうなるように弄る、別アプリでグラフを作り、オブジェクトとして挿入)
　　┌┐
　　〜〜
　　｜｜

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

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

ちゃんと前スレに誘導はれや役立たず共

>>1
乙です

>>7　変なヤツ

>>7
自分でできなくて他人に頼るなら、口のきき方考えろやクズが。



前スレ　Excel総合相談所 53
http://pc10.2ch.net/test/read.cgi/bsoft/1169806266/

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
　シートの保護にかけたパスワードを忘れてしまいました。どうにかして解除する
方法はありませんか？　検索したのですがサルベージ会社しかヒットしません。
よろしくお願いします。

>>11
諦めるかサルベージ会社に依頼しろ

Excel2007で、日本語部分と英語部分で別フォント指定することは出来ますか？
以前のバージョンでは日本語フォント指定→英語フォント指定 の手順でできたのですが。

貼り忘れです…
【1 OSの種類 　 　 　 　 .】 WindowsXP SP2
【2 Excelのバージョン 　 】 Excel2007
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 日本語 英語 フォント 指定 Excel 2007 1バイト 2バイト 混在 書体 等の組み合わせ

>>13-14
詳しく試したわけじゃないけど、
「ページレイアウト」タブ＞テーマ＞フォントから
「新しいテーマのフォントパターンの作成」を使えばできるっぽい。

2007ではテーマを使って色やらフォントの使い方やらをまとめて管理
するようになったみたいだから、ここに押し込まれたんじゃないかな。

>>15
なんかうまく適用されない感じなのです…

>>16
本当だ。メニューにあるだけでExcelだと日本語文字用のフォントしか
利かないねえ。すまんです。

Wordだと一発で利くし、Wordで書いたデータをExcelに持ち込む限りは
テーマで指定した英数字用フォントが生きているんだが、Excelで入力
するとダメ。よくわからん。

複合グラフで困っています。
EXCEL2003　OSはXPです。

月　　　総数　　件数　　　割合
1月　　　5 　　　　2　　　　40.0%
2月　　　9 　　　　4　　　　44.4%
3月　　　12 　　　7　　　　58.3%
4月　　　17 　　　6　　　　35.3%
5月　　　54 　　　22　　　40.7%

これを総数と件数を横棒グラフで表し、割合だけ
折れ線グラフにした複合グラフにしたいのですが、
まず横棒グラフを描き、割合だけ選択して折れ線グラフに
指定すると、折れ線グラフだけ「縦を軸とした」グラフに
なってしまって（１月〜５月の軸が横軸になってしまう）
棒グラフと合わないのです。

どなたかヘルプお願いします！

>>16
代用策。
Officeボタン＞Excelのオプション＞基本設定
「新しいブックの作成時」のところで「使用フォント」を
「Century」とかの英文フォントに変える。
新規シートから標準がCenturyになるが、
日本語はこのままでもMS Pゴシックで入る。

これ以外は思いつかんので、後は自分でなんとかするか
別のかしこい人を待ってくれ。

>>18
横棒グラフはエクセルにあっても、
横折れ線グラフという形式は用意されてないから
無理じゃないかな。

素直に縦棒グラフを使ったほうが吉。

セルA1の値を参照して、
　100<A1<200ならば、A1
　A1<100のときは、100
　A1>200のときは、200
を返したい。

IFでやったらこんなんなった。見にくいのでいい関数か式ありや。
= IF(A1<100, 100, IF(A1>200, 200, A1))

>>21
=MAX(MAX(A1,100),A1,MIN(A1,200))

>>20
横折れ線はないんですか！
ありがとうございます。
勉強になりました。代用策を考えてみます。

エクセル2002です。
あるセルの文字数を
全角30文字（半角60文字）までに制限するように設定したいのですが、
どうやれば良いのでしょうか

>>24
入力規則

>>24
データ＞入力規則＞設定
「入力値の種類」を「文字列（長さ制限）」

出来た。ありがとう

質問です。
B2、B6、B10、B14・・・と４つずつの間隔でセルを別の列に取り出したいんですが、
（例えばB2、B6、B10・・・をD1、D2、D3・・・のように）
どのように操作すればいいんでしょうか？

それともう1つなんですが、郵便番号などを入力する時に1234567のような数字だけ
の場合、違うセルに〒123-4567と表したい場合どのようにすればいいんでしょうか？

一応色々調べたのですが、検索に関してもシロートで見つかりませんでした。
どなたかよろしくお願いします。

>>22
ありがとうできた

>>28質問の意味がよくわかんないけど、

　　　１　　　　２　　　　３
D┃　=B2　 ┃　=B6 　┃　=B10　┃

ってこと？


２つ目の質問は、7桁の数字を入れるセル(列)でセルの書式設定をすればいいんじゃない？

>>28
もっと簡単な方法あるかもしれないけど、関数を使った一例。

質問１
B列（B1〜）にデータがある場合、D1に下の式を入れて下にドラッグ
=OFFSET(B$1,(ROW()-1)*4,0)

質問２
A1のセルに"1234567"がある場合、別のセルに
="〒"&LEFT(TEXT(A1,0),3)&"−"&RIGHT(TEXT(A1,0),4)

>>28
たとえば

D1=INDIRECT("B"&ROW()*4-2)
と入力してフィル･･･

とか？

>>28 2問在ったのか･･･。
表示させたいｾﾙ(の範囲)を選択して
書式→セル→(表示形式のﾀﾌﾞ)ユーザー定義をｸﾘｯｸし
種類のところに

"〒"000-0000

と入力してOKを押す

>>28
質問1
B2からB14を4つずつの間隔でD1からD4に取り出します。
Sub shitumon1()
　　Dim i As Integer
　　Dim j As Integer
　　j = 1
　　For i = 2 To 14 Step 4
　　　　Cells(j, 4).Value = Cells(i, 2).Value
　　　　j = j + 1
　　Next i
End Sub

質問2
A1に「1234567」がある場合、選択したセルに「〒123-4567」を表示します。
Sub shitumon2()
　　Dim Rng As Range
　　Selection = Range("A1").Value
　　Set Rng = Selection
　　　　Rng.NumberFormatLocal = "〒000-0000"
　　Set Rng = Nothing
End Sub

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 連続　データ　値　予測

資料作成でできなくて困っております。知恵をお貸し下さい。宜しくお願いします。
Sheet1のA1に、Sheet2のA1データを参照させたいので、Sheet1Ａ1には「=sheet2!A1」と入力しています。
ですが、A2に反映させたいのはSheet2のＡ9なので、「=sheet2!A9」と入力します。
という風に、反映させたいデータが、sheet2の8おきにある場合、どのような数式や関数を組めばよいでしょうか。
「Sheet2!A1」、「Sheet2!A9」、「Sheet2!A17」、「Sheet2!A25」、「Sheet2!A33」・・・・・・・・・・・・・・と
150行ほど入力したいです。
範囲選択して右下の＋をドラッグしても、フィルを使っても駄目でした。
どなたか、お詳しい方、宜しくお願いします。

長文失礼しました。つたない文章でご理解いただけるか不安です・・・

>>35
数式で参照式を作るなら
A1=INDIRECT("Sheet2!Ａ"&ROW()*8-7)
あとは普通にフィルコピーすれば良い。

又は
A1="=Sheet2!Ａ"&ROW()*8-7
を入れてフィルコピーし､フィルコピーした範囲を
選択 > コピー > 値の貼り付け(形式を選択して貼り付け > 値) > 置換 ｢= → =｣
とやれば､直接=Sheet2!A1､=Sheet2!A9､=Sheet2!A17､…という式が入る。

>>35
Ｓｈｅｅｔ1のa1に
=INDIRECT("Sheet2!A"&ROW()*8-7)
を必要数コピーでどう？

>>37
被った･･･ｏｒｚ

>>36サマ
>>37サマ
有難うございます！
おかげさまで週明けに間に合います！
本当に有難うございました！

【1 OSの種類 　 　 　 　 .】 Windowsxp
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 Excel Power, Excel E , 関数


0.00270636を100乗した値を出したいのですが
セルに=0.00270636^100と入力すると
1.732E-257という値になってしまいます。
ＰＯＷＥＲも使ってみましたが同じ値になってしまいます。
どうしたらだせるでしょうか。
よろしくお願いします。

どうやったら出せるかと言われても｢1.732E-257｣という正しい値が既に出ているわけだが。
指数表示をやめたいなら表示形式を数値にすればいいが､=0.00270636^100は
Excelの小数有効桁より遙かに小さいので0.000000000000…という表示にしかならない。
こういう極端に桁が多いものは､表計算ソフトではなく普通の計算ソフト使った方がいい。

0.00270636^100=
　0.00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
　0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
　0000000000000000000000000000000000000000000000000000000000173203472782078910573190543897537994776970
　5166415938794941045846428653433166768285287805674068782524550952101094989221422149695719136565195703
　4881899532990585607481073562848053731998088185414383128641675369837049359213281522685349303278909577
　5374087689522723706566612743018628900556594804853802350410341587787347456816903892630131791731829287
　9893014398704561158745310339417236178275360242466870654822123883721360734638505610993382873230191505
　245614902150615729235212582984887456749080559394739394058691243415918764228797251116257409033752805376

>>41様
ありがとうございます
あなたは神だ！
1.732E-257のＥってエラーの頭文字かとばかり…orz

むしろ逆に0.000000000000…みたいな表示を期待していたのか
ちょっと興味があるなｗ

並べ替えがうまくいかないときがあります
「ふりがなを使わない」のチェックははずしています。

北区
城東区
旭区
城東区
旭区
北区　
北区

となってしまうんです。
このデータは直接入力と貼り付けたものがあるんですが関係ありますか？

携帯からなので天ぷら無しで申し訳ありません。

【質問】今、商品管理台帳みたいなものを作ってます。表自体は既に完成していて、在庫情報を追加する際のユーザーフォームを作成中なんですが、ある一つの項目を入力するのに、コンボボックスを使います。
問題は選択項目が100近くにも上り、項目も随時追加されるため、ワークシート上にある範囲(A1:A200)からデータを引っ張りたいのです。
AddItemを使えないので、何かいい方法ありませんか？

>>44
とりあえず、ふりがなを表示してみれば。
表示されるふりがな通りになっているなら、並べ替え自体に問題はない。
なってないなら並べ替えの問題。

>>45
RowSource

但し空白も表示されるので､プロパティウインドウからではなく
コードでA1:A200の中でデータがある範囲を取得して適用した方がいいかも

>>47ｻﾝｸｽｺ！
携帯からだし、VBAは始めたばかりなので適当なんだけど、

Private Sub ComboBox1_Change()

　ComboBox1.RowSource = WorkSheet1!A1:A200

End Sub

って感じになるのかな？

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】はい
【4 VBAでの回答の可否】 可

ブックが大きいため終了時には、auto_closeにコードを書いてデータを消す処理を行っています。
エクセルの自動保存で定期的に上書き保存すると、データが消す処理を行えないので保存時間がかかりすぎます。
auto_open,auto_closeのような、自動保存時にコードを書ける場所はありますか？

>>49
無い。
自動保存自体を自前で作れば良いだけ。

>50
やはり無いですか。
Application.OnTime EarliestTimeで簡易的にコードを組んでみます

【1 OSの種類 　 　 　 　 .】 Windows XP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 Excel　不連続　列　空白行 挿入

Ａ列に不連続な数字が1500行くらい並んでいます。
数字が抜けているところを空白行で補完したいのですが、良い方法がありますか
http://vista.crap.jp/img/vi7230593203.png
よろしくお願いします。

44さんじゃないけど・・・
>>46
なるほど。
ソートがうまく行かないのは、直接入力と外部からのコピーが
混在していたからなんですね。
うーん、厄介。ブックから全部のふりがなを消したい・・・

>>52
VBA不可なら一つずつ挿入していくしかない
がむばれ

>>53
外部からのコピペ混在だけでなく、ワークシートに直接入力したものばかりでも、
変な読みで入力したデータが混じってたら、ソートはうまく行きませんよ。

全部のふりがな消したいって気持ちもわからなくはありませんが、
エクセルでいちおう50音順ができるのは、まがりなりにもふりがなを使って
いるからでもあるわけで。
…ダメならExcel95時代のように「ふりがな」を入力した列を別に作って
そこでソートなんつーことをやらにゃなりませんw

>>52
B1=IF(COUNTIF(A$1:A$10,ROW()),ROW(),"")
を入れて､フィルコピー
必要ならB列をコピーしてA列に｢値の貼り付け｣

>>52
連続した数値のB列を作りなさい
C列に
　=IF(COUNTIF(A:A,B1),B1,"")
などと関数を入力して連続データを入力した最後までフィルでコピーしなさい
C列はA列に無い数字を空白にした数字の一覧になる
結果だけ欲しいなら、その後C列をコピーして形式を指定して貼り付けしなさい

>>54
VBAで可能ならVBAの方をがんばります。
VBAってこんなこともできるんだぜって
VBAに取り組むきっかけとして答えを下さい。

>>56-57
ちょっと待って、やってみる

>VBAに取り組むきっかけとして答えを下さい

きっかけなら答えじゃなくてもいいような気が…

>>58
誰だおまいは？

>>56-57
やりたいこととちょっと違うです。
A列の数字は行の見出しみたいなもので
各行、横にずーっとデータが入ってます。
なので挟み込むのは「行」じゃないと・・・

>>60
実用的なものが一個あれば
そこから発展させていけるじゃない？

>>62
B列を新たに挿入して､A列をB列にコピー
B11=IF(COUNTIF(A$1:A$10,ROW(A1)),"",ROW(A1))
を入れてフィルコピー､B列をキーに並べ替え､B列を削除。

以上。
VBAは最初に｢否｣と書いたので､情報後出しにはコードはあげない。
ヒントとして｢Forループ､Ifで条件分岐､Insertで列挿入｣と教えておこう。

>>62
世話が焼けるな
これならどうだ
C列までデータが入っているとする
Sheet2に以下の関数を入れたら、前の回答と同様にフィルコピー
空白を参照してるってエラーが出るけど無視してよし

　Sheet2 A1=IF(COUNTIF(Sheet1!A:A,ROW()),ROW(),"")
　Sheet2 B1=IF(A1="","",VLOOKUP(Sheet2!A1,Sheet1!A:C,2,FALSE))
　Sheet2 C1=IF(A1="","",VLOOKUP(Sheet2!A1,Sheet1!A:C,3,FALSE))

>>56
これはこれで凄いな
保存した

>>63
後出しになりましたね。選択肢が「可・否」2つしかなかったからね。
でもテンプレ用意されてる場所で
現状「否」だけどやってみようという意思、できるようになりたいって
気持ちまで伝えるのはかえってウザくないですか？

ヒントをありがたく頂きました。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 はい　
　　　　　　　　　　　　勉強のためにVBAを使って作りたいので、
　　　　　　　　　　　ぜひVBAで回答お願いします。

http://www.uploda.org/uporg705420.gif　
以下のような条件を設定して、画像のような表を、VBAを使って作りたいのです。
・　C3やA1など、特定のセルに月初めの日付を入れたら、
　月末まで自動的に日付と曜日が埋まるようにして、
　土曜日は青、日曜日はピンクで列を塗りつぶしたい
・　中三日でダンゴを打ちたい
・　「◎」と「▲」と「日」は土日のみ、という入力規則を設定したい。

よろしくお願いします。

贅沢な質問だな

多分ここに常駐している人には易しい質問なんだけど
条件多いとコード書くのめんどくさいんだよね・・・
勉強したいなら丸投げは逆効果だと思うしさ

勉強なら自分でやれってとこだろ

スレ的には丸投げを許容してるから､プログラム関係のスレみたいに
丸投げしたこと自体を叩かれることは無いが､
丸投げに応じようって奴が少ないのは仕方のないことだ。

単に面倒って奴も居れば､楽して利を得ようって態度が気に入らないから
叩きもしないが回答もせずに無視するって奴も居るだろう。
スレで許容されてることを叩くのは勝手じゃないが､回答しないのは勝手だからな。

>>67
解答しようと思ったら行が多すぎてエラーになりました。
やはり自分で考えてください( ´∀｀)σ)´Д｀)

勉強のためって言ってる人にコード書いたところで勉強にならないのが
分かりきっているからだろ
自分でこうやったができないので教えてっていうのなら手伝うやつもいる
だろうけど

俺が以前いた会社のやり方に似てるな
素人を装って質問を色々なサイトに投稿して面白いアイデアを探す
もちろん期待はしてないが有ればメッケモン程度
それでも年に１つくらいは「こりゃ気が付かなかったな」ってのが出てくる

>>74
個人レベルで「当たればめっけもん」とやるのはまだわかるが、
企業がやるにしてはずいぶん効率悪いやり方だと思った。

効率は関係ない、釣竿たらしてほっとくだけ
たまに見に行って、引っ掛った魚がいれば回収
ほとんどがバカ回答だから真剣になっちゃダメ

>>74
いや､それは無いだろう。｢素人を装って｣ということは素人ではないことになるが
素人でないならこの程度のことを実現するコードじゃ､どういう実装でも｢メッケモン｣にはなり得ない。
もし君が言うようなのを狙ってるなら､もう少し複雑なこととか､多様なアルゴリズムが
提案されそうなものとかを投稿するだろう。例え情報収集目的だったとしても､装うまでもなく本物の素人だろうし
こんなので>>74みたいな読みをする74自身も素人か素人に毛が生えたくらいだろうな。

>>76
いや、それにしても。
その釣竿たらしたり、たまに見て回るだけの労力を
別のことに回せよなと思っただけ。

閑話休題。

一番目の条件についてはできたお(´-`)

Sub 表作成()
　　Call 日付曜日挿入
　　Call 幅を揃える
　　Call 土曜青日曜ピンク
　　Call 顔文字と罫線
End Sub

長すぎて4つプロシージャ作ったお

曜日と書式設定、入力規則は固定なんだから、どっかのシートに37日分つくっといて
月始めの曜日に合わせてコピーして人数分だけフィルすればいいんじゃね？

表を作りたい日付を例えばA1に入力して
日付はその月の月末日を出してその数だけループして入力。
曜日はWeekdayとWeekdaynameで出してその1文字目を表示。
後は月末までの範囲にオートフィルで入力するようコードを作ればいいよ。
月末までの範囲はすでに日付を入力しているから取得できる。

全部できたお(´-`)

Sub 表作成()
　　Call 日付曜日挿入
　　Call 幅を揃える
　　Call 土曜青日曜ピンク
　　Call 顔文字と罫線
　　Call 中三日
　　Call ◎▲入力規則
End Sub

質問なんですが、

A1目標、B1実績、C1達成率で達成率を実績0なら0％、最大でも100％以上にはならないように表示するにはどう組んだらいいんでしょう？

表示形式を
[<1]0%;"100%"

>>84
それだけでＯＫ？
ありがとう！

どうして、エクセルのデフォルトはＲ１Ｃ1形式なんだぜ？
すげーーーうざい。

それ、どこのエクセル？

どうして、｢どうして｣という疑問系で始まり､｢なんだぜ｣という断定系で終わり､最後に疑問符が付くの？
すげーーーうざい。

ちなみにうちのExcelはデフォルトでA1形式です。

オートフィルって1、2と最低2までは入力しておかないと
機能しないのですか？

>>88
2ch語

>>89
1だけでも機能するでしょ。

オートフィルとは連続データの補填機能。1の連続データなら1,1,1,1,1,…となる。
1,2,3,4,5,…にならないのがおかしいと思ってるなら､そう思ってる君自身の間違い勘違い思い違い。
オートフィルは連番作成機能じゃないからね。あくまで連続データ作成機能の一環として
複数の数値を始点とすると､その差分を反映した規則的連続データ(連番)を作ってくれる機能があるというだけ。

因みに1だけを指定してもCtrlキーを押しながらだと1,2,3,4,5,…というデータになる。
これはオートフィルにおいてCtrlキーの押下状態が､単純連続と規則的連続の反転作用を持っているから。
オプションの｢ユーザー設定リスト｣に指定されてるものは､ひとつのデータを始点にしてオートフィルを行っても
単純連続ではなく指定した規則に沿った規則的連続となるが､Ctrlキーを押下していると単純連続になる。
そして単純連続になるはずの､ひとつの数値データを始点としたオートフィルでは､Ctrlキーを押下していると
+1の規則的連続データになる。これは1から始めても2や0.1からでも+1なのは変わらない。

sun
　通常 → 規則登録があるので規則的連続データ(sun,mon,tue)
　Ctrl → 登録規則を無視して単純連続データ(sun,sun,sun)

1,2
　通常 → 差分規則を適用した規則的連続データ(1,2,3,4,5)
　Ctrl → 差分規則を無視して単純連続データ(1,2,1,2,1,2)

1
　通常 → 規則登録無しでデータひとつで差分も糞もないので単純連続データ(1,1,1,1,1)
　Ctrl → データひとつでも数値の場合は+1の規則的連続データ(1,2,3,4,5)


初心者でも大抵は知っていて､何気なく使っているオートフィルだが､案外こういったことをきちんと知らない人は多いみたいだな。

そういう細かい事よく覚えるきになるね

一度動作仕様を知ったら､頻繁に使う機能だから忘れようが無いだけだよ。
車の運転だって相当細かい事だが､稀少な標識とか交通規則の一部とかを部分的に忘れることはあっても
日常的に運転してれば､一般公道の走行が困難なほどに車の操作や主用交通規則を忘れることは無いだろ。

　C　　D　　E　　G
100　　　　100　200　　　1日
200　　　　300　700　　　2日

練習のためにこういう表つくってるんですが
CとEの数字をGで合計としてだしてます。
CとEなどの行単位での合計はだせるのですが
上のようにGに累計として出す場合の式がよくわかりません。
小一時間悩んでます。　ちなみに本はFOM出版のマウス問題集とかいう奴です。

行単位の合計と累計は別に出した方がいいよ。まずはG列に
=C1+E1
=C2+E2
=C3+E3
と行単位の合計を出して､H列あたりに
=G1
=H1+G2
=H2+G3
と累計を出す。どうしても累計だけ出したいなら
=C1+E1
=G1+C2+E2
=G2+C3+E3
でいいし。

というか､これが出来ないレベルでMOUS試験問題集はちと早すぎないか？

できますた。サンクス
本はどうせやるなら検定目指してやる方がいいかと思い
これにしました。
ちょとレベル高いのかな？関数以外は楽勝なんですが
関数とか式が難しい・・

>>55

どっちにしろいちいち入力しないといけないということですか？

>>92
別に細かくもややこしくもないぞ。
Ctrlキーを押しながらやれば機能が反転する。
ただそんだけのこった。

>>97
そういうこと

外部データからテキストをコピーしてくると ふりがな は付かないから
それなりに工夫する必要あるんだよ

>>97
入力から全部やり直さなくても、ふりがなだけ修正すればいいんだけどね。
99さんの言う通り、なんらかの工夫はしなけりゃならない。

作業を補助するためのマクロってのも前に見たような気がするけど
どこだったか忘れた。すまん。

>>97
なんのこたあない。ちょっとぐぐったら山ほど出てくるわ。
http://hp.vector.co.jp/authors/VA016119/hajimete/cell1.html

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 数式　答え　固定

=E2+C2　などの計算式をいれたあとに計算数値をいれ計算完了したものに答えを固定したいのですが
E2の入力値が変わると連動して答えも変わりますよね、いちいち手入力で書き換えるのは途方もない時間がかかりますので
どうにか方法をおしえてください

わかりにくい表現でごめんなさい

質問があります。
オートシェイプでセル内に→を書いたとします。
それを斜め下のセルに、コピーする際、上と同じ位置に置けるよう
一発でコピーすることはできますか？
ｲﾒｰｼﾞとしてはセルと→を結合させてコピーさせるような。
他の方法でもかまわないのですが。

セルをコピーすれば、→もコピーされるよ。
セルの大きさを揃えておく必要はあるけど。

>>103
実際に自分でやってみれば、コピー元と貼り付け先のセルの幅・高さが同じである限り、
勝手に寸分違わぬ位置に置いてくれることがわかると思うのですが。

>>102
コピーと値の貼り付け

え？ほんと？おかしいなあ。昨日ならなかったんだよ。
セルをアクティブセルにしてコピーすれば→はなく、空。
オートシェイプをアクティブにすれば→のみしかついてこない。
・・・おかしいなあ。。。もう一回やってみるね。

なりました。昨日自宅のｐｃではまったくこうはいかなかったのですが。
単純な作業だし間違うはずもないのだが・・・なぜだろう。

いきなり関係ない話ですまんが、2007ではページレイアウトビューを使うと、
行の高さやセルの幅はcm単位の指定になるんだな。

こういう小技は気が利いているw

幅を変えたセルを戻るボタンを使わずに
標準サイズに戻ることって可能でしょうか？
すべて戻すのと一部戻すのと知りたいです

>>110
2003までなら
書式＞列＞標準の幅

OS：Windows2000
バージョン：エクセル2000

シートなどをメール送信するさいにエクセルのボタンなどで
送信しようとするとアウトルックが立ち上がるみたいですが
これを違うメーラーに変更する事は出来ないのでしょうか？

WIN XP、excel2002です。

桁について教えてください。
「10,000,000」と入力すると画面には「100」と表示
されるようにするには、表示形式をどうしたらよいでしょうか？
よろしくお願いします。

>>112
確かWebへのハイパーリンクをクリックした際に使用するブラウザを指定できないのと同じで
メーラーも設定の変更は出来ない仕様かと。VBA使えないとも使いたく無いとも書いてないので
｢VBAで任意のメーラーを使用して送信するボタンを作ってください｣って回答でOkだよね。(>>3参照)

>>113
0[LF]00000
って表示形式にして､セルの高さを1行分に設定し
縦位置を上詰め､折り返して全体を表示するを有効､で良いかと。
因みに[LF]はCtrl+JでLine Feedの制御文字入れてね。実際には
0
00000
という2行の表示形式定義になる。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 塗りつぶし　値

別のセルの値によって、違うセルを塗りつぶしたいのですが、
どうすれば、可能ですか？
すいませんが、お願い致します。

>>114
ありがとう

>>115
条件付き書式を使えばいいよ

【1 OSの種類 　 　 　 　 .】 Windows XP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 入力規則　特定文字

入力規則で特定文字のみを許可する設定は出来ますか？
ただし、リストを使うと、セルを選択した時にプルダウンが出るのが
うっとうしいので、リストにはしたくないんですが…可能でしょうか？

>>106
出来ました
ありがとうございました

エクセルがただの表計算ソフトでないところを・・
みせてやる！！！！

有料だから少なくともただではないな。

>>112
IEで設定する

IEもアウトルックも削除した俺はどうすればいい？
まぁエクセルデータをメールで送ることなんてないけど。

コントロールパネルのインターネットオプションが残っていれば
そこのプログラムで設定すればどうにかなるかも

>>117

できました！！ありがとうございます。

>>101

レスありがとうございます。
キーワードは「ふりがなを自動設定」で検索すればいいですか？

>>126
単に101が書いてるリンク先を見てみればいいんじゃない？

【1 OSの種類 　 　 　 　 .】 WindowsXP SP2
【2 Excelのバージョン 　 】 Excel 2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可

100
101
102
103
○●◇◆△▲
□■▽▼☆★

↓↓↓↓↓↓

○●◇◆△▲
100
□■▽▼☆★
○●◇◆△▲
101
□■▽▼☆★
○●◇◆△▲
102
□■▽▼☆★
○●◇◆△▲
103
□■▽▼☆★

上のように数字が縦に並んでいるものを○●◇◆△▲と□■▽▼☆★を使って
下のようにサンドイッチしたいのですが、可能でしょうか？
よろしくお願いします。

>>128
その数字と記号がA1:A6に入ってるとして､
B1=A$5
B2=INDIRECT("A"&(ROW()+1)/3)
B3=A$6
でいいんじゃね？

>>129
すばやいお答えありがとうございます。m(_ _)m
さっそく試してみます。

>>129
すげー、できました。感動です。
本当にありがとうございました(*´∀｀)ﾉ

>>128
Sub sandwich()
　　Dim rg1 As Range
　　Dim rg2 As Range
　　Dim i As Integer
　　Dim j As Integer

　　Set rg1 = Range("A5")
　　Set rg2 = Range("A6")

　　For i = 1 To 9
　　　　Cells(i, 1).Insert Shift:=xlDown
　　　　i = i + 1
　　Next i
　　
　　For j = 3 To 10 Step 2
　　　　Cells(j, 1).Insert Shift:=xlDown
　　　　j = j + 1
　　Next j

　　For i = 1 To 10 Step 3
　　　　Cells(i, 1) = rg1
　　Next i

　　For j = 3 To 12 Step 3
　　　　Cells(j, 1) = rg2
　　Next j

　　Range("A65536").End(xlUp).Offset(-1, 0).Select
　　Range(Selection, Selection.End(xlDown)).ClearContents
End Sub

>>132
おつかれ

>>132
ツッコミ所多すぎてﾜﾛﾀ
VBA始めて3日目ってところか

>>132
ちょｗｗｗｗｗｗｗｗｗｗ
俺の為にマジでありがとうございます。
【4 VBAでの回答の可否】 可とは書いたものの、ど素人なんであまり分かってないのですが（；＾ω＾）
今回>>129さんにも教えてもらい、知識を持っている事の素晴らしさに感動しました。
せっかくなんでちょっと勉強してみようと思います。>>129さん>>132さん、本当にありがとうございました。m(_ _)m

>>134
1日目です('A`)

VBA2日目に突入したので短くしたど('A`)

Sub sandwich2()
　　Dim rg1 As Range
　　Dim rg2 As Range
　　Dim i As Integer
　　Dim j As Integer

　　Set rg1 = Range("A5")
　　Set rg2 = Range("A6")

　　For i = 1 To 8
　　　　Cells(i, 1).Insert Shift:=xlDown
　　　　Cells(i, 1) = rg1
　　　　i = i + 1
Next i

　　For j = 3 To 12 Step 2
　　　　Cells(j, 1).Insert Shift:=xlDown
　　　　Cells(j, 1) = rg2
　　　　j = j + 1
　　Next j

　　Range("A65536").End(xlUp).Offset(-1, 0).Select
　　Range(Selection, Selection.End(xlDown)).ClearContents

　　Set rg1 = Nothing
　　Set rg2 = Nothing
End Sub

他言語経験無しで2日目なら､なかなかのもんだな。

>>138
俺もそう思う
>>137見る限り他言語の経験はなさそうだから、やっぱりたいしたもんだ

65536をハードコードすることについて前から思ってたんだけど
2007では100万行とか使えるらしいじゃん？
全部書き直し？なんだかな〜

シートをそのままコピーした後に
ウインドウの固定をやろうとしても
シートの真ん中で十字になってうまくいきません

似たような症状を改善されたかたいますか？
エクセル2000です

>>141
今試してみたけど問題なく固定できた。
固定したい行の１行下を選択してる？

>>140
Rows.Count

>>140
どっちみち、rowの変数をintegerで宣言している人多いですから。

>>140
そこまで多いデータ数扱うならExcelだと重すぎ
素直にデータベース使う仕様に変更したほうがいいよ

A1からK1まで選択するときに本などではCtrlを押しながら
選択してくださいと書いてありますが
なぜCtrlを押しながらじゃないとダメなのか書いてないです。
これはなぜ押す必要があるのでしょうか？

>>146
状況がよくわからんが「A1からK1まで」ならShiftキーじゃないのかな？

A1クリックして、次にK1クリックしたときと、
A1クリックして、次にShiftキーを押しながらK1クリックしたときとを
比べてみれば違いはわかる。

Ctrlキーを押しながらというのは、普通は離れた位置にあるセルを
同時にクリックしたい場合に使う。
これもA１クリックして、次にCtrlキーを押しながらK1クリックすりゃ意味はわかる。

>>147
下から２行目
×同時にクリック　　○同時に選択

すいません書き方がおかしかったです。
A1からK1まで（セルは連続してれば特にどこでもいいです）
選択するときに自分は常にマウスの左をおしっぱで
そのままカーソルをツーっとK1まで動かしてA1-K1まで選択してるんですが
いわゆるドラッグってやつですか。
本によるとCtrlを押しながらA1-K1まで選択してくださいとか書いてあったり
書いてなかったりします。
やってる事同じだと思うのですがCtrlを押しながらドラッグすると
なにか違いが生じるのでしょうか？

やってることが違います
その本を読んだ上で質問しているのなら
ここで説明を受けても理解できるとは思えません

やり方は１つじゃないって事だよ
自分のやりやすい方法でドーゾ

>>149
A1からK1までをそうやってドラッグで選択した後、
A5からK5とか（前の範囲から離れていればどこでもいい）を
Ctrlキーを押しながらドラッグしてごらん。
Ctrlキーを押さずになった場合との違いはそれでわかるから。

本によってそういう書き方をしているわけではなく、
そういうセル選択が必要な場合にだけ、そう書かれているんだと思うが。

説明できないアホは消えろ
CTrl使うのはキーボード操作で同様の操作をする時用

Ctrlで選択するのは離れたセルを同時に選択するためだよ

ボクの肛門も選択されそうです

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

セルを左クリックで選択すると、そのセルが選択されたままで、
カーソルを動かすとそのセルを起点とした範囲選択の動きになり、
右クリックメニューが開けず、他のメニューも何も使えなくなってしまいます。
（何も出来ないので強制終了しかない。）
他のファイルでは起こらず、特定のファイルでのみ発生します。
どうしたらよいでしょうか。

そのファイルに変なマクロが入っていないか確かめる
そのファイルに変な設定が入っていないか確かめる
クリックする前に別名で保存してそちらで試してみる

>>157
マクロは確認しました。何もなかったです。
ツール＞オプションでは特に怪しい部分は見つからず。
別名で保存してもコピーしても名前変えてもダメ。

・・・と、いう状況です。
毎回起こるわけでなく、再起動で起こらなくなったりもするのですが、
またしばらくすると起こったりします。

>>158
F8キー押したら一時的にでも直らんか？

>>159
Ｆ８とはまた違う動きです。
メニューやツールバーさえも使えません。
メニューやツールバーの位置にカーソルを持っていっても、
シート上にあるときのような十字マークのままで、クリックできないのです。

>>160
んじゃすまんがわからん。

そのブックになにか破損箇所でもあって悪さしとるとしか思えん。
データだけテキストに落とすなりなんなりして、別のブックに移せん？

>>156
ScrollLockキー？

質問です。初歩的なことかも知れませんが…。

A5のセルを参照し、もし空白ならB5を表示させる

と言う条件式はどういう風に書けば良いのですか？

=IF(A5="",B5,"")

「4か5」　「4または5」 などを数値として表現できますか

( ﾟдﾟ)ﾎﾟｶｰﾝ

なんつーか、アレ

ゴールシークを使うとき、目的セルは絶対参照に
わざわざしないといけないですか？　MOSうけるんで・・

>>165
小学生でも解ることだと思うが､｢4か5｣ってのは条件であって数値じゃないよ
だから条件式としては表現出来るけど数値として表現するなんて無理

エクセルでオークションの落札案内テンプレを作っているのですが
それをテキストにコピペしたときにTABが
テキスト

？

>>168
試してみればすぐにわかります。
その結果の通り。

文書いてる途中で「書き込み」ボタン押してしまいました
すみません。

エクセルでオークションの落札案内テンプレを作っているのですが
それをテキストにコピペしたときにTABが
入ってしまう現象に困っています。
TAB無しでコピペできないものでしょうか

具体例を用いるとこんな感じ
{}=セル

{落札代金は}{=A3}{円になります}
{}
{300}

これをテキストにコピペすると
落札代金は 500 円になります

となってしまう

エクセルを使ってるんですけど
TABが

エクセル2002です

落札代金は 300 円になりますります

の間違い

　

|Д｀)　･･･
|⊂
|

ワード使えよデブ

age質問の奴って聞くだけなのな。

お礼でもいわれたいのかい？

急ぎでおねがいしますｍ（__）ｍ

>>182
そのテキストエディタでTABを一括置換すればいいじゃない。

>>183
なるほど、参考になりました
ありがとうございます

なお182は偽者です

↑なにこいつ

MOUSってマウスって読めばいいんすか？

MOUSって読めばいいんだよ

「申す」？

ボビー・オロゴンか

バルス

マンモス

えむおーゆーえす

>>186
うん。

　

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 図、作図

Excel2003で工場内や倉庫内のような見取り図を作成したいと思っているのですが、
例えばショッピングセンターの棚の陳列図のようなものです。
どこから手をつけていいのかわかりません。
何をどう質問したらいいのかすらまとめられない次第です。
なにかアドバイスをいただけたら幸いです。

>195
Excelを使う意味があるのかどうか激しく疑問に思うが、
とりあえず図形描画ツールバーを出して、オートシェイプ図形の扱い方を覚える。
図形の作り方とか移動、消し方、文字入れ、書式、グループ化などなど。
やってみて質問ができたら、またおいで。

>>165　=IF(OR(A5="4",A5="4"), "",B5,"")

=IF(OR(A5="4",A5="4"), "",B5)

>>197
引数多いし

あ。すまん。リロードしてなかったわ。
でもそれ、>165の求める内容になってるの？

>>195
ちょっと具体的に何がしたいのか分からないけど
セルの結合と罫線だけで書けると思う。

>>195
陳列棚で単純で規則的に並んでるなら
セルに文字を打って罫線で囲って背景色などつけられる。
セルの統合、分割、行列の幅を適当に変える。

見取り図なら、まず図の作り方に慣れる。
196と意見はおなじ。

回答者ご諸氏、回答ありがとうございます。

仕事から帰ったら試してみます。

>>203
名前欄を忘れました。ﾍﾟｺﾘ

>>146
悪いことはいわん。
キーボードの操作をちょっとでも調べろ。
マウスでできないことや、びっくりするほど
簡単にできることが、山ほどある。と思う。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 日付　印刷　連続　連番　を変えながら
質問です。エクセルで3ヶ月分の日誌を印刷したいのですが
G1は 現在　　　月　　日　( )　にしてあります
これを　1枚目　３月８日(木）
　　　　2枚目　３月９日(金）
　　　　3枚目　３月１０日(土)
という風に、日付を翌日にしながら印刷するようにしたいです
よろしくお願いします。
　現在は、１週間分をシートに作って、１週間ごとに日付を
変えながら使っています。

>>206
説明が不十分、
ただ曜日を１枚づつ出力したいのか？

Dim i As Long
Range("G1").NumberFormatLocal = "m月d日(aaa)"
For i = DateValue("2007/3/8") To DateValue("2007/3/10")
　　Range("G1").Value = i
　　PrintOut
Next i

>>207
日付曜日が更新されたものを一枚づつ出力したいです。

>>208
ありがとうございます。試してみます。

>>206
質問が駄目駄目だな

何かの作業で使う手書きのフォーマットをExcelで作ってて
今現在は1週間分を印刷したカードを使っている
それを1日毎に変更したいけど、日付の差込がめんどくさいので
同じフォーマットの日付部分だけ自動で差込したい

こんなかんじかな？

>>30 >>31 >>32 >>33 >>34
かなり遅レスですが、みなさんありがとう。
今回は1個1個面倒な作業をして作りましたけど、
次回作るようなときに是非使おうと思います。

>>208
今いる家には、プリンターとエクセルがなく
職場に、ネット環境がありません。明日職場で使わせていただきます。
ありがとうございます。

>>210
手書きの日誌のテンプレートがあるのですが、
現在は、1週間分を7枚シート（一日一枚）で作って現在は
表2.g1に =表1.g1
というようにして1週間分を　book全体を印刷　で使っています。

3ヶ月分(一日一枚で92枚)をまとめて印刷したいのですが、
沢山のシートを並べたり、シート内で縦横に並べるのが面倒なので
まとめて92枚同じフォーマットで日付部分だけ自動で差し込みながら、
1部づつ印刷したいです。お願いいたします。

という感じでしょうか。
一枚が一日分で、三ヶ月分を紐でつづって使っています。

クソ分厚い完全マニュアルっての買ったけど
いいな。全機能網羅してる

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】
今、「雑費.xls」というファイルに
A　　　　B
１月　　　100円
２月　　　300円
　・
　・
12月　　　200円
１月　　　150円
　・
　・

このように１ヶ月ごとに縦に数年分データが並んでいます。
このデータを３ヶ月分ずつ抜き出して、連番別名ファイルで保存したいのです。
雑費1.xlsに１〜３月分、雑費2.xlsに４〜６月分・・・といった具合ですが、可能でしょうか？
よろしくお願いします。

>>214
「1月」〜「12月」は文字列？
この場合、月でまとめれば年は関係ないのか？

いずれにせよフィルタかけてコピーした方が早いかも。

>>214
可能です

▼━質問テンプレ (出来れば使ってね) ━━━━━━━━━━━━
【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 勉強し始め
【4 VBAでの回答の可否】 可

すいません、質問させてください。
シート１の表のデータを、シート２の表に記述した検索条件で抽出し、
その抽出結果をシート３に表示するVBAを作成しています。

>>217
Sub Message()
　　MsgBox "がんばってください"
End Sub

シート１には以下のようなデータがあります。

商品番号 価格 寸法
abc-01 120 13t
abc-02 130 13t
abc-03 135 13t
abc-04 138 14t
abc-05 140 14t

シート２では以下のような表を作っています。

商品番号 価格 寸法
OOOOOO OOO OOO

上の丸の中に検索したい文字を入力します。

質問になってないぞ

月日　1/2　　1/3　　1/4　　1/5　････････1/30
割合　10　　　20　　　24　　　60　　　　　　　24

このような単純なデータがいくつかあって、いくつかのグラフで数字を管理しています。
これまで月単位でグラフ作っていたのですが、これから当日と前７日間だけのグラフで
数字を扱うことになりました。
毎日いくつものグラフの参照範囲を手作業で変えていくと、時間がかかりすぎてしまうので、
なんとかマクロで対応できたらなと思うのですが、良い知恵を貸してください。ﾍﾟｺﾘ

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 少しだけ使ったことがあります。
【4 VBAでの回答の可否】 可　勉強します


月日　1/2　　1/3　　1/4　　1/5　････････1/30
割合　10　　　20　　　24　　　60　　　　　　　24

このような単純なデータがいくつかあって、いくつかのグラフで数字を管理しています。
これまで月単位でグラフ作っていたのですが、これから当日と前７日間だけのグラフで
数字を扱うことになりました。
毎日いくつものグラフの参照範囲を手作業で変えていくと、時間がかかりすぎてしまうので、
なんとかマクロで対応できたらなと思うのですが、良い知恵を貸してください。ﾍﾟｺﾘ

後出しで申し訳ないのですが、参照範囲が横にスライドするカラクリに・・・出来れば・・・
良いのですが・・・。

ちなみにシート２の表には"検索範囲"という名前をつけています。

以下が作成したVBAのソースです。

Sub 検索()
With Sheets("Sheet1")
Worksheets("Sheet1").Range("A1:E6").AdvancedFilter _
Action:=xlFilterCopy, _
CriteriaRange:=Worksheets("Sheet2").Range("検索範囲"), _
CopyToRange:=Worksheets("Sheet3").Range("A1"), _
Unique:=False
End With
End Sub

問題点としては、シート２の寸法の項目を13*と入力すれば、２〜４列目までのデータが抽出できるのですが、
価格が130台の商品を抽出したいときに、価格の項目に13*と入力しても抽出できません。
どのようなところに問題があるのかわからなくて質問させていただきました。
３つに分かれたため質問がわかりにくくなってしまいましたが宜しくお願いします。

ちなみに217→219→224の順で書き込みました。

>>217
価格が数値というところに問題があるのかな

>>226
ワイルドカードは数値には対応してないということですかね？

>>223
うまくないけどとりあえず…

Sub test()
　　Dim rg As Range
　　For Each rg In Range("A1").CurrentRegion
　　　　If rg.Value = Date Then
　　　　　　rg.Select
　　　　End If
　　Next
　　Selection.Offset(0, -7).Resize(2, 8).Select
End Sub

>>228
これでも

Sub Samp()
　　Dim Kyo As Variant
　　Set Kyo = Range("A1").CurrentRegion.Find(Date)
　　Kyo.Offset(0, -7).Resize(2, 8).Select
End Sub

>>227
対応していたとしても1300とかも掛かっちゃうぞ
<140とかでやったほうが便利だと思うけど

ＡＩとＡＪの合計をＡＫにたてにずーっと記入させるにはどうしたらいいですか？
一行ごとならできるんですが、そうじゃなくて上から下までずっとなんです。

>>228　>>229
ありがとうございます。
これからお二方のヒントを元に呪文の意味を考えてみようと思います・・。ガッ・・・

>>230
確かにそうですね。
そうにしてもやはり数値の場合は"を含む"みたいな形では検索できないのでしょうかね？

>>232
グラフがオブジェクトなのかシートか分からんし、グラフの名前も"グラフ 1"か
どうか分からんのでこのままでは動かないと思いますが、要するにグラフの
データ範囲を取得して変更しています。

Sub Samp()
　　Dim Kyo As Variant
　　Dim Hani As String
　　Set Kyo = Range("A1").CurrentRegion.Find(Date)
　　Kyo.Offset(0, -7).Resize(2, 8).Select
　　Hani = Selection.Address

　　ActiveSheet.ChartObjects("グラフ 1").Activate
　　With ActiveChart
　　　　.ChartArea.Select
　　　　.SetSourceData Source:=Sheets("Sheet1").Range(Hani), PlotBy:=xlRows
　　End With
End Sub

>>231
「ＡＩとＡＪの合計」は一回計算したら答えは1通りしかないので「たてにずーっと」並ばない。

>>234
解説どうもありがとうございます。
是非是非参考にさせていただいて、つまずいたらまた知恵を拝借させていただきますね。
がんばります。

ＥＸＣＥＬなんですが、VLOOKUPの様にデータベースの中から、検索した数値に見合う文
字列を抽出したいのですが、入力値＝1.8
の時
データベース内の値＝1.9
の値を引き出すには、関数はナニをどう使えば良いのでしょうか？

つまり・・・

入力値＝［小数点第一位を含む数］であり
データベース内の値も［複数の小数点第一位を含む数］
の中から、入力値以上であり、かつ、近似値を引き出す！であります！何か善い知恵があ
れば御教授下さい

>>237
MATCH関数

VLOOKUPのように使うにはMATCHとINDEXを使用する

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ(多少は学びたいと思ってます)
【4 VBAでの回答の可否】 可(丸投げが可能ならお願いします。)
【5 検索キーワード 　 　 】 Excel データベース 検索 抽出 を組み合わせて。

やりたいことは２段階あります。
まずシート１に次のようなデータを入力してあります。
名前　　　年齢　住所　好きな食べ物
鈴木太郎　20　　東京　みかん
高橋一郎　43　　埼玉　りんご
佐藤次郎　20　　千葉　いちご
鈴木純一　23　　埼玉　ぶどう
佐藤和男　23　　東京　りんご

シート２で検索をして条件に合うものを抽出したい。たとえば、
名前　　　年齢　住所　好きな食べ物
　　　　　　　　埼玉
と検索し

名前　　　年齢　住所　好きな食べ物
高橋一郎　43　　埼玉　りんご
鈴木純一　23　　埼玉　ぶどう

のように埼玉が住所のデータを抽出したい。

つぎに、抽出されたデータの中の任意のものを選び、シート３に反映したい。
シート３は印刷用にレイアウトされたもので、
その中の名前、年齢、住所、好きな、にそれぞれ対応するセルに反映したいです。
たとえば、上の抽出例の「高橋一郎」のデータをシート３に反映させたいです。

以上の説明でやりたいことがわかるでしょうか。

あと、これまで得た知識などです。

「オートフィルタ」
抽出はできるが、プルダウンで選ぶのではなく入力して検索したい。

「フォーム」
入力で検索できるが、検索結果に合うもの全てを抽出して一覧表示がしたい。

「lookup関数」
印刷用のシート３に反映させるときに使えると思いますが、
埼玉 で検索した際、埼玉の２人を一覧表示させてから選びたいので、
その部分の使い方がわからなかった。

>>215
文字列です。
1ヶ月ずつ時系列的に並んでいるので、保存するファイルに連番を打つ事で
年についてはそのファイル番号から判別するつもりです。

３ヶ月分ごとなので、「３行を選択」しSheet2へコピー・ペーストし、Sheet1の
上から３行を削除、別名保存という手筈を考え、マクロ記録してみました。
Sub testMacro()'
'
Sheets("Sheet1").Select
Rows("1:3").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Rows("1:3").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
ActiveWorkbook.SaveAs Filename:="C:\test\Book2.xls"
End Sub

これなら擬似的にSheet2に３ヶ月分ずつ吐き出せるかと思ったのですが、
このマクロをループさせる方法と、それに伴い最後の別名保存で末尾数を
１ずつ増やしていく方法が分かりませんでした。

最近Webクエリが使えなくなった人いませんか？

ある列のデータをもとに並べ替えたとき、別の項目の元の順序が狂って
しまったときはどうしたら戻せますか？

　　Ａ　Ｂ　Ｃ
１　03　東　10
２　05　西　30
３　07　南　20
４　09　北　40

これを、Ｃ列をもとに並べ替えるときに、間違ってＢＣ列だけを選択して
Ａ列を残して並べ替えてしまいました。Ａ列を表示してなかったんで、気
づかなかったんです。

　　Ａ　Ｂ　Ｃ
１　03　北　40
２　05　西　30
３　07　南　20
４　09　東　10

その後、（Ｂを見ながら）Ｄ列以降にあれこれデータを入れてしまったので、
それを残したままで、元のＡＢの関係を回復させることはできますか？

お願いします。

>>243
回復はむり
出来るとしたら、元のデータと並べ替え後のデータをMATCHなどで比較検索して新たに入れなおすくらい
それもデータの内容による

>>243
Ctrl+Z でアンドゥ

>>244
がーん！無理ですか．．．

>>245
>その後、（Ｂを見ながら）Ｄ列以降にあれこれデータを入れてしまったの
>で、それを残したままで、

>>246
>>245は、やり直せと言ってるような気がする

excel2003をマスターするのに良い参考書ってありますか？
みなさんはどうやってエクセルをマスターされましたか？

>>248
人によって知識も経験値も異なるので「良い」参考書というものは存在しません。
自分で実際に書店とかで試し読みしてみて、使いやすそうと思えるのがあれば、
それが”あなたにとって”良い参考書。

また、わざわざ2003と指定するのはそれなりの理由があると思うが、
今から新しくエクセルを覚えるなら、多少無理してでも2007を手に入れて
それで覚える方が吉。

参考書は相性があるからなんとも言えないんだよ。
その人のやりたいこととか業務とかのベースが変わってくるからね。
実際に本屋に行って自分で見てみるしか無いかな。
今は図書館にも何種類か置いてあるから、見に行ってもいいかもね。
一通り使えるようになりたいのならMOSとかの試験物がいいよ。

すみません、他のスレでここのことを聞いて参りました。
エクセル2003で質問があります。
�@関数の使用は許されない
�Aシングルコーテーションを使用した文字列化も禁じられる
�BVBAもNG。
以上の条件で、
セルに１１１１と任意の４桁の数字を入力します。
そのセルに通貨書式（￥記号）を施すと文字は半角に修正されます。
今回悩んでいるのは、￥記号と数字を全角にする方法で、
右クリック→セルの書式設定→表示形式のタブから
全く移動しなくてもこれは可能だということ。
（制限として表示形式のタブだけで解決しなければならないということです。）
半日いじり回してみたのですか、現在解答に辿り着けず。
誰か救いの手をお願いします。
（アプリケーション講座の講師の先生から出された宿題です）
なにとぞ。

普通に書式を文字列にする

書式の設定をユーザー設定で・・・

>>252
すみません、条件漏れでした。
私が見たときは、右詰めになっていたもので、
おそらくまだ他の方法もあると思います。
わざわざレス頂いたのにすみません。
条件を追加させてください。

>>253
すみません。右クリ→セルの書式設定→表示形式
限定の対応策でお願いします。
（本当にすみません。）

>>251
全角または全角桁区切りは、2003ならちゃんと表示形式に用意されている。
既存の表示形式はすべて「ユーザー定義」で見ればどういう指定をしているかわかる。
それがわかれば工夫もできる。

そんなとこかな。宿題なのでヒント（ほとんど答えに近いけど）だけな。
ついでに言っとくけど>253はちゃんと正解を言ってくれている。

！
すみません、正答だったとは気づかなかったもので。
ちなみに･･･ユーザー定義を使わず、表示形式（ユーザー定義）だけで
対応する方法はあったのでしょうか？
［DBnum3］とかいろいろといじってみたのですが、￥記号が全角にならなくて。

>>256
質問スレで解答もらった後に、
返事あるかどうかわからないから、お礼いっとく。
ありがと。

上のほうのＡＢと、下のほうのＢＣがあれば、上のＡＢＣをつくれますか？

>>259
意味が理解できないので日本語で書いてください。

>>260
>>243の上と下のやつです。
おねがいします。

【1 OSの種類 　 　 　 　 .】 WindowsXP〜2000
【2 Excelのバージョン 　 】 Excel2003〜おそらく2000くらい？
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 セル　名前

ひとつの課の売上集計のためのブックを作ろうと思いました。
仮に果物課だとすると、各7種類の果物別に担当者がいます。
シートを8つに分けて、集計用シート１つと各果物別シート７つです。
各果物別シートには、取引先や種類や金額の明細行があり、各シート内に
種類別の集計欄を設けてあります。（仮にみかんシートだとすると、愛媛みかん合計額
温州みかん合計額など）その種類別集計のセルに名前をつけていて
集計シートではセルの名前で参照させようと思いました。
各シートをそれぞれの担当に一旦配布した後、集めてまたひとつのブックに、という
手順で。うまく行く時もあったんですが、各担当者の手に渡る中で想定される
シート名の変更やらの操作をしたらすぐに参照エラーとなってしまって上手く行きません。
エクセルで集計役の人がシートをもらうだけ、もしくは数クリック程度で済む操作で
各明細を集計できるような上手い方法はないでしょうか？
ちなみに各担当はバラバラの場所にいます。

>>261
データの量と中身にもよりますが通常はまず無理。
すでに>>243に対しては答えをもらっていると思いますが、
そこに書かれている通り。

>>263
高校生を助けると思って、どうかおねがいします。

上のＡＢの部分は、Ｃを書き加える前のオリジナルとして、あるんです。
そして、下のＡＢＣにＤＦ等を追加したものが、作業結果として、あるんです。
で、共通のＢ(順序は変わってますが）をテコに、上のＡＢと、下のＢＣを
結びつけることはできないでしょうか？
あぁ。

vlookupでできないの？

>>264
酷なようだけど100%確実なのは手作業だけ。
後はデータの内容によるので、これだけではなんとも言えない。

ただB列のデータが一意で重複なしという保障があるなら、
265さんの言うようにVLOOKUPとかでこつこつやれば
なんとかなるかもしれない。それくらいかな。

それはどういうものですか？

>>267
「一意で重複なし」というところを聞いているのなら、
B列に重複するようなデータが存在しないということ。

VLOOKUPというところを聞いているなら関数の名前。

現時点でこの内容がわからないなら、手作業で直すほうが
早くて確実なようにも思う。以上。

下から、一行ずつコピーして張りつけるのがいいですかねぇ？

Ａ列を非表示にしたまま、提出しちゃおう。きっとだれも気づかない。

ありがとうございました！

>>269
お好きに。

念のため付け加えておくと、B列が重複なしで一意であるなら
AとBの表をBをキーに並べ替え、
さらにこれとは別にBとC以降の表をBをキーに並べ替え、
それに前の表のA列をコピーしてきてくっつければ、
A−B−C以降の対応が取れた表はできあがるよ。

あくまで対応が取れているだけで、並べ替え前の元の表ではないけどね。

これ以上はどう言っていいのかわからんので、
自分で判断するなり他の親切な人を待つなりしてくれ。

>>270
おひw

まあいいか。それでいいならほっとこ。

というわけで262をどなたかお願いいたします・・

>>273
そのケースで使えるとすれば「統合」くらいかな。

ただ、別に262で言っている通りのやり方で、単に「シート名の変更やらの操作」を
禁止すればいいだけのような気もする。

>>274
ありがとうございます
統合って機能初めて知りました。
明細をそのまま集計表に一旦統合で集めて
その明細集計のシート上で項目ごとに集計させたら
参照のエラーとかなんとか気にしなくても良さそうですね。

Office2000で、パスワードを入力しないとファイルが開かないようにさせることはできませんか？読み取り専用にさせることや、より新しいVersionならできることは確認したのですが。。。教えてエロいひと！！

>>276
Excel2000の話だよな。
ファイル＞名前を付けて保存
そこの「ツール」ボタンから「全般オプション」でパスワードを指定。

2種類のパスワードの違いとかはヘルプを嫁。

設定したパスワードを忘れて開けなくなったからどうすれば？という
質問は却下なのでそのつもりで。忘れるくらいならパスワードは使わない。

わぉ！即答でありが�d！

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 .csv インポート行指定

スペース区切りの10万行ぐらいのcsvファイルがあるのですが
csvファイルを加工せずに5万行から10万行までの行を指定してインポートするやり方を教えてください

>>242
今日全然駄目だ　VBAで取り込みを毎日やってんだけど。あなたも？

>>279
ありません。

いったん読み込んで5万行目から10万行目までを別の場所に
移すというなら手作業でもVBAでもなんでもできますが、
Excel2000では65536行しかないのでそれも無理ですね。
（Excel2007なら可能）

ところでスペース区切りのCSVファイルって??

>>280
今、試してみたら俺もだめだったお＠2007
おかしな現象やね。

>>279
49999行スキップしてインポート開始すればいいだけじゃん。
｢外部データの取り込み｣ではなくVBAで直接インポートする方法は解ってるんでしょ。
50000〜100000行なら50001行なのでExcel2000でも収まる。

>>281
訂正
csvファイル　=>　txtファイル

そうですか無理ですか・・・

では1つの行の10文字目から15文字目までをA1へ21文字目から23文字目までをA2へ
という風に指定してインポートすることは可能ですか?
今はテキストファイルウィザードでいらないカラムを手作業で削除しているのですが
数が多いため非常に手間なのです
何文字目（何カラム目）が必要かは毎回同じです

>>283
>VBAで直接インポートする方法
今初めて知りました　教えてもらえませんか?

>>282
全然普通に出来るんだが。今日もやぷーで2000近く処理したし。＠2003

>>241
Sheet1以外を削除して実行してください。
シートがあるかどうか判断させていると長くなるので。
一応これはシート名を変更して追加しています。
ファイル名にする場合も似たような感じでできるのでは？

Sub test()
　　Dim i As Integer
　　Dim j As Integer

　　i = 1
　　j = 1

　　Do
　　　　Worksheets("Sheet1").Cells(j, 1).Resize(3, 2).Copy
　　　　Worksheets.Add after:=ActiveSheet
　　　　With ActiveSheet
　　　　　　.Name = "雑費" & i
　　　　　　.Cells(1, 1).Select
　　　　　　.Paste Destination:=Range("A1")
　　　　End With
　　　　i = i + 1
　　　　j = j + 3
　　Loop While Sheets("Sheet1").Cells(j, 1) <> ""
End Sub

>>286
つーことは、できない人にはなにか共通点があるということかな。

よくわからんが、偶然同じプロバイダとか(爆)
バージョンもOSも違ってて同じ現象がいきなりというのは
確かに妙だし。

>>285
テキストファイルを直接読み込んで解析し､各セルに代入するだけだよ。
数が多い場合は二次元配列を仲介した方がいい。

スペース区切りのテキストってのがprnのような固定長スペース区切りなのか
csvやtsvのように単にdelimiterにスペースを使ってるだけなのかはわからんが
どちらにしてもアルゴリズムサンプルがWeb上にあるからあとはググってくれ。
因みにこの方法でやるなら>>2･7なので､ここで詳しく解説してくれとかコード書いてとかはNG。

あえて言えば範囲に対するValueには二次元配列を直接代入できるってのと､
その方法の方が1セルずつ値を代入するより速いってのがExcelの分野の話。
テキストの読み込みとか解析とかはExcel関係ないから。

>>288
やぷー3月1日でHtmlが変わってるから、それで引っかかってるんでしょう。ほかは知らんが。

>>290
あー。うちはそれかも。
試したのは確かにやぷーの中の某所だ。
�d

ちなみにWebクエリを頭から作り直したらちゃんと動いた。
（2007のWebクエリは妙なところもあるんだがいちおう）

>>290
htmlが変わっているというのは？yahooからデータ取ろうとして駄目なんだけど。

Webクエリを作り直すか、テーブルの数字を変えろ。いじょ。

>>293
直った �d楠！

>>239
なんかヌルーされててかわいそうなので適当に作ってみた
印刷はsheet2の印刷したい行を何処でも良いから選択してボタン押す

http://www.uploda.org/uporg712141.zip.html　pass：excel

>295
ありがとうございます！

ですが、この時間ではロダのほうが流れてしまってました。
すいませんが、もういちどどこかにUPしてもらえませんか？

【1 OSの種類 　 　 　 　 .】 Windows　XP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 プロットエリア　固定

すみません、質問です。
エクセルグラフのプロットエリアを固定して、グラフエリアだけの大きさを
変えたいのですが、やり方がわかりません。
検索したのですが、それらしき答えがなかったのでここでお尋ねしました。
お願いします。

【1 OSの種類 　 　 　 　 .】 Windows　XP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】フィル　連続データ

質問です。
現在顧客名簿を作っています。
具体的な項目は住所氏名年齢成約日などなど約50項目に渡ってです。
そして、そのシートから別のシートに引っ張って10項目しかない簡略版を作ろうとしています。
(原本に入力するとその簡略版に反映されていくようにしたい)

まずはシートB(簡略版)のA1をイコールでシートA(原本)のA1に指定して、
連続データで縦横に伸ばしていくと、おおむね合っているのですが
色やフォントなどの見た目が変わってしまいます。(例えば文字色は全て黒になります)

他にも空欄が0に変わってしまうし日付が5桁の数列に勝手に変わってしまうしで
直す手間を考えるとこれではちょっと･･･という感じです。

どういったやり方が良いのか、どなたか教えて頂けないでしょうか。
宜しくお願いいたします。

おそるおそるのぞいて見ると．．．

いた！親切な人が！

>>271
頭いーなー
やってみます、その方法で。
Ｂをキーにして、ＡＢとＢＣを揃えるんですね！あたまいいなぁ。そうする
と、ＡＢＣの対応が取れる、と。すごい。これだよ、やりたかったのは！！！

ありがとう、ありがとう☆

オフィスをオクで買おうとおもうのですが、もともとPCについてたもの
らしいのですがちゃんと使えますか？

運による

PCごと買い取るのなら問題ないがな

>>300
出品者にライセンスについて質問することをお薦めする。
そして自分でも下記のサイト等からそれなりの情報を入手しておくこと。
http://www.microsoft.com/japan/licensing/brief/default.mspx

ライセンスだったら
　http://support.microsoft.com/kb/302806
こっちの方がいいかな

グラフ（折れ線）について質問です。
グラフのY軸方向の高さはデータにあわせますよね。例えば、データが１０，２０　だったら、グラフの高さは20までだけど、
データに1000が入ったら、グラフの高さはそれに合わせて、1000まで表示できるようになります。
これを、ある一定範囲で固定するようにしたいのですが、どうすればいいですか？
たとえば、Y軸の範囲は300から500に固定、といったことをしたいのです。
やり方があれば教えて下さい。

>>239
居る？居たらうｐするけど

>>305
軸の書式設定の目盛タブで最大値と最小値が設定できます

>>307
おお、ありがとうございました。

グラフに関する質問です。
現在、株価や為替レートをグラフにしようとしています。
データ系列は

2007/03/02 17:50　　154.93　　155.00　　154.90　　154.99
2007/03/02 18:00　　155.03　　155.03　　154.90　　154.94
2007/03/02 18:10　　154.92　　154.93　　154.85　　154.87
2007/03/02 18:20　　154.84　　154.87　　154.80　　154.80
2007/03/02 18:30　　154.79　　154.79　　154.73　　154.73
2007/03/02 18:40　　154.76　　154.76　　154.64　　154.66

のような書式です。
本当は10分おきのデータを表示したいのに、
なぜか一日おきにしかx軸の目盛りが表示されません。
どのようにすれば、日付も表示させた状態で、分単位のチャートを表示できるでしょうか？

利用環境：
Excel2002
Windows Xp Home Edition SP2

セルの日時部分の表示形式を数値にする

>>309
グラフオプションの軸タブで項目を設定する

>>310-311
できました！
軸を時系列扱いにしたうえで分単位で表示することは、やっぱり無理なんですね。
残念。
ありがとうございましたm(_ _)m

軸には日時を表示させても問題ないよ

>>312
日付と時刻を分ければ問題ない

>>313
うーん、書式を日時に変えたりといろいろチャレンジしたのですが、だめでした…

>>312
日付と時刻を同時に表示させたかったんですよ。
しかも願わくば、

23:40
23:50
3/1 0:00
0:10
0:20

みたいな見やすい程度に情報が削られていたらいいなーと思いまして。
やっぱマクロでどうにかするしかないかな。
Xpのグラフ機能が貧弱すぎるので、Excel2007を買おうかな。

Ｘ方向の項目軸の設定を時刻にするのはどうですか？
17:50
18:00
とかなら表示できますよ、どちらにしても１０分単位だと
１日分くらい表示するとグラフが大きくなりすぎて
時間が表示できなくないですか？

>306
今きました。
よかったらうｐおねがいします！

>>317
http://www.uploda.org/uporg713687.zip.html

パスは同じ

企業は今２００７使ってるんですか？
今月入社するんですけど

>>318
コンボボックスのStyleはfmStyleDropDownComboではなくfmStyleDropDownListの方がいいよ。
あと､ListFillRange使うと､シート切り替える度にコンボボックスの内容をクリアしたり入れ直したりしなくて済む。

>>319
そんなの会社によって違う。うちは2007はしばらく入れないことになったというか､俺が入れさせないことにした。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

質問です。今出勤表を作っているのですが、
休みのときは○を入力するのですが○を付けていない人を
カウントするいい方法をご存じないでしょうか。
(つまり出勤している人数をカウントしたい)

なんか上手く質問できなくてすいません。

全人数引く休み人数

う･･･。○を付けると自動的に人数を引いてくれるように出来たらいいんですが。

だめっすかね？

たとえば全体で321人として
=321-COUNTIF(A1:A321,"○")
とか
丸投げしたいならもっと詳しく書かないとわからない

>>323
COUNTBLANK

>318
ありがとうございます！！！

【1 OSの種類 　 　 　 　 .】 Windows XP
【2 Excelのバージョン 　 】 Excel 2003
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 同一ブック内・複数シートの両面印刷
　同一ブック内で、複数のシートを両面印刷する場合、
各シートごとにページ設定をする必要がありますが、
多くのシートがあると、手作業は非常に面倒です。
そこで、指定するシート数を両面印刷設定にするマクロを
作りたいので、教えてください。
　ＶＢＡは入門程度。ほとんど経験はありませんが、勉強します。
　プリンターは両面印刷設定有りです。

>>327
両面印刷はプリンタドライバの機能です
VBAの範疇ではありません

【1 OSの種類 　 　 　 　 .】 Windows 2000
【2 Excelのバージョン 　 】 Excel 2000
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 日付　入力

やりたいこと：
年月を入力した場合、デフォルトだと入力した年（いまだと2007年）になるが、
これを任意の年にしたい。同一シート内です。もちろん、年月日すべてを入力すれば解決する話ですが
量が膨大なので、なるべく月日だけの入力にしたいと思ってます。
今は2005年の日付を打つときはPCの日付を2005年にして打っています。

A　　　　B
12/30　\3,500　　←ここは2005年
12/31　\3,600
1/1　　\3,450　　←ここは2006年
:
:
12/31 \3,500　　←ここまで2006年
1/1　　\3,440　←ここは2007年

>>329
2005年の場合、
まず日付だけを打ちます。当然年は2007になります。
作業列を作って例えばA1にその日付があり、作業列がB1の場合、
B1=YEAR(A1)-2&"/"&MONTH(A1)&"/"&DAY(A1)
とすると年が2005になりますのであとはオートフィル。
B列の式をA列に値のみ貼り付けてB列削除というのではどうでしょう？

>>329
「今年」が入力されると上のセルの年にする
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cur As Range
Dim prev As Range
Dim prevc As Long, prevr As Long
On Error GoTo ERH
Application.EnableEvents = False
For Each cur In Target
prevc = cur.Column
prevr = cur.Row - 1
If prevr < 1 Then prevr = 1
Set prev = Cells(prevr, prevc)
If IsDate(prev.Value) And IsDate(cur.Value) And Not cur.HasFormula Then
If Year(cur.Value) = Year(Now) Then
cur.Formula = DateSerial(Year(prev.Value), Month(cur.Value), Day(cur.Value))
ElseIf TypeName(cur.Value) = "String" Then
cur.Formula = DateSerial(Year(prev.Value), Month("2000/" & cur.Value), Day("2000/" & cur.Value))
End If
End If
Next
ERH:
Application.EnableEvents = True
End Sub

>>324
>>325
すげえ！感動した！ありがとう！！！

>>329
これでもできる。
選択したセル範囲に対してマイナス何年にするかを
入力すると選択した範囲の年がマイナスになります。

Sub MinusYear()
　　Dim Rng1 As Range
　　Dim Rng2 As Range
　　Dim minusY As String
　　minusY = InputBox("マイナスに何年にしますか？")
　　Set Rng1 = Selection
　　For Each Rng2 In Rng1
　　　　Rng2 = Year(Rng2) - CInt(minusY) & "/" & Month(Rng2) & "/" & Day(Rng2)
　　Next
End Sub

>>330-333
ありがとう。
日付は>>329の例だと1行1日で次の行は翌日の日付になってたけど、
実際のデータはそうじゃないので、>>331さんのVBAを使用することにしました。

シート1にデータベースを用意し、シート2でそのデータを引っ張ってきて計算などをする場合、
LOOKUP関数とVLOOKUP関数、基本的にどちらを使う方がいいんでしょうか？
VLOOKUP関数が前者に包括されてるのでいらないと思うんですが・・

+もSUMに包括されてるのでいらないと思うんですか？

印刷プレヴューにすると線が消えちゃうのですがどうすればいいのでしょうか？
また幅と高さを変えるとき自分が思った（何センチにしたい）通りにいきません。恥ずかしい質問なのですが
宜しくお願いします。

>>335
LOOKUPは下位互換性のために残してあるんだからVLOOKUPでいく

VBAで差込印刷作るとき、ループにPrintOut書いちゃうと
毎回プリンタドライバ起動して、枚数が多いとき不安定になることがあるけど
他に良い方法ないかな？APIは使わない方法で

【1 OSの種類 　 　 　 　 .】 Windows XP
【2 Excelのバージョン 　 】 Excel 2002
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 共有中　シート保護　設定

ブックの共有機能を使って、複数人での作業がしたいのですが、
触られたくないセルがあるので、シート保護機能を使っています。
ボタンを設置して、マクロを使って、シート保護を最初に解除して、
最後にかけなおす、という作業をしたいんですが、ブックの共有
を使うと、エラーが出ます。（unprotectメソッドが失敗しました）
ヘルプを見ると、既存の既存の保護設定は有効とのことで、
共有中だとできない、と書いてあります。
ブックの共有中で、セルの変更ができないような方法はないのでしょうか？
わかる方、ぜひ教えていただければと思います。

>>340
SelectionChangeイベントで選択できなくするとか。

>>338
ありがとうございます！
そういう考えには至りませんでした

エクセルから複数のtxtファイルを作成したい。

A1のセルの名前で［A1］.TXT
B1のセルの中身を特定の書式［A1］でできたtxtの中身に記入
C1の中身を上記とは別の場所に［A1］.ｔｘｔに記入
D1も同様

をそれを


150行あたりまで繰り返して150くらいのテキストファイルを作りたい

1.エクセルだけで可能？
2.VBAも使わないと無理？

書式は.ｔｘｔには保存できないので書式の名前を記入するということなのか？
いずれにせよ
　ワケ　　　　　ワカ　　　　　ラン♪
　 ∧＿∧　　　∧＿∧　　　　∧＿∧
　（　・∀・）　　（　・∀・）　　　（　・∀・）
⊂　⊂　 ）　　（　Ｕ　　つ　　⊂__へ　つ
　<　<　<　　　　）　）　）　　　　　（＿）|
　（＿（＿）　　（_＿）＿）　　　 彡（_＿）

単語は正確に使って欲しいよね・・
ウチの上司もドラッグとオートフィル堂々と間違えるもんだから指摘しにくいのなんの
>>343
少なくとも保存するのはVBAか、使っても無理だな
エクセルだけじゃﾑﾘ

>>343
1) Excelだけでやるなら作業シートを作ってそこに保存したいデータ形式
　に数式を使っ変換してからtxt保存をする。CSVでいいなら簡単だけど
　そうでないならかえって面倒かも。
2) VBAでごりごり。でもその程度ならさくっとできるでしょ。
　たとえば ttp://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_055.html

>>345
「少なくとも保存するのはVBAか、使っても無理だな」
ってVBA使ってもむりってこと？

そうなら間違っているし、違う意図で言っているなら日本語が、、、w

>>341
おぉ。
SelectionChange使ってうまくいきました。
助かりました。ありがとう

>>298
参照だけならカメラ機能を使ってはいかが

誘導されましたのでコチラで相談させていただきます WIN95で作成したファイルをFDに保存、MeでCDに焼直し
2kで開こうとしましたが一部開けないファイルがありました
Meとの共有、メールで添付も試しましたが同じ状況でした
同一フォルダ内でも可、不可のファイルがあります
エラーが出るわけではなくシートが表示されないだけです
95は98、Meと2Kは2000を使用しております
　　　　　　　　　　　　たんなるファイルの破損でしょうか？　ご回答よろしくお願いいたします

>>343
テキストなんだったら書式ないだろうし…。
A〜所定列まで選択して、行列入れ替えで貼り付け、それをテキストエディタに
コピペしたら150行分ざっくりテキストなんじゃないの？

95、Me間では問題ありません。Me、2k間がダメです。
互換の問題とかあるのでしょうか？　全てがダメという
わけではないので悩んでおります。

【1 OSの種類 　 　 　 　 .】 Windows5.1
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 いろいろ調べてここに辿り着いた

【目的】
インターネットネットブラウザのページ表示をコピーしてエクセルシートに貼り付けたものがある。
テキストとリンクだけ残して図形（Shape）を消去したい。
図形にはリンクのあるものとないものがある。

【やったこと】
dim Zukei as shape
dim S as string
dim WS as string

（中略）

for each Zukei in WS.shapes
　　（中略）
　　S = Zu.Hyperlink.Address
　　↑図形にリンクがないと、ここで「アプリケーション定義またはオブジェクト定義のエラー」が出てしまう
next zukei.

【質問】
図形にリンクがあるかないかを判断する方法があれば知りたい。

改行が多すぎると言われたので分割しました。
【続き】

ちなみにセルにリンクがあるかないかを判断するために
dim C as range

set C = WS.Cells(i,j)

for each HL in C.hyperlinks
　　リンクがあればここで作業
　　（なければこのループに入らないので）
next HL

ということをしていますが、図形の場合は
Zukei.hyperlink
とは書けても
Zukei.hyperlinks
と書けません。

VBは我流なので、とんでもない変なことをやってるかもしれません。
よろしくお願いします。

>>335
>>338
下位互換性じゃないだろうよ。
検査範囲が一番左側の列じゃない場合もあるよ？
左側の列であっても、取得する列が離れてるときはLOOKUPの方がよい。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003 とExcel 2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
シートの書式保護について

Excel 2003で
シート１にデータを入れていて
シート２のA1にデータ番号を入れると
シート２のセルに反映させています。
『=LOOKUP($A$1,シート1!$A$2:$A$199,シート１!$B$2:$B$199)』
各セルにこんなような書式をいれているのですが
これを触って消してしまう人がいるので
ロックをかけようと思って
ツール＞保護＞シートの保護
をしたらA1にデータ番号が入れられないので
A1にツール＞保護＞範囲の編集を許可　した後
保護をかけるとうまく動きました。
それを違うパソコンのExcel 2000で
作業しようとしたら
変更しようとしているセルまたはグラフは保護されているため、読み取り専用となっています。
とエラー表示されます。
保存先は共有しているサーバです。

Excel 2000には範囲の編集を許可という
項目がないのですが
バージョンが違うから動かないのでしょうか？
それともそもそも
なんか間違ってますか？
不得意なので困っています。
どなたかよろしくお願いします。

>>356
基本的には、セル書式−保護−ロックで制御したら互換性の問題は、
無いと思います。

>>357
ロックは効いているのですが
A1に入力もできなくなってしまい
困っています。

もう一台、Excel 2003からだと
キチンと動きました。
2000だめなのかしら・・・

>>353
Hyperlinkとかまったく使わんからわからんけど

Dim S as String　→　Dim S as Hyperlink　に変更して

For Each Zukei In WS.Shapes

(中略)

Set S = Zu.Hyperlink

IF Not S Is Nothing Then Exit zukei

Next zukei

だとどうよ？めんどくさいから試してないけど

>>358
2000だと
書式＞セル＞保護、ロックのチェックをはずす
かな

For Each Zukei In WS.Shapes

(中略)

Set S = Zu.Hyperlink

If Not S Is Nothing Then

（リンクがあるときの処理）

ElseIf S Is Nothing Then

（リンクが無いときの処理）

End If

Next zukei

こうするほうがわかりやすいか。

>>360
2000で保護とロックのチェックかけ直したら
2003で動きました！
ありがとうー！
解決。

>>359
>>361

ありがとうございます。

> Set S = Zukei.Hyperlink

ハイパーリンクが無い場合は、ここで「アプリケーション定義またはオブジェクト定義のエラー」が出てしまいます。

リンクの有る無しを知る方法があればと思います。

じゃあ、エラーになったら無いということを期待して
on errorで処理

メーカーを入力規則のリストから選択すると
車種のリストを変更するように、Indirect関数を使っているのですが

メーカーを選択→車種を選択した後に、再度メーカーを選択すると
車種のセルが、前回の状態のままなので、
メーカーを選択した場合、車種のセルにNULL値を入力するようにしたいのですが、
方法が分かりません。

よろしくお願いします。

>>365
処理の自動化にはVBA必須
というわけで､VBA使ってくださいな
一応>>3も読んでおいてね

>>363
どうしてもリンク有無の判定したかったら

Sub test()

Dim hl As String, sp As Shape

On Error Resume Next

For Each sp In Worksheets("sheet1").Shapes

hl = ""

hl = sp.Hyperlink.Address

If Not hl = "" Then MsgBox "図形：" & sp.Name & "　" & "URL：" & hl

If hl = "" Then MsgBox "図形：" & sp.Name & "　" & "URL：" & "なし"

Next sp

End Sub

こんな方法しかないかな

例えばA1を参照している式を一斉にB1に変更することってできますか？

たぶんできるよ

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 図　挿入　自動　エクセル

私の会社では見積書に商品ごとの写真を添付するのですが、
品番ごとに毎回データから写真を貼り付けるという
ルーチンワークが無駄に思えて仕方ありません。
もし、セルに品番を打ち込んだら、自動で写真を指定したセルに
貼り付けるということはできますか？
また、その方法がありましたらご指導願います。

>>370
できないことは無いですがVBAを使います。
残念ですが、またのご縁がございましたら宜しくお願いします。

>>371
ありがとうございました。
これを機会にＶＢＡを勉強したいと思います。

表の作り方が解りません。どうやったらA4サイズになるんでしょうか？
左に寄ってしまいます。
PCはWindowsです。

>>373
「ページ設定」で調整

！

違うファイル間でセルのコピー＆貼付をすると、勝手に自動で
コピー元のファイルのフルパスが入ってしまいます。

これを食い止めて、純粋にそのままコピーしたい内容で貼付
できないものでしょうか？

初心者ですみませんが、宜しく御願いいたします。

>>376
形式を選択して貼り付け−＞値

便乗質問ですみません。
>>376みたいなファイル間コピーを行った際に、相対パスにする方法は
ないのでしょうか？
他人にファイル一式を配布する時に困っているのですが…。

値で貼付すると、見た目は同じ内容になって良いのですが、
式を生かした状態で貼付られないかと思っての質問でした。

ファイルをまたいでしまうと、貼り付けたときにたとえば

='[コピー元ファイル.xls]現Bookシート1'!D136

となってしまうところを
普通に

=現Bookシート1!D136

で貼り付けられないものかと思いまして。
わがままですみませんが、もし方法がありましたら
宜しく御願いいたします。

>>379
数式バーでＣ＆Ｐ

>>380
確かにそうだが,たぶん>>379はまとめてがばっとやりたいんじゃねえのか？ボケが。

とか言う俺もその答えが知りたいんすよー。教えてﾏﾏﾝ

>>379
置換を使うのだ。
【'[コピー元ファイル.xls]】の部分を空欄にする。
検索する文字列　→　'[コピー元ファイル.xls]
置換後の文字列　→　空欄のままにしておく

複数のシート全体を選択してコピー→複数の違うシートに貼付けという動作をショートカットで一回で行う方法はないですか？

そのマクロをショートカットに割り当てるとか…

B1、C1〜C10にリストがあるとします
A1に式をいれて、B1と同じモノがC1〜C10のいずれかにあるかどうか、を知りたいのですが
どういった関数を使えばいいのでしょうか？
COUNTだと2つ以上ある場合2.3・・と数が増えていってしまうので、できれば論理値で返したいのですが

>>385
=IF(COUNTIF(C1:C10,B1)=0,FALSE,TRUE)

>>385
だったら論理値にすればいいじゃん。
=COUNTIF(C1:C10,B1)>=1
とCOUNTIFの結果が1以上か否かという比較式は結果を論理値で返す。

因みにIF関数を使う場合は
=IF(COUNTIF(C1:C10,B1),TRUE)
で良い。
数値は0以外がTRUEとして扱われるので>=1とかの比較条件要らないし
条件がFALSEの場合に返す値を省略するとFALSEをそのまま返すので。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】シート

質問します。
ファイル内各シートの一覧表を作りたいのです.

シート１〜３にはすでに数字を入れてあり
シート４にその一覧を作りたいとき、

|商品Ａ　|　シート１!A1 |
|商品Ｂ　|　シート２!A1 |
|商品Ｃ　|　シート3!A1 |

のようなものを簡単に作れるような関数はないでしょうか？
よろしくお願いします。

>>388
シート名を変更する（取得する）関数は無い
VBAで組んでちょーだい

>>388
=INDIRECT("Sheet"&ROW(A1)&"!A1")
ってことかい？

>>389
そうでしたか。
回答ありがとうございます。
ＶＢＡは書けないので地道に記録させます。
実際には４０シートあるからすごくﾀﾞﾙｲ作業なんですｗ

>>390
うわっ、すごい。
ありがとうございます！！

すごく助かりました〜。

Excel2000です。ブラウザからコピーして張り付けると背景色やフォント、はてはリンクつけちゃいますよね。
形式を選択してテキストだけにすれば問題ないですけど、ちょっと量があって毎回毎回やってると
ものすごい手間なんです。オプションか何かで、デフォルトで生テキストを貼り付けるようすることは出来ますでしょうか？
よろしくお願いします。

>>393
VBA使えば出来ますよ。(>>3参照)

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可

　時刻　　｜データ
0:00:06　｜xxxxxxxxx...
0:03:22　｜xxxxxxxxx...
0:04:15　｜xxxxxxxxx...
0:05:40　｜xxxxxxxxx...
0:05:48　｜xxxxxxxxx...
0:07:36　｜xxxxxxxxx...
0:09:02　｜xxxxxxxxx...
0:13:50　｜xxxxxxxxx...
（以下続く。。。）

というようなログファイルから、
0:00:00〜0:04:59⇒x件
0:05:00〜0:09:59⇒y件
0:10:00〜0:14:59⇒z件
というふうに5分ごとに何件のデータがあるのかカウントしたいのですが
どうすれば良いでしょうか？

>>値貼り付けボタン
これ限界

>>393
値貼り付けボタン
ごめん

【1 OSの種類 　 　 　 　 .】 WindowsXP SP2
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 excel マクロ

ｸﾞﾙｰﾌﾟ　人数
------+------
ｱｶ　　　　3
ｼﾛ　　　　5
ｱｵ　　　　4
ﾐﾄﾞﾘ　　　 3
ｷｲﾛ　　　 4
・　　　　　・
・　　　　　・
・　　　　　・

のようなデータが100件ありまして、抽選をしたいと考えています。
抽選結果として求められることは、総人数（「人数」列の総和）が100人以内かつ100人に一番近い人数になること、です
（ｸﾞﾙｰﾌﾟの数自体はいくつでもかまいません）
ちなみに現在の総人数は350人ほどです。

自分なりに考えたロジックとしては
1. 1〜総行数間の整数乱数をひとつ生成
2. 生成された乱数で指定される行を削除
3. 「人数」列の総和が100より多ければ 1. に戻る
かなと思っています。
ただ自分でマクロ組めないので、教えていただきたく質問しました。
よろしくお願いします。

>>398
いろんなアルゴリズムがあるけど､それはExcelとは関係ない話。
｢テキストファイルに〜のようなデータが100件ありまして､VBScriptで〜｣でも
やることは一緒だからね。Excelについて解らないことがあるのではなく､
単にやり方がわからないものを偶々Excelでやろうとしてるだけだから。

というわけで､ここでの丸投げは認められないのでやりたければ自分で勉強してくださいな。

>>399
書き方が悪くてすみませんでした。
アルゴリズム教えてほしいわけじゃなくて、
自分が>>398で書いたロジックをマクロでどう書くかを教えていただきたいんです。

それに>>2を読む限りでは、ム板とかと違って、こっちは丸投げOKみたいに書いてあります。
（といっても、>>398は丸投げではなく、自分なりに要点をしぼったつもりなのですけど･･･）

>>400
ロジックに付いての質問だったら尚更板違いってことは理解できるかぇ

昼間に丸投げ依頼してまともなレスもらえると思うな

みんな仕事してんだ

>>400
>>3★VBAについて
を読んでね。

ちなみに｢100人以内かつ100人に一番近い人数｣にするアルゴリズムではなく
｢人数列の合計が100以下になるまでランダムな行を消していく｣方法なら教えてやるけど､
その場合､ぴったり100にする組み合わせが可能でも､結果的に
｢101-(1グループの最大人数)｣になる可能性があるけどそれでいいのかな。
例えば一番人数が多いグループが｢ｸﾛ　20｣だとすると､結果は81になる可能性がある。

てか、VB板いけよ

最近まったりしてたのに突然荒れだすな
これだから「この時間帯は」って言われるんだろ

↑
俺は違うみたいに言ってるけど、目糞鼻糞

【1 OSの種類 　 　 　 　 .】 Mac8.6
【2 Excelのバージョン 　 】 Excel2001
【3 VBAが使えるか　 　 .】 少し
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　】 マクロ　PC名　取得　GetComputerName　Environ
【6 検索サイト 　 　】　すぐマク

質問させて頂きます。
ネットワークに繋がった共有スペースにブックを置いて使用する場合
最終的にどのPCで更新されたかをシート上に表示したいのです。

　セルの文字列をPC名に変更→上書き保存

というマクロをを書きたいのですが、PC名を取得する記述が判りません。

ご存知の方いらっしゃいましたら、ご教示宜しくお願い致します。

>>407
GetComputerNameはWindowsのWin321APIだよ。
Environ関数もWindowsの環境変数を取得する関数。

そもそも､｢プログラムでPC名を取得する方法｣は
Excel関係ないのでスレ違い。(>>3★VBAについて 参照)

>>>405
「この時間帯は」ってのは質問者側に言うべき言葉だよね。
この時間帯は仕事に行き詰まって､日本語変な質問とか
Excelに関係ない質問とかがやたらと多い。困ったもんだ。

>>403
ありがとうございます。
>>2を読んだくせに>>3を読んでませんでした。失礼しました。
仕様についてはおっしゃる通りで問題ないのですが、
もうちょっと切り分けて、今度こそVBAの問題だけに絞って
質問させていただきたいと思います。

>>408
スレ違い申し訳ありませんでした　m（＿＿）m

>>410
つか、UserNameじゃだめなの？

>>395ですが、その後自分なりにやってみました。

　　　　　｜0:00｜0:05｜0:10　・・・
0:00:06　｜1　　｜0　　｜0
0:03:22　｜1　　｜0　　｜0
0:04:15　｜1　　｜0　　｜0
0:05:40　｜0　　｜1　　｜0
0:05:48　｜0　　｜1　　｜0
0:07:36　｜0　　｜1　　｜0
0:09:02　｜0　　｜1　　｜0
0:13:50　｜0　　｜0　　｜1
・
・
・

↑みたいな感じで

縦軸にログファイルの時刻情報、横軸にカウントしたい時間帯
というマトリクスを作って、時刻が範囲に入っていればフラグを立てて
最後に縦方向にcountifでフラグの個数を数えるという方法で
いけるかなーと思ったんですが

1日分2000行ほどのログを入力したらファイルサイズが20Mを超えてしまい
重すぎてまともに動きませんでした。。。

どうにかもっと簡単にやる方法は無いですかねぇ？？

2000行で20M！
は さておき
C列に 0,5,10・・・
D列に =COUNTIF(A:A,"<"&(C2/24/60))-COUNTIF(A:A,"<"&(C1/24/60)) ・・・

>>412
DCOUNT関数で検索しましょう

【1 OSの種類 　 　 　 　 .】 WindowsXP SP2
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 Selection

文字列として入力されてしまっている値を数値として変換したいので、
http://support.microsoft.com/kb/181298/ja からコピペして
以下のような標準モジュールを書きました。

ThisWorkbook.Sheets("hoge").range("A1:A10").Select
For Each xCell In Selection
xCell.Value = xCell.Value
Next xCell

でも実行すると

実行時エラー'91':
オブジェクト変数またはWithブロック変数が設定されていません。

というエラーになってしまいます。
もちろんA1からA10には、文字列として書かれた数字が入っています。

どうすればいいでしょうか？

>>415です。
すみません先ほどのコードで動作しました。勘違いしていました。

ただ目的の、数値として変換された様子がありません。
なんででしょ？

Valueプロパティの仕様。
表示形式が数値系や自動(G/標準)の場合､文字列値であっても
数値として解釈できる値が代入されれば数値として扱う。

ワークシートの一覧を列挙するような関数ってありますか？

>>418
つ ユーザー定義関数 & >>3

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 excel2000 かな入力　1文字目　表示されない

かな入力でExcel上のセルに文字入力をすると、
1文字目が表示されず、2文字目から表示されてしまいます。
Enterで確定すると1文字目も表示されます。

例1)
1. かな入力にして あ と入力(画面上セルには何も表示されていない)
2. もう一度 あ と入力(画面上セルには あ と表示されている)
3. Enter
4. セルに ああ と表示される

例2)
1. かな入力にして あ と入力(画面上セルには何も表示されていない)
3. Enter
4. セルには何も入力されない

半角入力の場合、この現象は起こりません。
この現象が起こる機ではIMEでもAtokでも同様の現象が発生します。
Officeのアップデートは全て適用している状態です。

どなたかこの現象の解決方法をご存じでないでしょうか？

↑大して不都合ないだろ、気にするな

>>420
最初からずっとそういう症状なの？
それともある日を境にそういう症状が出るようになったの？

ヤフーファイナンスの出来高ランキングから
http://quoterank.yahoo.co.jp/ranking/search?b=1&kd=3&mk=11%2c%2012%2c%2021%2c%2022%2c%2031%2c%2032%2c%2043%2c%2047%2c%2083%2c%2087%2c%2094%2c%2017%2c%20A1%2c%20A7%2c%2037&ca=1&tm=day&

順位と名称と取引値だけ抜き出したいんだけどいい方法ある？

>>423
VBAでなら出来るけどスレ違いだし､(>>3★VBAについて 参照)
そういう情報ぶっこ抜きはYahooの利用規約で禁止されてる。

>>389
一回保存してあるExcel Bookなら
=CELL("filename",A1)
とかでシート名を取得できる。もちろん、シート名のところだけを切り取る
関数と組み合わせてだけどね。（Excel2002）

シート名を見積もり番号にして、シート名を変えると自動的にシート内に
シート名＝見積もり番号を表示させるのに使ってます。

物凄く稚拙な質問で恐縮なんですが、久しぶりに自宅PCでexcelを起動したところ
以下の状況になっていました。どなたか解決方法をご教示ください。

症状：
�@任意のセルひとつをアクティブにすると、そのセルを基点にマウスを動かした範囲の全てのセルが
選択されてしまう。
�A文字が入力できない
�B終了できない。（タスクマネージャーで終了させようとしてもmicrosoft exelを終了できませんという
メッセージが出る。その後応答なしとメッセージが出るのでそれで終了させている。）

・キーボードのキーを押さえ込んでいるような異物は特に有りません。
・手持ちのキーボード2本（aopenの2点どう 無線,logitechのaccess）をドライバの再インストールして
みたが症状に変化なし。
・excelを再インストールしてみたけれど変化なし。

使用OS:w2k sp2
使用excel:2000 9.02812

マウスがおかしい？
ペイントで普通に絵はかける？

>427
即レスありがとうございます。
いま試してみましたが問題なく描けました。

エクセルの問題ではなく
コントロールパネルのユーザー補助のオプションで固定キー機能（shiftキー）が
オンになっているのではないかと思われます。
そこの設定を確認してみてください

>429
固定キーもオンではありませんでした。

429は、
>>428
でした^^;
2000が手元に無いので、検証できませんが、
思いつく範囲ではその辺かなと^^;

無線ってのが気になる
あとはIMEの問題とか
いずれにしてもEXCELの問題ではないよね

後、僕で思いつくのは、
XLstartとかのファイルのマクロが暴走してるぐらいですかね^^;

>>426
なんか、上のほうにも同じような症状の質問者いなかったか？
最近のアップデートでなんかあったんかいな

>>432
logitecの方は無線では有りません。
因みにエクセル以外では不具合は発現しないので固有のトラブルかと思ったのですが。。
確かに再インストールしても再現するのだからそうなのかもしれませんね。

XLstartは試してみます。

>>425
ヒント：既に解決済み&シート名を取得する必要は無し

ＶＢＳで、ログイン時に自動で裏で（タスクマネージャーに出ない状態で）エクセルを走らせることができたような

なんに使ってるか記憶に無いＶＢＳファイル探すのも良いかも

>>434
>156さんの症状と酷似しているようです。
（厳密には私の場合は新規のシートでも同様の症状なので少しだけ異なるようですが。）

XLstartフォルダは空っぽでした。

>>436
ヒント：シート名ぐらい関数で取得できる点 w

ムキになっちゃって､恥ずかしい子だなw

>>438
そういや最近のWinUpdateでExcel2000を使うと一部のファイルが
開けなくなるってのがあった。たしかもう修正されていた気がするが、
そのあたりが怪しいね。
OfficeのUpdateをすべてやってみた？

なんか無知を指摘されて顔真っ赤にしてるおこちゃまが
沸いてきたな w
もう春なのかね− （苦笑

>>438
IMEのテキストサービスを無効にしたらなんかいいことあるかね？

>>442
ホント､嫌になっちゃうよね。
ちょいと前までテンプレに載ってたようなことを
意気揚々と書いちゃったりしてw

なんだ？テンプレに書いてあったことも知らなかったのかよｗ
はずかシィわなそりゃ（ﾃﾍ

425ﾊｽﾞｶｼｽ(/ω＼)

10
10
10
20+10　
20+40
という列があって
合計が70+50のようなことは出来ますか？

>>447

20+10
20+40
は文字列になってしまうのでもうちょっと質問内容詳しく…

質問です
エクセルだと、1〜20までは、○がつくのですが、それ以上だと丸がつきません。
どうしたら、つくようになりますか？

>>447
表示用の列と実際の数値が入っている列を分ければ簡単にできるんだが。
たぶん、そういうつもりじゃないんだろうなあ。

初心者の俺にわかりやすく教えてください

エラーの＃DIV/0!みたいな表示を消すにはどうすればいいの？
印刷したいけどいちいち消さなきゃいけないの？

>>449
フォントにそれ以上の丸付き文字が無いのでどうやっても出ません。
オートシェイプで丸書いてその中に数値入れるとかしか無いんじゃないかな？

初心者の君に分りやすく説明するとこうなる

　マニュアルを見ればすぐ分る

>>451
印刷時にエラーの表示を省きたい場合には、
[ファイル]-[ページ設定]で、[シート]タブの[セルのエラー]から「空白」とか
選ぶと印刷されなくなるよ。
ワークシート上でも表示させたくないなら、IF関数とか使って表示を回避する
のがいいんじゃないかな？

454は神様
453はぢごくに落ちる！まもなく氏ぬ！

>>455
氏にはしないだろうけど
異性との縁が無くなるんだろうよ

WindowsXPでExcel2003を使っております。

4,320.043
3,432.8
8,285.04
等のコンマと小数点のある数字を大量に入力して表示させたいのですが、
セルの書式設定を「標準」にするとコンマが表示されず、
「通貨」にすると小数点以下の表示が消え、それを１つ１つ修正しないといけない状況です。
3,432.80などと最後に0がつくのは避けたいのです。
解決策をお教え頂けると非常に助かります。
どうかよろしくお願いします。

3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 図　挿入　自動　エクセル

ゴミを消し忘れていました。すみませんm(__)m

書式→ユーザー設定で

#,##0.###

>>459
早速の回答ありがとうございます！！！
ただ、854. や　763. のように整数にも小数点がついてしまいますが、
これを取る方法はないのでしょうか。
どうかよろしくお願いします。

>脳みそかなりピンチ

ここまで分ったら後は応用できるだろ
ヘルプでも分ることだ

うっかりしてた

#,##0.###;G/標準

うっ、まだ小数点が出ています。
コピーしてセルの書式設定のボックスにCtrl+vで直接貼り付けてもだめでした。
いろいろと試していますがまだできません（涙）

見た目が悪いから

　#,###.???

こっちをお薦めしたいんだが駄目か？

すみません。
やってみましたが、740. や 238. など相変わらず整数の小数点が消えません。
また、並びは右詰でないといけないので、私の場合は使えませんでした。
ただ、ビシッと小数点が整列したのは凄いですね。これは別のケースで使えそうです。

いろいろやっていますが、まだ解決しません。
すみませんが、救いの手をお願いします（号泣）

表示形式だけでは無理とおもう

うっ。。。
そうなんですか・・・
もしかしてVBAとかになるのでしょうか。
すみません。VBAは使ったことがないんです（号泣）

うぜえ

レス頂いた方、本当にありがとうございました。

　 　Ａ　　　　　Ｂ　　　　　Ｃ　　　　　Ｄ　　　　　Ｅ　　　　　Ｆ　　　　　Ｇ　　　　　Ｈ　　　　　Ｉ Ｊ
1　1〜10　11〜20　21〜30
2 4 5 6 　21 5 10 1 1
3 1 2 3 2 17 　 23 2 2
4 6 5 4 13 12 10 3 3
5 3 2 1 4 11 　 7 4 3
6 4 5 6 1 15 20 5 4
6 2

計算式はＪ列に入っていて、ＡからＩ列に入っているデータからＪ列を求めるようにしたいのです。
A2〜C6に入っている数字がＩ列に対応します。
２行目を見た場合、A2の数字４はA1に書いてある1〜１０になります。
そしてE2〜G2の中にその1〜１０が何個あるかカウントします（答え1個）
そうやって、A2〜C6のそれぞれの字に対応したE2〜G6が何個あるかカウントしたいのです。
2行目で４は1〜１０なのに4行目では21〜30になったりするので、そこが難しいんです。

Ｊ列に入れるべき計算式がわかる人がいましたら、教えてくださいませ。

失礼

変な風になってしまいました。
忘れてください。

わかりました。答えずに忘れることにします。

俺の頭ぢゃ質問の意味が理解できない。。。orz

理解しなくていいよ

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否 】 否
【5 検索キーワード 　 　 】 excel ハイパーリンク

同じファル内の別シートにハイパーリンクを設定している場合に
リンク先のシート名を変更すると、「参照先がありません」みたいなエラーになりますよね？

リンク元の設定を個々に修正するのは面倒なので、一括で修正するような方法って無いでしょうか？

>>475
普通に置換すればいいんじゃね？

でも頻繁にシート名を変更するなら､どっかにシート名書いて置いて
=HYPERLINK(CELL("address",INDIRECT(A1&"!A2")))
みたいにしておくと､A1を書き換えるだけでリンクが修正されるよ。

>>476
>普通に置換すればいいんじゃね？

名前を変更したいシートに対してリンクを張っているのが数十シートに渡って百カ所くらいありまして
一つずつハイパーリンクの設定を開いて置換するのは非常に面倒なんです。
まとめて置換する方法ってあるんでしょうか？


>でも頻繁にシート名を変更するなら､どっかにシート名書いて置いて
>=HYPERLINK(CELL("address",INDIRECT(A1&"!A2")))
>みたいにしておくと､A1を書き換えるだけでリンクが修正される

少し勉強してみます・・・

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 置換　語頭　語末

置換する際に、例えば「akasaka」という文字列の語頭の「a」は「#A」、
語末の「a」は「A#」、それ以外の語中の「a」は「A」になるような
方法があればご教示いただけないでしょうか。

>>478
A．
先頭と末尾の1文字を文字列関数で切り出し､IFで条件分岐させて#を付加
あとは普通に置換関数で置換したものを&で連結
必要ならコピーして｢値の貼り付け｣で元のセルを書き換える。
関数の使い方はヘルプ参照。

B．
範囲をコピーして､正規表現が使えるテキストエディタに貼り付け､
正規表現で置換したらそれをコピーしてExcelに貼り付け。
正規表現についてはWeb解説参照。

お好きな方をどうぞ。

windowsXP HomeEdition、Excel2003を使っています。

関数をセルに入力しているのに、関数が評価されず、
関数の文字列がそのままセルに表示されてしまいます。
入力しているのは、次の関数です。
=COUNTIF('Asheet'!$D$11:$V$70,"<"&"91")-$E$20-$E$21-$E$22-$E$23-$E$24-$E$25-$E$26-$E$27
そのすぐ上のセルで、下の関数が入っているのですが
そのセルではちゃんと関数の結果が帰ってきてます。
=COUNTIF('Asheet'!$D$11:$V$70,"<"&"81")-$E$20-$E$21-$E$22-$E$23-$E$24-$E$25-$E$26

ためしに、次の数式を入れても評価されず、この数式の文字列がそのまま表示されてしまいます。
=E27+E28

セルの設定の問題だと思い、すぐ上のセルをコピーして、貼り付けたりしたのですが、
うまくいきませんでした。

なにか検討違いや
欠けている知識がありそうですが、ご教授のほどお願いします。

セルの書式設定 表示形式

個人で使っているならまずありえない
会社でなら嫌がらせでやられている
人間ウィルスの典型だ

>>479
ありがとうございました。
試してみます。

>>481
>セルの書式設定 表示形式

レスどうもです。
表示形式が文字列になっていると思い、
他の形式にいろいろと変更したのですが、うまくいきませんでした。

いま、関数を別のセルに保管しておいて、
そのセルを編集―クリア―すべてでクリアした後、
別のセルに保管しておいた関数をそのセルに貼り付けたら
関数が評価されました。

お手数おかけしました。。

ちなみに、そのセル内の関数や数式の一部を変更すると、
関数や数式は評価されず、そのまま文字列として表示されました。
いったいどういうことなんでしょう。。

>>448

説明が難しいんですが、「+」の部分は合計させたくないが
おまけの数値としてあるような感じです。具体例が思い浮かびません。


>>450
表示用の列と実際の数値が入っている列を分けてから
どうすればいいんですか？

>>487
数値だしたいところにクリックしてSUM関数のボタンおして
一列目の範囲を選択、ctrlおしながら二列目の範囲

ttp://uproda11.2ch-library.com/src/110999.png

>>487
たとえば表示用の列が「10+20」だとしたら、
計算用の列を２つ作ってそこに「10」と「20」を入れておくだけ。
「10+20」を入力すると考えるんじゃなく、
はじめから10と20を入力して「10+20」を作ると考えればいい。

仮にA1に10でB1に20なら、表示用のC1には「=A1&"+"&B1」で「10+20」になる。
B列に値がない場合も含めて考えるなら「=IF(B1<>"",A1&"+"&B1,A1)」とか。

集計は値の入ったA列、B列でSUM関数。結果も同じように「70+50」とか表示できる。

Win2000, Excel2003 です。

相談というよりギモンなんですが、IF関数を入力中に出る引数のヒントでは
　IF(論理式, [真の場合], [偽の場合])
と表示されますが、真の場合を省略すると怒られるのですね。
　=IF(A1,)
と「,」を入れたら許してもらえましたが、結果はTRUEでもBLANKでもなく0になりました。

　=IF(A1,"")
だと、見た目BLANKになりますが、そのセルをISBLANK関数でテストするとFALSEでした。
でもCOUNTBLANK関数ではカウントされてます。

そういう仕様なんでしょうが、なんかヘン。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2002
【3 VBAが使えるか　 　 .】 わかりません
【4 VBAでの回答の可否】 ？
【5 検索キーワード 　 　 】 エクセル　オブジェクト　移動できない

エクセル上でオブジェクトを扱っているのですが、
オブジェクト上にポインタを移動すると駐車禁止のようなマークが出て移動することができません。
他に作業は行っていないのですが、何が原因なのかご教授ください…

質問する前にネット検索かけたらあったけど、半角は均等割り付けできないのな・・
たまたま全角でやった隣でやろうとしてできないから「なんで？」みたいな感じで必死にやってたよ

自己解決しました、スレ汚しすいませんでした。

winXP
Excel2004

ブックで作られた定義を
別のブックで呼び込む方法ありませんか？

【1 OSの種類 　 　 　 　 .】 WindowsXPsp2
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 少々
【4 VBAでの回答の可否】 可

すみませんが教えてください。
inputboxメソッドでキャンセル処理をしようと思うのですが、

”実行時エラー '424':
オブジェクトが必要です。”

とエラーが出ます。コードは以下の通りです。キャンセル処理はどのようにすればよいのでしょうか。
よろしくご教示下さい。

Set myRange= Application.InputBox("セルをクリックしてください", Type:=8)
If myRange = False Then
MsgBox "処理はキャンセルされました。"
Exit Sub
End If

自己レスです。解決はしていませんが…
if の条件を　
Is Nothingとしましたが、同じエラーが出てしまいました。
inputメソッドの受け取る型が、Type:=8　だったのでこうしてみましたが、キャンセルのときにNothingが返るんじゃ無いんですね。
また、エラーが出る箇所（VBEで黄色反転される所）を囲むように
On Error GoTo HandleErr_1　と、
HandleErr_1:
Exit Sub
で囲んでみましたが、同じくエラーでした。
受け取る型が、Type:=8のときはどうすればキャンセル処理をかけるのでしょうか。
ご教示の程、お願いいたします。

自己レスです、今度は解決しました。
inputメソッドの引数指定をつけて、エラー処理を書けば回避できるようですね。
ＭＳのサイトの通りやったんだけどと思いましたが、引数指定をしていませんでした。
すれ汚しすみませんでした。

Excelで折れ線グラフに近似曲線を引くことはできないでしょうか？
ぐぐると散布図だと、グラフをクリックしたらグラフメニューに近似曲線の追加が出てくると
書かれているのですが、そんなメニューは出てこないです。

OS：XP　Pro
Ver　XP
マクロ不可

>>498
データ系列をきちんと選択してから右クリックしてみたまい。
折れ線そのものを右クリックすればメニューに「近似曲線の追加」がある。

ちなみに別に散布図である必要はないぞ。普通の折れ線でも同じ。

>>499
resありがとうございます。できました。
もうひとつ教えていただきたいのですが近似式を表示させようとすると
y=-3665xなどと滅茶苦茶な状態になってしまいます。

たぶん、X軸が日付だからだと思うのですが、これを正の数値に変えるにはどうすればいいでしょうか？

【1 OSの種類 　 　 　 　 .】 WindowsXPsp2
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 少々
【4 VBAでの回答の可否】 できれば避けたい

下線についての質問なのですが

住所
￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
みたいなのを書きたいのですが、下線を設定しても

住所
￣￣
となってしまい、スペース部分に下線をつけることができません。
どうにかする方法はありますでしょうか？
ちなみに半角スペースでも全角スペースでもダメでした。

>>501
再現しません。
半角スペースでも全角スペースでもできました。

>>502
調査ありがとうございます。
色々とやってみたら、「住所」の前にスペースを入れて「　　住所」と
やるとダメなようです。
これは諦めるしかないでしょうか？

>>503
文字の前にスペースでもできました。

=SUBSTITUTE("住所-----","-"," ")
で下線が出るかどうかチェック。出るなら何らかの理由でスペースが入力されてないかも

>>504
出るんですか!?
何が違うんだろう･･･。

>>505
これでも下線は出ないです。
「住所」って文字だけが出ました。

>>500
データが右肩下がりの減少傾向にあるのなら、
線形近似でそういう式が出ても別におかしくない。
これ以上はなんとも言いようがない。

X軸の値が日付（実際にはシリアル値が入っているだけの整数）なのは
まったく関係ないと思う。

>>500
失敬。使っているのは散布図か。
それならX軸の値も多少は効いてくるか。
（傾きが-3665になるのはY軸のデータのせいだと思うが）

日付の代わりに、日付と同間隔で適当なX軸の値を設定して
それでグラフを描き、軸ラベルにはテキストボックスとかで
別に日付を入れてやるくらいしかないかな。

俺には思いつかんので、ダメなら別の人に聞いてくれ。

とりあえず頭にスペースを入れないでやる事にします。
>>502,504,505さん、ありがとうございました。

【1 OSの種類 　 　 　 　 .】 XP Home
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 ????

　ＰＣを買い換えて環境が変わったせいか、使い方で不便してます。セルを選択した状態から
タイプしても、すぐに入力されないのです。たとえば｢ka｣とタイプしても何も入力されず、これを
解決するにはそのセルをダブルクリックするか、F2ボタンを押す必要があります。

　ただ、かなで二文字以上を入力すると、おかしな文字が一応表示され、エンターキーや変換
キーを押すことで正しい表示が現れます。例を言いますと、｢kaka｣とタイプすると｢kか｣と未確
定表示され、エンターキーもしくは変換キーを押すと｢かか｣に直るといった状況です。

　IMはATOKを使っていますが、IME2000に切り替えても症状変わりません。

　これは設定上に何か問題があるのでしょうか？　どなたか教えて頂けます？

【1 OSの種類 　 　 　 　 .】 XP Pro
【2 Excelのバージョン 　 】 Excel2002
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】

あるホームページの
</TH><TD>高さ</TD><TH>60</TH>
の数値だけ抜き出してエクセルに表示させるようにするにはどうすればいいでしょうか？

>>511
VBA必須
なのでVBA使いたくない君への回答は｢出来ません｣だ

>>512
VBA使えばできるんですか。勉強してきます
ありがとうございました

webクエリ・・・ごにょごにょ

なんで>>501への回答に
「セルの下に罫線を引け」と誰も言わないんだろう・・・

>>515
あくまで「下線について」と冒頭で明記されての質問だからだろう

>>514
残念､ハズレ

>>511
あきらめちゃったみたいだけど・・・・・・・参考までに
数値の前後が一定のパターンなら「データ/区切り位置」で
数値を抜き出す事は出来るよ

>>516
「罫線機能を知っているのか？」という問いが1つでもあれば良かったろうに。
教える側のスキルも不足していた、ということなんだろうな。

>>519
君がスキルのある回答を見せてあげればよかったというだけのことだね。

はい。次の方、どうぞ。
↓

>>489

朝早くから書き込みありがとうございます。
それに関連した質問なんですが、
「+20」のある列を表示だけさせないことは出来るのですか？

>>522
「+20」のある列という書き方から、489の内容を理解して
くれているのかどうか激しく不安なんだけど。
（俺はあれ以上、くわしく説明できない）

列の表示／非表示なら、列番号を右クリックして「表示しない」で非表示。
非表示列の再表示は、非表示列の左右の列番号をまとめて選択して
右クリックから「再表示」

>>522
＞「+20」のある列を表示だけさせない

人に質問するときは、もうちょっと分かりやすい日本語を使うように心がけようよ。

>>511
たんにＷＥＢの表全体をコピペしてＥｘｃｅｌに貼り付ければ
自然と各セルに数字が入力されるんでないの？
あるいはＩＥだったらＥｘｃｅｌで編集ってのを選べば、取り込みたい範囲
選んで取り込めばいいだけだし。

>>515
思い込みが強い人が多いからね
初心者でそれすら分かっていないケースも（多くはないが）あるってこと
まで頭が回らないのよ。

>>523
そもそも何をしたいのかってのを具体的に聞き出さないとこのケースでは
回答出せないだろうね。
じつは無駄なことしてるってことがありえるから。
20+30 とする理由、なんなのそれ？って根本の部分。

>>526
そこまで考えて回答するのはプロの仕事だな。
「教える・説明する」という意味での素人が、きまぐれに出している回答に
それを望むのは無理というもんだろう。

実際には、そういうあたりまで気の回る優れた人が回答してくれるケースもあるので、
それに当たった人は運がいいというだけのことだわな。
もちろん、526氏がそういう素晴らしい回答を日夜提出してくれることまで
俺は否定する気も邪魔する気もありません。どんどんやってあげてくださいw

↑そんな解説いらない

　質問者：いい回答が得られない→質問の仕方を代える・新しい情報を入れる
　
　回答者：プログラムで動くかのように機械的に回答するだけ


でいいのでは？

>>530
でも条件後出しはご法度だからなあ。

セル右下の黒いマーク(ドラッグできるヤツ)が出てこなくなったのですが、
どうすれば復活させられるでしょうか？
OSはWin2000、Excel2000です

>>532
シートの保護を解除しましょう

>>528
＞そこまで考えて回答するのはプロの仕事だな。
とりあえず、君の回答はクオリティが低そうだ

エクセルで印刷するデータをファイルに出力するﾏｲｸﾛｿﾌﾄ ﾄﾞｷｭﾒﾝﾄ ｲﾒｰｼﾞﾝｸﾞ
というｺﾝﾎﾟｰﾈﾝﾄがありますが、これってメジャーですか？
使ってみたら結構便利だったので､会社間のデータのやり取りに使おうと思ってるんですが・・
あともし使うなら、MDI形式とTIFF形式、どちらがいいでしょうか？

>>532
ツール＞オプション＞編集＞ドラッグ＆ドロップで編集を行う

>>531
そこは回答側がもうすこし機械的に処理しないと

>>508
レスありがとうございます。
折れ線グラフなのですが、傾きは右肩上がりです。
なのにマイナスになってるのでちょっと困ってまして。
整数振って非表示にしてそれで計算ってのも昨日からやろうとしてるのですが、
そうすると日付どころかグラフも表示できず無理でした。

>>538
データが前日に比べ一回でも減少することがあるなら
人間の目に右肩上がりに見えても計算上は下がってるとか

>>539
期間は約３年、初日のプロット点が１００万の位置、最後のプロット点が５００万近くの位置です。
折れ線グラフなので当然途中で右肩下がりになっている部分はありますが、
０を割り込んだことはありません。

質問です。
OSはXP、EXCEL2003です。

入力した数値がセルに正しく表示されません。
（例　200と入力したのに、20と表示される。）
（例　1と入力したのに、0.1と表示される。）　

どうすればこのような事態を回避できるのでしょうか？
教えてください。

>>541
そのセルに設定されているヘンな書式をとっぱらう。
編集＞クリア＞書式とか、書式＞セルで表示形式を標準に戻すとか。

>>540
単にデータが多すぎるだけと違う？
適当に10日分くらい抜き出して同じ現象が起きるかどうか試してみれば。

>>542
ありがとうございます。
やってみましたが、状況は変わりませんでした・・。

解決しました！

ツール→オプション→編集
『小数点位置を固定する』に間違ってチェックが入っていたのが原因でした。
お騒がせしました。

>>540
思いつくとすればこれくらいかな。

　・近似曲線の種類が「線形近似」以外になっている。

　　　例えば、多項式近似(次数2以上)になっているとか。


　・「切片」に極端に大きい数字が指定されている。

【1 OSの種類 　 　 　 　 .】 Windows2000
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 はい(少し)
【4 VBAでの回答の可否】 可
【5 検索キーワード 　 　 】 EXCEL セル内 文字列 切り取り 貼り付け 改行

マクロである1つのセル内で改行している文章を途中から切り取って1つ下のセルに入力する方法はありますでしょうか？
またその方法(コード例)等を教えていただけませんでしょうか？

〔例〕セルF1に10行(改行)の文章⇒セルF1に5行の文章・セルF2に5行の文章

>>543
データが多すぎると駄目になる不具合があるのでしょうか？
試しに１０ポイントでグラフを作ってみたら大丈夫でした。
もし、Excelの不具合だったら大きな問題だと思うのですが。

>>546
線形近似で切片は０に設定しています。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 Excel 同じデータ　統合(計算)

A列に商品名、B列に金額、C列に店名、D列に商品カテゴリと並んでいて、
それが同様にE〜H、I〜L…と続いている場合、シート全体から
各商品カテゴリに対する金額の合計を集計することは出来ますか？
商品カテゴリは別シートに入力するので一定ではありません（上限は設定できます）
また、その集計結果の並び順を任意の順番に並べ替えることは出来るのでしょうか。

＞それが同様にE〜H、I〜L…と続いている場合、シート全体から
ここから直すことを強く薦める。

とりあえず回答
SUMIF関数で十分
　=SUMIF(A:D,カテゴリ,B:B)+SUMIF(E:H,カテゴリ,F)+　…

>>548
不具合っつーか、エクセルにもメモリその他の状況によりいろいろ制限があるから。
そのどれかに引っかかってしまったら、正しく動作しないということはあり得るんじゃないかな。
（本来はエラーで止めるべきでしょうけどね）

ありていに言えば、エクセルの開発者が想定していないような数のデータで
グラフを描いているということだと思うんだけど。
数年分のデータを１日刻みでしたっけ。そういうのは私もやったことないっす。

>>550
どう直すのですか？
カテゴリが一定ではないので、カテゴリを変更するたびに
計算式も変えなきゃならないSUMIFでは手間すぎるのですが…
取り敢えずピボットテーブルを新シートに作ることで自己解決しました。
このピボットの内容を本シートの任意の場所にコピーする際、
不要な項目を省くにはどうすればいいのでしょうか…

>>552
横に並べても良い事はありません
A〜D列だけで表を作りましょう
データとして配置するのは基本です

印刷用途があるなら別シートに参照コピーで印刷フォームを作成しましょう

ってか項目の並び順が適当すぎると思いますよ
　A列 カテゴリ
　B列 商品名
　C列 金額
　D列 店名
この程度の修正で表そのものが見やすくなります


ピボットなら必要な項目だけを表示させることができます

>>547
Ａ．
Split関数を使って改行分割､5行単位で再連結してセルに代入

B．
InStr関数とループを使って任意の位置(最初は1､2回目以降は前回の検索位置+1)から
5個目の改行位置を検索､Mid関数で切り出してセルに代入

C．
正規表現VBScript.RegExpで指定行数分をグルーピングし､マッチ部分をセルに代入


少しでも書けるならこれをヒントに頑張ってみよう。どうしてもわからなければ
>>2･8･3に従って上手く行かなかったコードを貼った上で再質問してね。

>>547
Sub test()
Dim gyo As Integer
gyo = 5 '<==ここを変更
Dim txt As String
Dim a() As String, b() As String, i As Long, j As Long
Dim dum As String, x As Integer
txt = ActiveCell.Text
i = 1
j = 0
While InStr(i, txt, vbLf) > 0
ReDim Preserve a(j)
a(j) = Mid(txt, i, InStr(i, txt, vbLf) - i)
i = InStr(i, txt, vbLf) + 1
j = j + 1
Wend
ReDim Preserve a(j)
a(j) = Mid(txt, i, Len(txt) - i + 1)
j = -1
For i = 0 To UBound(a)
If (i + 1) Mod gyo = 1 Then
j = j + 1
ReDim Preserve b(j)
b(j) = a(i)
Else
b(j) = b(j) & vbLf & a(i)
End If
Next
For i = 0 To UBound(b)
Cells(ActiveCell.Row + 1 + i, ActiveCell.Column) = b(i)
Next
End Sub

>>555
選択したセルの中に改行があると、5行ごとに一組にして、その下の
セルに分割書き込みするマクロ。
分割書き込みするセルはそこに何らかのデータがあっても
アラートなしに上書きしていきます。

>>555
Dim dum As String, x As Integer
は削除してください。消し忘れです。

またずいぶんと無駄の多いコードだな
まあ初心者には動きさえすれば無駄とかは関係ないだろうけど

>>558
ならすっきりさせてくださいよ

てめえでやれよ

なんだ、できもしないでいってるだけかよ w

>>555
えらく可読性の低いコードだなおい・・・

>>559-561
Sub test()
　　Const RowCount = 5 '単位行数
　　Dim strLines() As String, i As Long, j As Long
　　strLines = Split(ActiveCell.Value, vbLf)
　　For i = 0 To UBound(strLines)
　　　　If i Mod RowCount Then
　　　　　　strLines(j) = strLines(j) & vbLf & strLines(i)
　　　　Else
　　　　　　j = i \ RowCount
　　　　　　strLines(j) = strLines(i)
　　　　End If
　　Next
　　ActiveCell.Offset(1).Resize(j + 1).Value = WorksheetFunction.Transpose(strLines)
End Sub

これでいいかな？

>>563
よくできました
空白セル選ぶとエラーになるのはまあご愛嬌ということで
てか、VBAもsplit使えるんだね、配列や文字列の関数って
とこには書いてなかった

・・・

>>563
こっちの方が何倍も分かりやすい。
配列を再利用する書き方が、Java好きの俺にはちょっと抵抗あるが。

>>555
まああれだ、がんばってください。
参考書は変えたほうがいいかも。

ここってスキルの高いひと結構いるよね。あまり書き込みはないけどさ。
なんでこの板ID表示が無いんだろうといつも思ふ。

>>568
根性悪いのも多いけどねw

>>569
泣くな555

>>566
配列もオブジェクトって言語使いには確かに抵抗あるかもね。
VBの配列は単なるインデックス付き変数だから､配列の再利用は結構使われる手法だけど。

>>570
>>567でした、残念

ここで誰かがコード書いた後にすかさずチェック入れてる奴は
きっとム板住人w

>>550
＞ここから直すことを強く薦める。
激しく同意。

直してさえしまえば、あとはピボットトテーブル一発かと思われる。

>>572
×きっとム板住人w
○きっとVB6.0スレ住人w
では？

>>571
データの表現方法の違いというよりも、思想的な違いという方が強いかな。

JavaはCやVBと比べて、ソースの可読性を尊重する文化が強くて、

　・1つの変数を目的の異なる複数の用途に使い回すべきではない。

というのがある。

これを多用してしまうと、可読性が低下するだけでなく、保守性にも悪影響が
生じやすいからね。

> JavaはCやVBと比べて、ソースの可読性を尊重する文化が強くて、
そこは言語による差は実際の所ほとんど無いよ。個人の差か覚えた時期の差があるだけ。
覚えた時期の差や､周りに居る人の個人的な思想に因って各言語に対するイメージは大きく変わるけど。

それに563の処理は
> ・1つの変数を目的の異なる複数の用途に使い回すべきではない。
には該当しないからね。

行単位で分割した物を行単位で再格納する。その分割と格納時の行数が違うだけ。
ソートアルゴリズムで､ワーク配列を利用せずに入れ替えを行うのと大差ない手法。

確かに

【1 OSの種類 　 　 　 　 .】 WindowsＸＰ
【2 Excelのバージョン 　 】 Excel03
【3 VBAが使えるか　 　 .】いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 エクセル　数値指定　範囲　抜き出し

よろしければお力をお貸しください。
セルＡ１からＦ１、セルＡ２からＦ２・・・というように数値を入れまして
Ｇ１にその合計（セルＡ１からＦ１）÷5の数値が出るようにしてあります。
それで、その計算を続けていきましてＨ列には任意の数値を入力します。

Ｇ１　５００　Ｈ１　1250
Ｇ２　３００　Ｈ２　1580
Ｇ３　９００　Ｈ３　900
Ｇ４　２００　Ｈ４　1210
Ｇ５　６００　Ｈ５　1800
というような時に、Ｇが３００以上５００以下の時を抜き出して
その条件のみＨを合計して、該当した個数で割るにはどうすればいいでしょうか？


上の場合だと
Ｇ１　５００　Ｈ１　1250
Ｇ２　３００　Ｈ２　1580
を抜き出して、（1250+1580）/2　にしたいのです。

下げ忘れました、ごめんなさい

>>578
SUMIFとCOUNTIFを2つずつ使うか配列数式で。
それと質問スレで最初の質問時にageるのは問題ない。

>>576
＞行単位で分割した物を行単位で再格納する。その分割と格納時の行数が違うだけ。
まぁ確かに総かもね・・。

ありがとうございます、そのSUMIFとCOUNTIFを調べてきます。

さっぱり分かりませんでした^^;
Ｇの範囲を指定するのもエラーが・・・、抜け出したとしても
その横のＨの指定もちょっと私の頭では厳しいものがありました。

できました！！ありがおうございまず

よかったねー

いっぺんに書いたら、こんな感じだろ・・・
=(SUMIF(G:G,"<=500",H:H) - SUMIF(G:G,"<300",H:H))/(COUNTIF(G:G,"<=500") - COUNTIF(G:G,"<300"))

けっこう高度だよな・・。
短いヒントだけでよく理解できたね578。

>>553
ぶっちゃけて言うと家計簿なので横に並べるとしんどいです
同じ理由で列の並びは現状が最適だと思ってるんですが…
ピボットの「必要な項目だけ表示」は分類に対してですよね？
カテゴリの中に「食費、光熱費、水道代…」とあるとして
水道代とそれに対応する金額だけを表示したくない場合は
どうすればいいのでしょうか。

>>587
ピボットテーブルの「カテゴリ」の下向き三角をクリックして、「水道代」のチェックを外す。
他にもピボットテーブルはかなりカスタマイズ効く。

俺も同じやり方で家計簿やっている。
ただし、カテゴリーIDを入力してカテゴリーIDとカテゴリー名の対応表を別シートに作っている。
列の並びはどう並べても良いよ。

水道代に、なんとか還元水は含まれますか？

公表する必要はありません。
しらばっくれてください。

>>586
何処が高度？
単に長いだけで､難しい関数使ってるわけでも､複雑にネストされてるわけでもなく
条件計算関数の基礎であるSUMIF,COUNTIFを､四則演算にかけただけじゃん。

それとも君にとっては､"式が長い=高度"なのか？

(´･ω･`)

あんまり初心者をいじめるな

(´д｀)

(´･ω･`)

>>591
お前は偶然「知っている」から高度に見えないだけだろう。
SUMIFの">="だの"<"なんて書き方は、大半の人間は知らんよ。

>>596
それは大半の人間に対して失礼

>>591
程度の低い煽りを入れて優越感に浸ろうとする阿呆は失せてくれ。

一般人なめんなよ
SUM関数知らなくて電卓で計算してる輩もいるんだぜ

電卓で計算してExcelに入力している人がいるとは聞いていたが…まさか本当にいるとは！

>>596
ヘルプの使用例に

=SUMIF(A2:A5,">160000",B2:B5)

ってのが載ってる。初心者だろうがなんだろうが
ヘルプをちゃんと調べる人は知っていて当然。
『偶然』なんて要素がないと発見し得ない程のものではない。

>>601
お前は「SUMIFという関数がある」というのを知ってるから、ヘルプも簡単に参照できるんだろう。

つーかさ、>>591は何をしに来たんだ？
スレを荒らすだけが目的なら迷惑だから消えてくれないかな。

>>602
SUMIFという関数があるということは>>580が示している
>>586はその上で高度だと言っている

>>603スレを荒らすだけが目的なら迷惑だから消えてくれないかな。

俺SUGEEEEEEEEEEEEEEEEE
と自分に酔いたい回答者も一緒に消えてくれるとありがたい
自分では気づかずに「何で俺がこんな説明まで」なんて思ってそうだけど
いらない子なのにね

>>606いらない子

ウンコ達がいい匂いをかもし出してるなぁ

>>608ウン子

全板ID搭載すべき

>426です。
自己解決しました。
悪さしていたのはごろ寝マウスリターンズ。
ドライバ削除してもダメ再インストールしてもだめって状況は変わらないんですが
物理的にデバイスを取り外して別のマウスだけで起動すれば問題なく作動しました。
いろいろお騒がせして申し訳ありません。

以下のようなWebクエリを作成しました。（作成時には次のサイトを参考にしました。
ttp://support.microsoft.com/kb/274787/en-us ）

WEB
1
http://www.cdjournal.com/main/calendar/contents.php?cno=06&ymd=20070301

しかしステータスバーに
「Webサイトからデータを取り出し中です…」
「Webデータをシートにコピー中です…」
と表示されはするものの、結果としてはシートは白紙のままで、
データを取得できていません。
何が問題なのでしょうか？
どうすればデータを取得できるようになるでしょうか？
どうかよろしくお願いします。

1 OSの種類　Mac OS X 10.4.8
2 Excelのバージョン　Excel 2004 for Mac Ver. 11.2
3 VBAが使えるか　はい
4 VBAでの回答　可
5 検索キーワード　Excel Webクエリ PHP

>>554,555,563

ご回答ありがとうございました。
参考にさせていただきます。

>>612
>以下のようなWebクエリを作成しました。

以下のようなってどれよ？

>>614
説明が不十分で申し訳ありませんでした。
あらためてちゃんと説明させていただこうと、ひとつひとつ操作を確認しながらそれを文章化する過程で、
「HTMLのテーブルのみインポートする」にチェックが入っていたことに気がつき、
これを外して実行してみたところ、ちゃんとデータが取得されました。
お恥ずかしいかぎりです。申し訳ありませんでした。
ツッコミをいただいたおかげで気づく事ができました。ありがとうございました。

ちなみに Excel for Mac では拡張子 .iqy をつけたテキストファイルを作成し、
それを所定のディレクトリに保存するという形でWebクエリを作成します。そのテキストファイルの内容が
WEB
1
http://www.cdjournal.com/main/calendar/contents.php?cno=06&ymd=20070301
の３行でした。
それ以外の設定項目は、上記ファイルを選択してWebクエリを実行する際に、
プロパティをクリックしたら設定できるようになっています。
「HTMLのテーブルのみインポートする」の設定もそこにありました。

【1 OSの種類 　 　 　 　 .】 Windows　ｘｐ
【2 Excelのバージョン 　 】 Excel　2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 なるべく否
【5 検索キーワード 　 　 】 Googleやヘルプでの検索キーワード

折れ線グラフでいわゆる一次関数や比例のグラフを書きたいのですが、
エクセルってｘのほうは、数字の真上に縦線がでてないですよね。
それを中学等で使う、数字の真上に縦線というか軸がある表示に変えることはできるんでしょうか。
よろしくお願いします。

勝手に調整しろよ

>>616
散布図使えばそれで済む

>>616
http://www.excel-jiten.net/graph/xaxis_intersection_of_boundary.html
これでいいのか？

>>523

>>489　は出来てました。 ありがとうございました。

20+30 とする理由はおまけのデータ見たいなものです。

excel2003を使ってライブのチケットを作ってます。
1ページ14枚チケットが作れるので、全く同じページを何枚も作ってチケットNoの連番を入れていこうと思ったんですが、ふつうにコピペしたらセルの高さが調整されずにコピーされるので2ページ目からしっかりとA4サイズに収まりません。
そこで、1ページ目だけを使って印刷しようと思ったんですが、印刷する枚数で連番を変動させることってできないですか？
つまり一枚目は1〜14、2枚目は15〜28というふうにさせたいんですが、そういうことは可能ですか？？

>>621
VBA使えば可能ですよ。
あとは>>3を読んで自分でコード書いてね。

>>621
どこか印刷されないセルにページ数を入力して、
そのページ数からチケットの連番を計算するようにすれば
ページ数を変えるだけで印刷できるじゃん。簡単。

＞ふつうにコピペしたらセルの高さが調整されずにコピーされるので

いちばんの問題点はここかと。
コピペの仕方次第で、セルの高さを含めたコピペは可能だし、
印刷範囲の指定の仕方さえ知っていれば、A4に収まらないと、いうことも考えにくい。

os:XPpro ver.:,2003
今月末の日付を求めたいのですが、以下のコードでは先月になってしまいます。
どこを直せばよろしいのでしょうか。よろしくご教示のほど、お願いいたします。

DateSerial(CInt(Format(Now, "yyyy")), CInt(strThisMonth), 0)

すみません、
strThisMonth=Format(Date + 1, "m")
です。

>>621
そんなにExcelに慣れてないのだったら、連番だけ作ってそれを
Wordに差し込んだら？
遠回りなようだけど、VBAの知識すら必要ないぞｗ

すみません、CInt(strThisMonth) + 1でした。
申し訳ないです。

>>618
>>619
ありがとうございます！
なんとか目処がつきました。
本当に助かりました。ありがとうございます。

VBAの構文勉強できる本教えてくれ

>>630
Microsoft Excel[2000/2002対応] セミナーテキスト VBA入門編 (大型本)

>>630
オブイジェクト構造は違うけど､構文規則はVB6と同じなので
構文の勉強したいならVB6の本を見るといいよ。
それと具体的な紹介はスレ違いなのでよろしく。(>>2･B)

>>630
手っ取り早いのはExcelのヘルプ

VB6もVB2005もVBAも扱えるクラスが違うだけで大して変わらん

2005は全然違うけどね

サンクス

B列にデータがあるとします。
そのときにA1で指定した数のデータをA1から増えていく方向に足す方法は無いでしょうか？

たとえばA1に５と書いてあった場合SUM(B1:B5)の処理を行い、２０と書いてあった場合SUM(A1:A20)
の処理を行わせようとしています。

>５と書いてあった場合SUM(B1:B5)
>２０と書いてあった場合SUM(A1:A20)
質問はこの内容で間違いないの？

すみません。SUM(B1:B20)です。

Xのｎ乗をａとした場合、ｎとａからXを求める関数はありますか

>>637
OFFSET関数使え
INDIRECT関数でもいいけどね

>>640
関数使うまでもなく演算子だけで出来る
=ａ^(1/ｎ)

>>641
ありがとうございました。数学に弱いもので助かりました。

>>625
myDate = DateSerial(Year(Date), Month(Date) + 1, 1) - 1
っていうのはどう？

もう解決してるってばw

EXCEL2003で質問です。

小容量のファイルをBook/1日で送付してくるバカがいるのですが、
これをサクッとSheet/1日の1Bookにまとめる方法はありませんか？

..立場的に相手に文句は言えません。

あと、EXCELやWORDってタブ式になる予定とか無いんですかね？

すみません、分かりにくいですね。

現状はSheet 1枚のBookが日数分届く状態です。
たいてい一週間単位で送付されるので、Bookが7つ届いてる状況です。
で、コレでは閲覧するのに不便だという話です。

Book1 Book2 Book3...
↓↓↓コレを↓↓↓
Book1 (Sheet1 Sheet2 Sheet3...)

バカには見えない質問のようだ。

>>625
=DATE(YEAR(NOW()),MONTH(NOW()) + 1,1)-1

でOK。

>>645
Sheet3枚のBook（Sheet1以外白紙） が毎日届かないだけマシだと思って、
シートのコピーまたは移動 で自分用にまとめれ。

>>645
VBAでできるでしょ。
マクロの記録して、手作業で３シートくらい作業すれば
VBAの雛形はできるから、それを終了条件つけてループさせるだけ。

>>645

＞小容量のファイルをBook/1日で送付してくるバカがいるのですが、
＞これをサクッとSheet/1日の1Bookにまとめる方法はありませんか？

この文章から「バカ」を取り除いてから、そのバカに送信したまえ。
文句と要望ってのは違うぞ。

>>645
Excelファイルで作る必要がある､もしくはExcelファイルで送る必要がある
及び毎日送る必要がある

という条件なら､その行為自体バカとは言えないな。
むしろ､そのまとめを出来ない君の方がバカだ。
立場程度のことで意見すら言えなくなっちゃうのも愚かしい。

【1 OSの種類 　 　 　 　 .】 Windows2000
【2 Excelのバージョン 　 】 Excel2000
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否
【5 検索キーワード 　 　 】 excel 起動しない

Excelが突然起動しなくなって困っています。
スタートメニューからの起動や、Excelファイルをダブルクリックしても、
何も起きないか、起動前のロゴ画面が一瞬見えてもそのまま起動しません。
エラーメッセージはでません。

他のWord/PowerPoint/Access、その他Office以外は問題なく動きます。
社内LANにつなぐとこの状態です。
ただし、LANケーブルを抜いて、スタンドアロン状態にすれば、
なぜか問題なくExcelが起動しファイルが開けて使えます。

Windows2000のアップデートをしても直りません。
Officeをアンインストール後、再インストールしても直りません。
Excelのセルフモードも起動しません。
Excel.xlb消去、XLStartフォルダの中身は空っぽ、Excel.pipの消去も
試して見ましたが直りません。
レジストリを見ても、前のバージョンの残骸が残って干渉しているとかも
ありません。
ユーザープロファイルのExcel関係は消しました。

原因が不明で困ってます。
どなたか知恵をお貸しください。

>>653
http://www.google.com/search?q=Excel%E3%81%8C%E8%B5%B7%E5%8B%95%E3%81%97%E3%81%AA%E3%81%84&rls=com.microsoft:ja:IE-SearchBox&ie=UTF-8&oe=UTF-8&sourceid=ie7&rlz=1I7GGIC
でもダメならカスタマーサポートへ

【1 OSの種類】 Windowsxp
【2 Excelのﾊﾞｰｼﾞｮﾝ】 Excel2000
【3 VBAが使えるか】 いいえ
【4 VBAでの回答の可否】 まる写しで実行できるなら可　かも(自信あまりなし)
【5 検索ｷｰﾜｰﾄﾞ】年令･年齢･学年･学齢

生年月日を基に、1つのセルには3月末の満年令を
1つのセルには小1〜中3までの学齢を表示させたいです。
IF関数を利用し学齢を表示させようとしたのですが
ネストでつまづいてしまいました。
良き解決方法、御享受願います。

追記です。

生年月日の入力をしない年令･学齢欄は
何も表示されないようにしたいです。

宜しくお願いします。

>>655
年齢
=IF(ISBLANK(A1),"",DATEDIF(A1,DATE(2007,3,31),"Y"))
学年
=IF(ISBLANK(A1),"",SUBSTITUTE(MID("!!!!!!!!!!!!小1小2小3小4小5小6中1中2中3",2*DATEDIF(A1,DATE(2007,4,1),"Y")+1,2),"!",""))

学年の計算はあやしいかも

Ａﾌｧｲﾙ、Ｂﾌｧｲﾙ、両方に各々ランダムに顧客情報が3万件以上入っている。
しかしＡﾌｧｲﾙのみに備考欄があり、それをＢﾌｧｲﾙの該当ユーザー欄に
ｺﾋﾟｰしたい。しかしＡにあるものでＢにないものも多く、
ない場合には該当がなかったことをＢに記入せねばならない。しかも
Ａには同じユーザーＮｏがなぜか複数存在するという混乱した状況。

こんな場合やはり一件ずつ検索するしかないでしょうか？
もっと効率の良い作業法を模索しています。

ソートしてマージ

>>637です。
>>641
レスありがとうございます。
SUMの場合は成功しました。
しかしSTDEVP(B1:B5)の場合はうまくいきません。

良い方法がありましたら教えてください。

ソートしてマージ？

>>658
VBA使えば可能ですよ。
あとは>>3を読んで自分でコード書いてね。

Excel2000で擬似正規分布の乱数を得る方法がありましたら教えてください。

>>663
Googleで検索すればすぐわかる
検索してわからなければ､ここで説明しても意味無いだろうし

>>664
自己レス。NORMSINV使えばできそうでした。

658です。
>>662
レスありがとうございます。
3を読んだが理解できなかったので、「VBA　コード」でぐぐってきました。
ﾏｸﾛの難解版という感じなのでしょうか。ﾏｸﾛは単純なものなら組んだことが
あるのですが、エラーになった時にコード（？）を見て理解できるレベルではなく
ただひたすら記録し直して偶然うまく行ったらそれをツールボタンにするという
程度です。このレベルではせっかく可能な道があるようなのに無理めでしょうか？

>>666
無理って事にしておこう

因みに｢Excel(MS Office)のマクロ = VBA｣ね

あぁ・・・・・・やっぱり一件一件検索しか道はなかったか・・・ありがと。。

君にとってはその道しか無いようだな
俺なら一括処理させるけど

JUST Suite 2007発売
https://www.justmyshop.com/app/servlet/cc6?w=tpcs

>>658
俺もVBAの知識もへったくれも無いのでそのしょんぼり気分は
わからいでもないが…
>>659の言うようにすればあらかたなんとかなるんじゃないのか？
２ファイルの３万が１：１なんだったら、ソートすれば両ファイル共に
同じデータの並びになるだろう
No.重複してるなら顧客名でソートすりゃいいし

これが勉強のチャンスだと思いなさいよ

>>658
Access+MSDE(今は別の名前）使えば、
10行ぐらいのSQLで一括処理できるよ。
テーブルAに重複が無いなら、Access単体でもSQL2行で。
Excelからのリンクが超地雷原だけど、そーいう仕事が多いんならSQL勉強するのも手。

ごめん、>>673の
＞Access単体でもSQL2行
無し。
確かめてみたらUpdateFrom句はJET(Accessの中の人）には通らん。

せかしてすみませんが、どなたか>>660をお願いします。

>>675
答え出てるよ？

>>676
えっ？読み返しましたが無いようですが？

>>677
あ、適当に読んだので順番間違えた。
INDIRECTで通るよ。

>>678
やってみたのですが、A1に数値だけを入力するとできません。
＃REFのエラーになります。
A1でB1などとセルを指定するとできます。
数値だけでどうやってできますか？

>>679
=+STDEVP(INDIRECT("B1:B" & A1))

さて、>>660でSUMなら何が成功したのか詳しく説明してもらおうか(嘘

>>680
ありがとうございます。できました。
SUMの時は昨日食べた鼠カレーの影響か、勝手にできてたみたいです（嘘

あるあるwwww

ヒストグラムについて二つ教えてください。
元となるデータが変更された場合に再計算させる方法がありましたら教えてください。
F9では駄目でした。

あと、グラフ中の棒の数を１０個に固定する方法がありましたら教えてください。
WindowsXP,Win2000です。

>>683
自己解決しますた。

楽天証券のリアルタイムスプレッドシート(RSS)を利用して
選別した銘柄をエクセルで監視しております。
そのシートの中で株価更新ボタンがあり
それを押すとヤフーファイナンスからデータを引っ張って
74日前までの始値、高値、安値、終値、出来高、調整後終値
を毎日更新することができるのですが、先日更新しようとしたら
データを引っ張ることができなくなってしまい困っております。
原因としては、最近ヤフーファイナンスのデザイン等が
大きく変更されたから？？？と思っているのですが
この対処方法が分かりません。
どうもクエリの編集で改善するらしいのですが
全くの素人なんでどう修正いいのかさっぱり分かりません。
ご指導宜しくお願いします。

72 名前：山師さん[] 投稿日：2007/03/15(木) 09:49:24.97 ID:7sSrHh1j
>>71
中学生が作れるかは知らないけど、ディーラーからは50万の価値が
あると言ってましたよ。

嘘っぽいけどね。

73 名前：山師さん[sage] 投稿日：2007/03/15(木) 09:54:27.25 ID:JbNN3yDy
>>72
> 中学生が作れるかは知らないけど、ディーラーからは50万の価値が

これが５０万。
じゃ俺が作ったのは、数千万の価値があるなｗ

76 名前：山師さん[] 投稿日：2007/03/15(木) 14:25:15.39 ID:7sSrHh1j
>>73
数千万の価値があっても負けっぱなしじゃあ意味ないわなｗｗ

78 名前：山師さん[sage] 投稿日：2007/03/15(木) 14:31:16.93 ID:ZbV5fjje
ていうか、>>56は、コードの一部だけだろ。
全部見せてくれないとなぁ。

79 名前：山師さん[] 投稿日：2007/03/15(木) 14:40:30.34 ID:7sSrHh1j
>>78
残念ながら全部は見せられないよ。
全部見せたところで君が解決するとは思ってないし。

84 名前：山師さん[] 投稿日：2007/03/15(木) 15:34:41.88 ID:7sSrHh1j
>>83
ご指摘ありがとうございます。
エクセル板のほうで聞いて来ますね＾＾

なんか最近下落してるもんだから、狼狽君達がいきりたっててｗｗ
読んでてとても楽しかった。

今回の下落で狼狽してる人は下手糞な人。



こういう嫌な奴ですが、引き取って頂いてありがとうございます。
是非、飼ってあげてください。

うぜえ

全くの素人なら､やろうとしてることは身の丈に合わないからキッパリ諦めな。
そういうことはもうちょっとオトナになってからね。精神的にも知識的にも。

【1 OSの種類 　 　 　 　 .】 WindowsXP
【2 Excelのバージョン 　 】 Excel 2003 SP2
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 わからん・・・
【5 検索キーワード 　 　 】 表示形式　ユーザー定義　切捨

セルに入力した計算式の結果をROUNDDOWNを使わずに
切捨てで表示したいと思っているのですが可能でしょうか？

イメージとしては表示形式のユーザー定義でできるのかと
思ったので上記の様にググりましたが不発でした
（ROUNDDOWNを使いたくない理由は関数コピペして
数字入力し直すのが面倒と感じた為です）

偉い人教えて下さい

>>690
ROUNDDOWN使わずにってことなら､ROUNDDOWN以外で切り捨て出来る関数はあるけど
関数を使いたくないってことなら､表示形式では四捨五入しか出来ないよ。

というかシートの構成をもうちょっと考え直せば氷解する問題だし。

>>690
計算式の結果を入力？
計算式を入力出来るのがエクセルじゃないの？

計算式を入力できて、ROUNDDOWN関数を入力するのが面倒という理屈が理解できない。
関数って計算式の一部だと思ってた。

商品区分、メーカー、商品名、価格からなるデータベースから
商品区分->メーカー->商品名の順にレコードを絞り、価格を割り出す方法を考えています。
条件がひとつならvlookupなどが使えそうなのですが、複数時に便利な関数などありますでしょうか？

>>694
データベース関数
フィルターメソッド
ピボットテーブル

いっそAccessに移るって手もあるけどな

レスありがうとございます。
>>691
>シートの構成を・・・
これは入力するセルとと(切捨の)結果表示のセルを別に設けるという事でしょうか？

>>692->>693
例として
=7666*0.3の結果（単純な解は2299.8）を2999と表示させたい場合
セルにダイレクトに=7666*0.3とするのはテンキーだけで入力できて
次の入力に行くのも楽ですが
=ROUNDDOWN(7666*0.3,0)とするにはテンキー以外の動作
（コピペしたり、カーソルを数字の所まで持っていったり）が入ってしまい
時間がかかると感じたのですが・・・
上手く説明できず申し訳ない

(　ﾟДﾟ)ﾎﾟｶｰﾝ

>>696
その7666とか0.3とかもセルに入れておけば済む話

これ､笑うところ？
7666だけ入力して､*0.3も切り捨ても別セルで計算しろよ
初心者は入力セルに値を返したいとか言い出すことがあるが馬鹿馬鹿しい

>>696=690
代数って知ってる？

=COUNTA(ADDRESS(8,1):ADDRESS(100,1))
みたいことを、やりたいのですが
全然うまくいきません。
替わりの式を教えてください。

RANGE()見たいなのは無いのですか？

なるべく早く教えてください

>>71
OFFSET
INDIRECT

>>685
WebTables = "15" にして見る　それ以外の回答は知らん

ありがとうございます。

だがしかし、
=COUNTA(OFFSET(ADDRESS(8,1),0,0,100,1))
でもエラーになり、ダメなのです。

a1にADDRESS(8,1)とし、
=COUNTA(OFFSET(INDIRECT(A1),0,0,100,1))
とすれば、エラーは出ないのですが、
結果はいつも1です。

頼みます。答えを教えてください。

昨日と同じ流れか。

>>706
あのさ､ヘルプくらい見ようよ
ちゃんと関数の使い方､引数の意味とか載ってるから

あのさ、一生懸命見てるけど、
俺の頭じゃ答えわかんない＆めんどくさいんだよ。
ズバッと答え教えろよ。
何でそうかは、後でこっちでじっくり考えるから。
冷やかしなら出てくるなよ。。

>>701
ヘンテコないんちき関数で書かれるより、
やりたいことを素直に書いてくれた方が何がしたいか分かるんだが。
指定したセルから100個連続で何か数えたい、ってことなのか？？

何かを得ようとする側が面倒がってたら､
何にも得られない回答者側はどうなるよ？

スイマセン。

そうなんです。
指定したセルから数セル（シートごとに範囲は違う）連続で
空白以外が入力されているセルの個数を
数えたいのが、非常にたくさんのシート分ありまして、
いちいち手で、=COUNTA(A8:A100)だの、=COUNTA(A8:A98)だのやっていたら
こりゃ終わらんわと思いまして。。addressとrowを使用して汎化使用と思い、
無い頭振り絞って考えてるんですけどうまくいかないのです。

>711
気持ちはわかるよ。
でも、今は、お前いいから、引っ込んで。。
お願い！！こっちはてんやわんやなの、

判りました！自力でできました。
もうここには来ようとも思いません。

じゃぁな、氏ね>>711

今までの情報で汎用化はきついな

よかった

馬鹿が消えてくれて。

｢自力で｣

じゃなくて

｢頂いたヒントから｣

解決したんでしょ
勘違いしないように

>>701
2ちゃんねるってのはこういう所ですよw
直近だと>>680が何故動くのか考えれば答えは簡単です。
(考えても判んなかったら消えろﾀﾞｧﾎ。)

すまんかった>>711他。

うぜえ

>717
>718

あのね、
714は、どっかのバカが俺を装ったものだから無視しといてね。
と思ったら、718の自演なのね。訳わかんないねー

でも、本当にこっちも出来ました。

ADRESSでいったんセルに書いといて
（誰かがちょちょっと書いていた）
INDIRECTで参照する。

スマートじゃないけどこれでいいや。
善意の人は、ありがとう！！（全部714か？）

2ちゃんねるってのはこういうところなんだけど
運がいいと、ツールとして使う分には、非常に便利だね。
（教えてくれようとする人に失礼だったらゴメンネ！）

馬鹿が帰ってきてがっかりだ

めでたしめでたし。

EXCELの複数のセルのコピペをしたいのですが、
相対参照を自動調整させずに、貼り付けしたいのですが、いい方法はないですか？

相対参照を含んだセルを貼り付けした場合、
自動的に、ずれた値が、貼り付けられてしまいます。
まったく同じ数式をコピーしたいのですが・・・

>>723
絶対参照すれば？

ちなみに
相対参照　A1
絶対参照　$A$1

ここのアドインの特殊貼り付けというので、できました。

McrTool Ver1.2
http://www7.plala.or.jp/hikita/sidea/program/vb/mcrtool_xl.html



調べてる最中、はてなの回答者が、あんまりでワロタ

人力検索はてな - エクセルについて教えて下さい。数式の入力されたセルをコピーして貼りつけると、その数式はエクセルが気を利かしてくれて（？）、行なり列なりをずらしたものが貼り付けら..
http://q.hatena.ne.jp/1154491093

いや、そうじゃないでしょ！って・・・

>>724
元のセルの数が多くて、書き換えるのが大変なんです

アドインなんか使わなくても､ワークシート分析モードで
メモ帳を仲介してコピペすれば参照がズレないし
F4キーを使えば､キャレット位置の参照方式を簡単に切り替えられる。

>>723
数式バーでコピーしてから貼り付けという方法もあるよ
複数のセルを同時にはできんけど

すべてのケースで使えるかどうかはわからんが、こんな方法もある。
数式のあるセル範囲をドラッグ＆ドロップで移動する場合は、
相対参照の示す先は変化しない。これを使って

(1)シートのコピーで同じシートを作る
(2)コピーしたシートの側で数式のあるセルを別の場所にD&Dで移動
　（セルの場所は変わるが数式は変化しない）
(3)元のシートにその部分だけコピペ

全く同じ値をペーストしたら、表示される計算結果も同じだよね？
なら、コピー先にコピー元をのセルを参照させても同じなんじゃ・・・？

■例
コピー元(B1)： =A1*100
コピー先(C1)： =B1

>723は、こう言いたいのでは？
「計算式は同じで参照セル番地が違うものが多数あり
　これをコピーのように簡単に処理する方法は無いか」

　無　い　！

コピー元の「=」を例えば　(´・ω・`)　に置換

ペースト先で逆に置換

>>732
それよく使う

面倒

起動はかなり早くなったね
うちのしょぼい環境でもデスクトップが表示されてから
ネットワークつながるまで30秒かからなくなった
しかしバックグラウンドでメモリ使用量がガッツリ増えているような気がするのは
気のせいだろうか・・・

【1 OSの種類 　 　 　 　 .】 Windows　ＸＰ
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 少し
【4 VBAでの回答の可否】 否
教えてください。
挿入したjpeg画像を動かさないようにするにはどうすればよいのでしょうか？
セルを引き伸ばししても動かないような設定はありますが…。
よろしくご教示お願いいたします。

>>736
マウスドラッグで動かせないようにしたいってことならシートの保護すればいいよ。
｢オブジェクトの編集｣にチェック入れなければ､移動は出来なくなる。
条件後出しで､｢シートの保護以外で｣とかは無しね。

【1 OSの種類 　 　 　 　 .】 Windows Xp
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否　　】 否
【5 検索キーワード 　 　 】 エクセル関数　lookup

小さな会社で部品実装をやってます
２種類（AとB）の製品に使用する部材と
それに対する部品構成をもらいました
それには支給数　使用数　残数（過不足）がデータとしてはいってます
共通してつかう部品　片方でしか使わない部品があるので
点数の多いAをマスタとして使用して
AのシートにBの使用数を持ってきたいんです。
（AとBはそれぞれ単体のブックです）
で、vlookup関数でAの部品名をBで検索して
その使用数を表示させたんですが検索の型を０にしたのに
似ている部品名を拾ってしまいました（ABとも昇順で並び替え済）

原因が分からないので、
if関数を使い、その中にlookupを入れて
Aの部品をBで探して同じモノがあれば、vlookupを使い　なければ
"0"を返すようにしたらまたエラー値#N/Aが出てしまいました

'=IF((LOOKUP(A１,【Bの表の列】=A１,vlookup関数,"0")

長文ごめんなさい
お願いします

最終的に何がしたいのか良くわからない
書いてある式っぽいものの括弧の数が合ってないし

>>738
目的がよくわからないので式の作り方だけ書いときますね。

=IF(ISERROR(VLOOKUPの式),0,VLOOKUPの式)

この場合0を""で囲う必要はありませんです。
また、検索の型を0にしてあるのならば昇順に並んでいる必要もありません。

>>738
"0"じゃなくて false でないの？

OS:XP
Ver:2000

A1のセルに=NORMSINV(RAND())と入力し、乱数を発生させているのですが、
マクロで何回もループさせると値が#NUMとなりエラーになってしまいます。
ループの数を減らすと大丈夫みたいです。
数式の検証をすると、
NORMSINV(-0.375879288089744)
などとなっており、変な数値とは思いません。
これはどうすれば出ないようになるのでしょうか。

>>741
0もFALSEも同じだよ。
0に""は不要だけどね。

>>742
引き数が0を超える値から1未満の値じゃないとだめなのでは

>>744
そういえば、そうですね。
どうしてRAND()が負の数を吐き出してるんでしょ？

いちいち
=ABS(RAND()
とやらないといけないのでしょうか？

これ以上コードを増やすと更に実行時間が長くなって一晩では終わらなくなってしまう・・・orz

[XL2003] Excel 2003 で RAND 関数の使用時に負の値が返される
http://support.microsoft.com/kb/834520/ja

ってのが有るけど、もしかして2000にもあるのか?

>>746
Windows updateでは引っかからなかった。
2000でもあるのか休み明けにM$に聞いてみます。

2000はOfficeUpdateじゃなきゃだめだべ?

【1 OSの種類 　 　 　 　 .】 Windows　ＸＰ
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 no
【4 VBAでの回答の可否】 否
関数についての質問です。
A列に時刻を記述しているとします。
A1に12:30:00、A2に12:35:00・・・12:45:00、12:50:00というふうに、5分間隔での入力です。
A列に12:30:00とあればB列にyes、そうでなければnoを返したいとき
=IF(A1="12:30:00","yes","no")と記述したのですがうまくいきません。
"12:30:00"のところへの入力方法が良くないと思うのですが、
どのように記述すればよいのでしょうか?
よろしくお願いいたします。

>>749
12:30:00の書式設定を標準に変更すると”0.520833333333333”と入力されてることが分かります。
=IF(A1="12:30:00","yes","no")の場合は、”0.5208･･･”="12:30:00"は偽となり、noが表示されることになります。

=IF(A1=TIME(12,30,0),"yes","no")に変更するとうまくいくと思います。

> これ以上コードを増やすと更に実行時間が長くなって一晩では終わらなくなってしまう・・・orz
まさかひとつずつセルに代入するなんて馬鹿なことあってないよね？

ありがとうございます。

ISERRERを勉強してみるです

>>750
うまくいきました。
ありがとうございました。

【1 OSの種類 　 　 　 　 .】 Windows XP
【2 Excelのバージョン 　 】 Excel2002

すいませんが、教えてください。
仕事で使ってて、エクセルファイルをメール添付で送った後にエラーが出て以降、
通常の手順である開きたいファイルをダブルクリックするというだけでは
そのファイルが開けなくなりました。

今の状況は、開きたいファイルをダブルクリックすると
まず「Microsoft Excel」と上の青いバーに表示されるだけで画面自体は灰色のままで
そこから「ファイル」→「開く」→「ファイルを開く」から該当するファイルを選択しなければ開けません。

どうすれば元に戻りますでしょうか？
お教えくださいませ。

>>754
ちょいスレ違いのような気がするが
Excelファイルを右クリック、
メニューの「プログラムから開く」でExcelを選択して
「この種類のファイルを開くときは・・・」にチェック
試してみてください

>>755
残念ながらその方法では、「〜（ファイル名）が見つかりません。名前を正しく入力したかどうかを
確認してからやり直してください。・・・」とエラーが出て
通常の手順では開けません。・・・

フォルダのメニューや右クリックから新規作成したファイルでもそうなりますか？

>>757
共にうまく開けません。・・・

起動時に直ちにワークシートが開くのはエクセルのプログラム及びショートカットを
開いたときだけです。・・・

詳しい方に教えていただくため、もう少し分かりやすく状況を説明すると、
通常、Excelを開くとワークシートとExcelのプログラムとがセットで出てきますね。
右上には×印が2つあって下の×がワークシートを閉じるための×で
上の×がExcelのプログラムを閉じるための×ですが、
下の×をクリックしてワークシートを閉じた状態で
起動されてしまうのが今の私のパソコンの状態です。

[ツール]-[オプション]-[全般]-[他のアプリケーションを無視する]のチェックはずす

>>737
レスありがとうございました。

>>760
ありがとうございます
直りました。

教えてください
ちょー初心者なので言葉とか間違ってるかもしれませんが
その辺は酌んでくださいませ

　　　　A1　　　　　　　　　B1　　　　　　　　　C1　　　　　　　　D1
‖たまご１２０円‖りんご１００円‖おかし２００円‖　　　　　　‖

A1〜C1のこの文字列から全角数字のみを取り出してさらにそれを合計したいのですが
その関数を教えてください

>>763
そういう関数は無いよ。だからやりたければ複数の関数を使ってそういう数式を組むしかない。
使用する関数は文字列操作関数と変換関数と数学関数だな。具体的に何をどう使うかはヘルプを見よう。

>>764
ありがとうございます
ひとつのセル内で複数の関数を使用することは可能ですか？
その場合単純にしたいことを並べればいいのでしょうか？
それとも何か特別な方法があるのでしょうか？

演算子を使って並べる場合と､入れ子にする場合がある。
関数には大抵引数があるが､関数の結果を別の関数の引数に使いたければ入れ子にする
関数の結果同士を繋げたり計算したりしたければ､目的にあった演算子で繋げる。
たったそれだけ。難しいことはない。

>たったそれだけ。難しいことはない。

>>767
どこが気になるの？

【1 OSの種類 　 　 　 　 .】 Windows　ＸＰ
【2 Excelのバージョン 　 】 Excel2002
【3 VBAが使えるか　 　 .】 勉強中
【4 VBAでの回答の可否】 可

abc001 y
abc002 n
def001 y
abc003 y
def002 y
def003 y
abc004 n
def004 y

上記のようなデータがあるとして、上記から「abcを含むデータ」という条件と
「yを含むデータ」という条件でそれぞれ抽出し、さらに抽出した条件の順番（この場合abcを含む→yを含む）に並べたいのですが、そのようなことは可能でしょうか?
整列後のデータは以下のとおりになります。

abc001 y
abc002 n
abc003 n
abc004 n
abc001 y
def001 y
abc003 y
def002 y
def003 y
def004 y
整列後のデータの4行目がabcを含むデータ、5行目以降がyを含むデータという感じです。
よろしくお願いします。

>>769
　　　A　　　B　C
1 [abc001][y][　]
ってデータなのか
　　　A　　　　 B
1 [abc001 y][　]
ってデータなのかわからんが､どっかの作業列に
=IF(LEFT(A1,3)="abc",A1,"")って感じで切り出した結果が条件に一致すれば
そのものを参照する数式を入れて､yの方も同じように結果を出して
最後に数式を値に書き換えて空白を詰めれば良い。

VBAでやるならForループ回して､同じように切り出した結果が条件と一致する場合(likeでもいいけど)に
出力行を一つずつ下にずらしながら出力していけばいい。


数式､VBAどちらでやるにしても､これで解らなかったら>>2･8に従って
書いた数式やコードを貼った上で再質問してね。

>>770
ありがとうございます、方針がなかなかわからなかったのですが、もう一回頑張ってみます。

お願いします。EXCEL2003です。
下のような数式が１セルに入力されていて

{1002626,1002605,1002613,1002621}

この数式を下のように４セルに分けたいのですが

1002626　　1002605　　1002613　　1002621

どうすれば良いのでしょうか？

>>772
数式ってことは､実際は
={1002626,1002605,1002613,1002621}
なわけだよね。それがA1に入力されているとしたら
A1:D1を選択して､F2 → Ctrl+Shift+Enter
で4セルに分けられる。

【1 OSの種類 　 　 　 　 .】 Windowsxp
【2 Excelのバージョン 　 】 Excel2003
【3 VBAが使えるか　 　 .】 ･いいえ
【4 VBAでの回答の可否】 可･
【5 検索キーワード 　 　 】 excel リスト

excelでVLOOKUP関数で　別ブックにつくったリストを参照しています。
それで、その別ブックは月ごとに前の月のシートをコピーして新しい
シートつくっています。　
VLOOKUP関数の引数なんですが、常に最新の月のシートのリストを参照
したいと思っています。
VLOOKUP関数の２番目の引数にシート名を変数で一括して変えられないかな？
とかも思ったのですがよくわかりません。ご教授願います。