■戻る■ 元のスレッド

2chライブラリー
Excel総合相談所 29

1名無しさん@そうだ選挙にいこう :04/12/13 16:19:31
Excelに関する質問は、ここで!

     /)_/)    ( ・質問する人は可能な限り具体的に書いてね。
    < ゚ _・゚> .。oO( ・Excelのバージョン、OSのバージョンも書くとレスが付きやすい。
  ノ) /   |    ( ・回答がなくてもキレないで。
  \(_,,,_,,,)   ( ・分かる人はできるだけ回答して下さいませ。

前スレ
http://pc5.2ch.net/test/read.cgi/bsoft/1099232633/

過去スレは>>2
FAQ(よくある質問と答え)は>>3-10くらい。


2過去ログ :04/12/13 16:20:31
http://pc.2ch.net/test/read.cgi/bsoft/986283001/
http://pc.2ch.net/bsoft/kako/1004/10044/1004432306.html
http://pc.2ch.net/bsoft/kako/1012/10124/1012439547.html
http://pc.2ch.net/bsoft/kako/1018/10180/1018055390.html
http://pc.2ch.net/bsoft/kako/1023/10238/1023811906.html
http://pc.2ch.net/bsoft/kako/1028/10287/1028725250.html
http://pc.2ch.net/bsoft/kako/1033/10339/1033983470.html
10 http://pc2.2ch.net/bsoft/kako/1042/10429/1042913355.html
11 http://pc2.2ch.net/bsoft/kako/1045/10459/1045997062.html
12 http://pc2.2ch.net/bsoft/kako/1050/10500/1050069432.html
13 http://pc2.2ch.net/bsoft/kako/1053/10530/1053069026.html
14 http://pc2.2ch.net/bsoft/kako/1055/10553/1055342774.html
15 http://pc2.2ch.net/bsoft/kako/1057/10577/1057720306.html
16 http://pc2.2ch.net/bsoft/kako/1060/10603/1060345528.html
17 http://pc2.2ch.net/bsoft/kako/1062/10622/1062260735.html
18 http://pc2.2ch.net/bsoft/kako/1067/10672/1067264540.html
22 http://pc5.2ch.net/test/read.cgi/bsoft/1078930810/ (html化待ち)
23 http://pc5.2ch.net/test/read.cgi/bsoft/1083074470/ (html化待ち)
24 http://pc5.2ch.net/test/read.cgi/bsoft/1085756069/ (html化待ち)
25 http://pc5.2ch.net/test/read.cgi/bsoft/1088690113/ (html化待ち)
26 http://pc5.2ch.net/test/read.cgi/bsoft/1091619391/ (html化待ち)
27 http://pc5.2ch.net/test/read.cgi/bsoft/1096068933/ (html化待ち)

9,19〜21はログ消えたっぽい


3FAQ: 列の表示について :04/12/13 16:21:41
Q.列名がA,B,C,D,Eではなく、1,2,3,4,5になってしまいました。
 アルファベットに戻すにはどうしたらいいですか?
A.ツールメニュー:「オプション」 -「全般」タグで
 『R1C1 参照形式を使用する(C)』のチェックを外せば直ります。

Q:列を256個(IV列)よりたくさん広げることはできませんか?
A:エクセルのシートは65536行×256列が仕様上の上限です。
 シートを分けるとか、行と列を入れ替えるとか、データの方をまとめるとか、
 列数を増やさない方向で工夫するしかありません。


4FAQ: 印刷プレビュー :04/12/13 16:22:05
Q:印刷プレビューではセル内に収まっていた文字が
 実際に印刷してみるとはみ出してしまうのですが、
 何とかなりませんか?
A:「印刷プレビューと印刷結果が一致しない」のは
 昔からのExcelの弱点で、どうにもなりません。
 セルの幅や高さに余裕を持たせるか、
 書式設定で「縮小して全体を表示する」にチェックを入れましょう。

5FAQ: マクロの”””削除””” :04/12/13 16:22:30
Q.マクロを削除したのに、ファイルを開くたびにセキュリティの確認が出ます。
A.モジュールの解放が必要。
 【モジュールの解放方法】Alt+F11→Ctrl+R→Module1を右クリック→解放


6FAQ: 計算したい。角度とか :04/12/13 16:23:10
Q.例えば、一つのセルに1803329と入力すると
 180度33分29秒と表示されるようにするには
 どうすればいいのでしょうか?
 ついでに計算もしたいです。
A.「1803329と入力すると180度33分29秒と表示される」
 というのと、計算できるというのを両立させるのは無理。
 書式を
 [h]:mm:ss や [h]"度"mm"分"ss"秒".00
 などにしておき、入力するときには
 180:33:29.99
 などとすれば、表示も計算もできる。

その他時間とか日付とかの計算について
 勤務時間を計算するには
http://support.microsoft.com/default.aspx?scid=%2Fdirectory%2Fworldwide%2Fja%2Fkblight%2Ft009%2F3%2F46.asp

 日数および日付の表示方法と計算方法 - 基本編
http://support.microsoft.com/default.aspx?scid=%2Fdirectory%2Fworldwide%2Fja%2Fkblight%2Ft009%2F3%2F45.asp

7FAQ: 合計から元の数を逆算 :04/12/13 16:23:36
Q:たくさんの数値のリストがあって、
 リスト中のいくつかの数の合計と思われる数値が与えられました。
 リスト中のどれとどれの合計か調べることはできますか?
A:ナップザック問題(knapsack problem)として知られている難問です。
 一般的には総当りで調べるしかありませんが。
 しかし、データに特徴がある場合(桁数が限られているなど)には、
 うまい方法があって、速く解けることもあります。
 下記のページを参照してみてください。
  ナップザック問題をExcelで解く
   http://www.geocities.co.jp/SiliconValley-Oakland/8139/

8FAQ: 条件によって表示を変更するには? :04/12/13 16:24:16
Q:セルの内容を判断して、表示を変えたい
A: IF関数を使います。
 =if(条件,条件が成立した場合,成立しなかった場合)

例1:基本
 セルA1が1の場合○、それ以外の場合×を表示
 =IF(A1=1,"○","×")

例2:if文の中にif文
 A1が、1の場合○、2の場合△、それ以外×。
 =IF(A1=1,"○",IF(A1=2,"△","×"))

例3:ANDやOR活用
 A1が、4〜6の場合は、普通と表示
 =IF(AND(A1>3,A1<7),"普通","少ないか多い")

例4:計算も出来る
 A1が10までなら、A1を10倍して表示、それ以外なら2を引く。
 =IF(A1<11,A1*10,A1-2)

詳しくはヘルプを参照しましょう。

9FAQ: グラフについて :04/12/13 16:24:39
Q1:データの空白部分があって、そこで折れ線が切れてしまいます。
  繋げたいのですが如何したらいいでしょうか?
A1:グラフを選択>ツール>オプション>グラフ>空白セルのプロット「補間してプロットする」にチェック

Q2:棒グラフに重ねて、折れ線グラフを表示するにはどうしたらいいのでしょうか?
A2:最初、すべてのデータを棒グラフで作成。
 次に、折れ線で表わしたいデータ系列のどこかを、グラフ上で右クリック
 サブメニュー>グラフの種類>折れ線>OK

Q3:ある系列だけ、縦軸を別にしたいです。
A3:その系列のどこかを、グラフ上で右クリック
 データ系列の書式設定>軸>使用する軸「第2軸」にチェック>OK

10FAQ: 入力した値が変わる? :04/12/13 16:25:00
Q.セルに入力した値が勝手に変わってしまうのですが
 入力したままの形で表示させるにはどうしたらいいですか?
A.数字でよくあるケース(先頭のゼロが消えてしまう、日付として解釈されてしまう)
 入力する時、先頭にアポストロフィ(')をつけるか、
 該当するセルで右クリック−「セルの書式設定」−「表示形式」で「文字列」を選択。
 文字列ではなく数値として扱いたいときは
 「セルの書式設定」−「表示形式」で「ユーザー定義」を選択し、工夫する。
A.文字でよくあるケース(i⇒I、teh⇒the、cna→can など)
 ツール→オートコレクト→入力中にオートコレクト
 の該当する箇所を削除。

11FAQ: 行列の入れ替え :04/12/13 16:35:54
Q.エクセルで作った表が横方向に多くなってきたので
 行と列を入れ替えたいのですが。

A.コピーして、適当なセルで右クリック。
 形式を選択して貼り付け→行列を入れ替える。

12FAQ追加: 参照するセルをセルの値で指定する :04/12/13 16:50:27
Q.A1に「5」とか「6」とか指定する値を変えたら
 B1の関数で「C5」とか「C6」とか参照先が変わるようにできませんか?
A.INDIRECT関数を使ってみましょう。
 詳しくはヘルプで「INDIRECT」を検索

新スレ建て乙。

13997 :04/12/13 16:50:55
前スレに書いた997です。

>999
thx!たすかりました。本当にありがとう。

14FAQ: ブラウザの変更 :04/12/13 16:52:02
Q.Excelでアドレスをクリックした時に開くブラウザをIEからSleipnirなどに変更したい。
A.スレ違いです。
 開きたいブラウザの設定画面でそのブラウザを通常使うブラウザに指定してください。

151 :04/12/13 16:59:44
前スレ847氏が連投規制に引っかかるので2つのFAQで1レスを
といってたのを連投規制に引っかかってから思い出したよ。
次スレ立てる人は気をつけて。

16名無しさん@そうだ選挙にいこう :04/12/13 17:33:02
スレたて乙!>1

前スレ>998、例をもっと細かく具体的に書いて。



17名無しさん@そうだ選挙にいこう :04/12/13 21:14:24
EXCELのシートなどのセルなどの枠に固定されない
任意の個所にマーク用の点を打ちたいのですが、噴出しなどで
いちいち枠を透明処置にしたりしなくてもマウスのワンクリックでおいたり
消したりできるような感じの使い方ができる(イメージとしてはペイントで点をつくるのににた感じ)
で点を打ったりできないでしょうか?

18名無しさん@そうだ選挙にいこう :04/12/13 21:52:26
図形が挿入できるメモ帳としてエクセルを使ってるんですが、
文字挿入がかなりやりずらくて困っています。
同じようにワードも試してみたんですが、段落を入れていけなければいけないので面倒で困っています。
何か段落を気にせずにメモが取れるような設定等ありませんか?


19名無しさん@そうだ選挙にいこう :04/12/13 22:00:32
>>18
ごめん、ワードで「段落を入れる」ってどんな作業のこと?

20名無しさん@そうだ選挙にいこう :04/12/13 22:10:24
>>19
キャンバスに見立てて好きな位置に文字を入れていきたいんですが
僕がやると、したの方に文字を入れるにはエンターキーで改行を
入れないとうまくいかないもので・・・

21名無しさん@そうだ選挙にいこう :04/12/13 22:49:28
>>20
俺はよくExcelにワード文書オブジェクト挿入して書くけどね。
枠と塗りつぶし消したた奴をあちこちにベタベタコピペで貼る。
マシンが早めなら結構快適に動くよ。

あと、Word2002なら、ツール-オプション-編集と日本語入力で
「クリックアンドタイプ編集を行う」ってのをチェックすれば、
ダブルクリックしたところから入力できるよ。
#Word97だとその設定見つからない…。

22名無しさん@そうだ選挙にいこう :04/12/13 23:45:58
>>21
「クリックアンドタイプ編集」はダブルクリックがちょっと面倒ですが、
凄く役に立つ機能ですね。教えてくれて本当にありがとうございます。

ところで”ワード文章オブジェクト”って”テキストボックスを挿入する”とは
違うんですよね?検索してもなかなか見つからないものでして。

23名無しさん@そうだ選挙にいこう :04/12/14 00:10:08
>>22
手段1:
メニュー「挿入」→「オブジェクト」で
「新規作成」→MicrosoftWord文書を選んでOK。

手段2:
ワードから何かをコピーして、
Excel上で右クリック→「形式を選択して貼り付け」→「MicrosoftWord文書オブジェクト」でOK。

出来た箱をダブルクリックしたり、引きずり回したり、
右クリック→「オブジェクトの書式設定」の中を弄って遊ぶべし。OLEって奴やね。

後はIntelliMouseとか使ってダブルクリックを何とか。

24名無しさん@そうだ選挙にいこう :04/12/14 00:21:51
>>23
何から何まで本当にありがとうございます。
これからいろいろ試してみます。

2523 :04/12/14 00:21:58
実は今までテキストボックスなるものを知らなかったわけだが…こっちの方が手軽でいいな(w

26名無しさん@そうだ選挙にいこう :04/12/14 00:34:12
こんばんは。
早速ですが「A」フォルダの中の「B」ブックの中の「Sheet1」に、
「あ」フォルダの中にあるかなりの数のブックのそれぞれの「Sheet1」にある情報を
順番に最終行にどんどんコピペしていくのですが繰り返しのマクロは何を使用すると良いのでしょうか?
お願いします。意味伝わりますでしょうか・・・


27名無しさん@そうだ選挙にいこう :04/12/14 00:46:27
教えてください。
COUNTIF関数で、一行とばして選択するってことは不可能なんでしょうか?
COUNTIFで範囲を選択するときに、Ctrlで一行とばしで選択すると
#VALUE!になるのですが・・・。

28名無しさん@そうだ選挙にいこう :04/12/14 11:25:47
↓のようなここからここまではなになにのような
線というか図を書く方法ってありますでしょうか?


―|

→ なになに




29名無しさん@そうだ選挙にいこう :04/12/14 12:44:31
>>26
マクロだったらFor文使用してコピペしていけば良いと思う。
Aフォルダにある、その色んなファイルを配列化してみればいいかと。

30名無しさん@そうだ選挙にいこう :04/12/14 15:39:14
うっかりパスワードを忘れてしまいました。
パスワードの変更は、ファイルを開かないことには出来ないのでしょうか。


31名無しさん@そうだ選挙にいこう :04/12/14 17:18:58
出来るけど
ここで書くと犯罪

32名無しさん@そうだ選挙にいこう :04/12/14 19:46:09
質問です。

Win2k、Excel2kの環境で、
C:\報告.xlsのセルA1に「○○月」と入力して、
A:\○○月報告.xlsという名前で保存する
というマクロはどんな書き方をすればよいのでしょうか。

33名無しさん@そうだ選挙にいこう :04/12/14 22:04:53
>>29さん
ありがとうございます。
ForNextでできました。助かりました。


34名無しさん@そうだ選挙にいこう :04/12/15 00:44:20
>>32
「名前を付けて保存」をマクロの記録で。

35名無しさん@そうだ選挙にいこう :04/12/15 00:45:13
テキストファイルインポートしてるんだけど
5−3とかが5月3日とかに勝手に変化しやがる。
バージョン2000です。
だれかヘルプお願いします。
こーいううざい機能デフォルトでONにするなよ、ムカツク!!

36名無しさん@そうだ選挙にいこう :04/12/15 00:53:11
必要な人が多いのにOFFにしろって^^;

37名無しさん@そうだ選挙にいこう :04/12/15 00:57:03
>>35
ヘルプ嫁

38名無しさん@そうだ選挙にいこう :04/12/15 01:42:11
こういうのを見ると素人が一緒に悩むスレも必要なんじゃないかと思う…
お互い不快な思いしなくて済むんじゃなかろうか。

とりあえず、テキストファイルのインポートウィザードで列のデータ形式を指定。

3938 :04/12/15 01:45:26
>お互い
って何か偉そうに聞こえるな。何というか、質問する側と答える側の両方が、ってことな。
駄レススマソ

40名無しさん@そうだ選挙にいこう :04/12/15 12:27:39
質問する態度っていうもんがあるとおもう・・・

41名無しさん@そうだ選挙にいこう :04/12/15 12:54:44
     /)_/)    ( ・質問する人は可能な限り具体的に書いてね。
    < ゚ _・゚> .。oO( ・Excelのバージョン、OSのバージョンも書くとレスが付きやすい。
この二つ守られてない質問には答えるべきじゃないとおもう
教えて君を増やすだけ・・・

42名無しさん@そうだ選挙にいこう :04/12/15 14:31:23
回答お願いします。OS→ウィンドウズXP バージョン2003

セルを指定時刻に点滅+メッセージボックスを出すについて。
時間をTimeValue("00:30:00")とかじゃなく、C4に表示された時間に点滅したり、メッセージボックスを
出したいのですが、どうしたら良いでしょうか?
下に、現時点で出来ているマクロ等諸条件を書きます。

43名無しさん@そうだ選挙にいこう :04/12/15 14:32:02
+メッセージボックス+
Sub Auto_Open()
Application.OnTime TimeValue("00:30:00"), "test"
End Sub
Sub test()
MsgBox "こんばんは"
End Sub


44名無しさん@そうだ選挙にいこう :04/12/15 14:32:29
+点滅+
Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
'↑モジュールの先頭に宣言
Sub MySC()
Application.OnTime TimeValue("22:55:00"), "点滅"
End Sub
Sub 点滅()
Dim i As Integer
With Range("A1:A3").Interior
For i = 1 To 20
If .ColorIndex <> 3 Then
.ColorIndex = 3
Else
.ColorIndex = xlColorIndexNone
End If
Sleep 500
Next i
End With
End Sub

上記二つのマクロの、時間の部分をどのように変更したら、C4に表示された時刻に実行できるのか教えてください。
ちなみに、C4には「B4に入力された時間+1時間する関数式=IF(B4>0,B4+TIME(1,0,0))」が入っていて、セルの表示形式は時刻です。
C4に入力された関数式に出てくる、B4には、「A4に数字が入力された時刻を表示する関数=IF(A4>0,NOW(),)」が入っています。
なので要するに、「C4に表示されてる時刻=A4に数字が入力された時刻の1時間後」です。
その時間にA4を点滅させたり、メッセージボックスを出したりしたいです。

お願い致します。

45名無しさん@そうだ選挙にいこう :04/12/15 14:32:52
>>35は無意味な荒らしみたいなもんだろ。
デフォルトでONとか書いてる時点で、
OFFにする方法ぐらいすぐ調べられるってこともわかってる。
不満を他人に聞いて欲しいだけで、解決法を知りたいわけじゃない。

46名無しさん@そうだ選挙にいこう :04/12/15 14:56:31
セルの頭に決まった語句をつける場合(数字ではない場合)の
セルの設定って言うのはどうしたらよいのでしょうか
教えてくださいエロい人

47名無しさん@そうだ選挙にいこう :04/12/15 18:10:22
>>46
表示形式で設定するのが簡単だよ
G/標準;-G/標準;0;"エロイ人"@
とすれば文字列のときだけ頭に"エロイ人"が付く

48名無しさん@そうだ選挙にいこう :04/12/15 19:21:42
OS XP Ver.2002
マクロでシートからシートに値のみコピーをしたいのですが、
画面の移り変わりが気になります。
Worksheets("Sheet1").Range("A1:D4").Copy _
destination:=Worksheets("Sheet2").Range("E5")
を使用すると、画面の切り替わりがなくなりますが
数式など全てがコピーされてしまいます。
切り替わりが無くコピーが出来る方法を教えて下さい。
よろしくお願いします。


49名無しさん@そうだ選挙にいこう :04/12/15 19:46:16
>>48
こーゆーのじゃダメ?

Application.ScreenUpdating = False

Sheets("Sheet1").Range("A1:D4").Copy

Sheets("Sheet2").Range("E5").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Sheets("Sheet1").Range("A1").Select

Application.ScreenUpdating = True


50名無しさん@そうだ選挙にいこう :04/12/15 19:46:26
ん? 代入するだけだろ

Sheets("Sheet2").Range("E5:H8").Value = Sheets("Sheet1").Range("A1:D4").Value


5148 :04/12/15 20:02:36
>>49
>>50
ありがとうございます。
参考にします。
また何かありましたらよろしくお願いします。


52名無しさん@そうだ選挙にいこう :04/12/15 20:26:03
教えてください。
ユーザーフォームに5つのテキストボックスと
2つのコンボボックスがあるのですが、
すべてに値が入力されたらボタンを表示したいのです。
コンボボックスは一番上が空白であとは数値がはいってます。
どれか空白に戻ったらまたボタンを非表示にしたいです。

よろしくおねがいします。

53名無しさん@そうだ選挙にいこう :04/12/15 20:45:44
値にカンマを含む文字列があるcsvファイルを
Inputで読み込もうとしても上手くいきません。
(カラムがずれてしまう。)

なにか良い方法ないでしょうか?

54名無しさん@そうだ選挙にいこう :04/12/15 22:58:59
教えってチャソですみません。
エクセルで作成した一つのデータを複数個一つの用紙に印刷できないでしょうか?

例えば「A」というデータがあるとして、それをエクセルのシート上に複数コピーして印刷せずに、一回で

          「A」「A」
          「A」「A」  ← 「A」
          「A」「A」

こんな感じにしたいのです。宜しくお願いします。

55名無しさん@そうだ選挙にいこう :04/12/15 23:23:56
例えば3の倍数の列だけを(A3 A6 A9 A12…)指定するのに、
いい方法があるのでしょうか?

どなかたご教授下さいm(_ _)m

56名無しさん@そうだ選挙にいこう :04/12/15 23:50:04
>>42-44
表示形式でC4セルが時:分:秒になってるなら

TimeValue(Range("C4").Text)

でいいんじゃないんですか?試してないけど。


57名無しさん@そうだ選挙にいこう :04/12/16 00:05:21
>>52
変数A〜Gに、各コントロールが空白で無いかどうかを入れておく
A = テキスト.Value<>""
   ・
   ・
   ・
G = コンボ.Value<>""

その後、A〜GのAndを取る。
(全て空白でないなら、A And B And ・・・ And Gの結果はTrueになる。)
そして、
ボタン.Visible = A And B And ・・・ And G
で表示・非表示を切り替える

以上の処理をサブルーチンにして、各コントロールのChangeイベントから呼び出す。

58名無しさん@そうだ選挙にいこう :04/12/16 01:16:06
>>55
関数使用して、
= 列 / 3 で答え出ますよね?
割る関数、列を求める関数を調べたらわかりますよね?

59名無しさん@そうだ選挙にいこう :04/12/16 01:21:59
普通に書き間違った
>>55
= 列 / 3 = 余り
で、割る関数ではなく
列数を3で割った余りがいくつになるか、という式で
どこを基準に3列ごとか決まりますよね?

60名無しさん@そうだ選挙にいこう :04/12/16 09:07:02
>>47
マーヴェラス
遅レスになりましたが助かりました
ありがとうございます

61名無しさん@そうだ選挙にいこう :04/12/16 17:52:06
>>55
指定してから何をしたいのかな?

62名無しさん@そうだ選挙にいこう :04/12/16 20:08:39
質問します

エクセルで給与計算しています。
そこで、18時以降時給10円UPさせるための計算をしたいのですが
いまいち分かりません。

関数を使えばいいのですか?
よければ、テンプレ教えてもらえませんか?

63名無しさん@そうだ選挙にいこう :04/12/16 20:49:01
まずはどういう表になってるのか教えてくれないと何とも・・・

いろいろやり方があるからなぁ
時給が何パターンかあるのなら、時間帯別の時給を別表に作ってHLOOKUPとかで拾ってくる手もあるけど
単に18時以降10円アップならIF関数だけで何とかなるんじゃないか?

64名無しさん@そうだ選挙にいこう :04/12/16 22:19:09
>>63

失礼しました
単に18時以降に10円upです。
そのときのIF関数はどのようなものになりますか


6552 :04/12/16 22:25:20
>>57
できました。ありがとうございました!

66sage :04/12/16 23:12:27
>64
ウワッ!!こいつチョコッと調べて考える事すら出来ねーんだ
こんな社会人がいるとは情けない、、、、

67名無しさん@そうだ選挙にいこう :04/12/16 23:21:19
>>64
表による

68名無しさん@そうだ選挙にいこう :04/12/16 23:25:37
>>64
時間見て18時以降か否かを見れば分かるやん


69名無しさん@そうだ選挙にいこう :04/12/16 23:37:21
>62
退社時刻が19:40だった場合はどういうふうに給与出すつもり?
18:00以降の分は1時間と40分分きっちり支払うのか、
30分で丸めるのか、また計算された給与の小数点以下は切り捨てるのか切り上げるのか。

つーか自分ではどこまでやってみたんですか?このスレに丸投げ?


70名無しさん@そうだ選挙にいこう :04/12/16 23:59:56
小さい会社なんですが、注文がはいったらエクセルに打ち込んで伝票や発送シールを印刷しています。
ですが過去の注文の履歴が取れないのが困るとかでアクセスに切り替えるとかなんとか担当者が言っています。
エクセルからそういう履歴をアクセスに流し込むとかって出来ないものなのですか?

今は印刷したらデータを捨てている???とからしいです。

なんか要領を得ないのですがよろしくお願いします。

71名無しさん@そうだ選挙にいこう :04/12/17 00:20:28
内定未だ0ですが>>62みたいな奴が給料計算してる会社にだけは
絶対に入りたくないと思う大学三年生です。


72名無しさん@そうだ選挙にいこう :04/12/17 00:25:12
>>70
「Excel Access 連携」とかでググればいくらでもヒント転がってる。

ちょっと好奇心で訊きたいんだけど、Accessに切り替える予定があるのに
なぜわざわざExcelからAccessに流し込もうとしてるんだ?
Excelを入力・印刷フォームに使ってAccessはただ履歴ためるだけに使うの?もったいねー…

73名無しさん@そうだ選挙にいこう :04/12/17 00:57:10
まぁまぁ皆モチツコウゼ

74名無しさん@そうだ選挙にいこう :04/12/17 01:04:58
質問させてもらってもよろしいでしょうか?

VLOOKUP関数で一致する値を検索させて表示してるんですが、
その隣のセルに、一致した値があったセル番地を併せて表示させたいんです。

それを可能にする関数とかはあるのでしょうか?


75名無しさん@そうだ選挙にいこう :04/12/17 01:05:52
質問お願いします。
エクセルのハイパーリンクについてです。

ハイパーリンクに指定した文の色を変更したいのですが、クリック前のリンクの色は
普通に対象の文を範囲する事で出来ますが、クリック後の色も変更したいです。

IEならインターネットオプションの「色」→[表示済み][未表示]で別々の色に変更できますが
エクセルでも同様に、表示済みと未表示で色を変更出来ないものでしょうか?

ググっても古いバージョンの情報しか見つけきれずお手上げ状態です…
ご存知の方、アドバイスを頂きたいです。よろしくお願いします。


76名無しさん@そうだ選挙にいこう :04/12/17 01:19:00
>>75
わかりそうだけど、俺の知識じゃわからんかった
スマソ

77名無しさん@そうだ選挙にいこう :04/12/17 01:54:24
>75
書式‐スタイルで「表示済みのハイパーリンク」を選択後、「変更」ボタンをクリック
あとは色を好きに変えればいい。

78名無しさん@そうだ選挙にいこう :04/12/17 02:36:04
>74
頭悪いやり方だけど、VLOOKUPで検索範囲につかう元シートの方に
CELLでアドレス書き出す列作って、それをVLOOKUPで検索するのはどうだろ。



79名無しさん@そうだ選挙にいこう :04/12/17 05:18:24
Private Sub Worksheet_BeforeDoubleClick
Private Sub Worksheet_BeforeRightClick
Private Sub Worksheet_SelectionChange
等のイベントでTargetの前に選択していたセルに移動する方法、またはそれを表す関数って無いですか?

例えばPrivate Sub Worksheet_SelectionChangeでIf Target = "A1" Thenで始まるVBAがあるとして
A2→A1と移動してきた場合はA2に対して、B1→A1と移動してきた場合はB1に対して操作を実行したいのですが、
「一つ前に選択していたセル」というのをどう表せばいいのかわからないのです。

OSはWindowsXP、Excelは2002です。どうかよろしくお願いします。

80名無しさん@そうだ選挙にいこう :04/12/17 05:55:59
セル自体をチェックボックスのようにすることはできますか?
クリックするとチェックが反転するような感じで。
チェックボックスを乗せるのも、リストもいまいちスマートじゃなくて困ってます。
バージョンはXPです。

8179 :04/12/17 06:47:48
>>80
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 If Target.Address = "$A$1" Then
  If Target.Value = "" Then
   Target = "チェック"
   Cancel = True
   Exit Sub
  End If
  If Target.Value = "チェック" Then
   Target.ClearContents
   Cancel = True
  End If
 End If
End Sub

こんな感じで、2行目で指定したセル(A1)をクリックすると"チェック"の部分で指定した文字が入ったり消えたりする。
但し連続してそのセルを2回クリックしてもトグルにはならない。(一度他のセルを選択してからじゃないとね)
このセルに指定した以外の文字が入ってる場合はチェック文字が入らないようにしたけど、
何かデータがあってもチェック文字を上書きしていいなら3行目を 「 If Target.Value <> "チェック" Then 」 とする。
チェックボックスなんかで使われてるチェックマークが使いたければWingdingsフォントに入ってるから書式で設定して。
(このチェックマークをVBAで入力する方法が解る人居たら>>80に教えてやってくれ。VBEにコピペだと ? になってしまうので。)

82名無しさん@そうだ選挙にいこう :04/12/17 07:23:53
>>81
おぉぉ、動きましたー!感動〜!
フォントは?なりますね…。ちょと調べてみます。「x」でもいいし。
こんな時間にありがとうございました〜〜(^-^)


83名無しさん@そうだ選挙にいこう :04/12/17 07:57:55
そのフォントのチェックマークはセルにa(小文字で)を入力。

84名無しさん@そうだ選挙にいこう :04/12/17 08:08:39
>>83
なるほど!できました。セルのフォントをWebdingsにして、aを書いてやるとできました。
ありがとうございます!!

85名無しさん@そうだ選挙にいこう :04/12/17 12:22:21
チェックなしの□ ChrW(9744)
チェック入りの□ ChrW(9745)

8675 :04/12/17 15:55:42
>76>77
むぉおお出来た―!ありがとうございます!感謝!!
助かったー

87名無しさん@そうだ選挙にいこう :04/12/17 18:42:19
  A    B    C    D
1 項目  数量  単価  金額
2
3
4
5
6
7 消費税     5%
8    合   計

D2,=IF(A2="値引き",-C2,B2*C2) 'D3〜D6略
D7,=SUM(D2:D6)*0.05 D8,=SUM(D2:D7)

このような表があるとします。
2〜6行のいずれかに、A,値引き C,100と入力すると、
D7,-5 D8,-105となってしまいます。
(この計算式なら当然なんですが)
この表のまま、合計から値引き分を引いた金額が、
D8に表示されるようにする方法はありますか?
環境は、Windows 2000,Office XP です。
よろしくお願いします。


88名無しさん@そうだ選挙にいこう :04/12/17 19:40:10
>>87
D8のセルに
=SUMIF(D2:D6,">0")
じゃいけないのか?
質問の意味がよく理解できなかったから、勘違いしてっかも

89名無しさん@そうだ選挙にいこう :04/12/17 19:40:23
質問よろしくお願いします

エクセルのデータを開いたら、ツールバーのところに
Eメールの入力フォームみたいなのもが一緒に表示されるのですが
これはどうやって消去できるのでしょうか?

officeの2002をxp homeで使用しております。
どうかお助けを

90名無しさん@そうだ選挙にいこう :04/12/17 19:46:03
>>89
印刷アイコンの左の電子メールアイコンを押せ!


9189 :04/12/17 19:53:23
うぎゃー!直った!>>90さんありがとうございます(^.^)

9270 :04/12/17 20:46:35
>>72
> >>70
> ちょっと好奇心で訊きたいんだけど、Accessに切り替える予定があるのに
> なぜわざわざExcelからAccessに流し込もうとしてるんだ?
> Excelを入力・印刷フォームに使ってAccessはただ履歴ためるだけに使うの?もったいねー…

レスありがとうございます。
もったいないということは、アクセスだけで伝票なんかを印刷することも出来るわけですね。こちらは全く分からないもので…。
ちょっとエクセルの画面をみたらシール印刷とかボタンを作ってあって、おそらく操作している人がそれに慣れてると思ったんです。で慣れている手順で会社がほしがっている履歴がたまっていけば、いい感じかなと思ったわけです。

アクセスでは今やっている業務(自分も分かってないのですが、注文とって伝票、発送シールを印刷する。だけ???)は出来る上に履歴を取れるってことなんですね。

MSオフィスはまっっったくわからないので、やっておけばよかったと思うこの頃です。

アクセスを導入する際に大変なことは、仕組みの設計とか画面の設計とかなんでしょうか?明日アクセスの本を買ってくる予定ですが、導入時に何が大変なのか、どう乗り越えればいいのか軽く語っていただけませんか。先ずはその雰囲気だけでも感じ取りたいので。

よろしくお願いいたします。

93名無しさん@そうだ選挙にいこう :04/12/17 22:01:30
質問です
内容が重複するセルがないかチェックするにはどうしたらいいんでしょうか?

94名無しさん@そうだ選挙にいこう :04/12/17 22:03:23
グラフのX軸の数値と間隔がどうしても合わないのです。
具体的に言えば「309 299 269 259 244 219 199 189 179」って感じで間隔がバラバラなときでも
等間隔の目盛りに一つずつの数値が割り当てられて不正確なグラフになってしまいます。
これをどうにか目盛りは「150 200 250 300」って感じで、それぞれ正確な位置へプロットするようにできませんか。

とりあえず今はGnuplotを使ってるのですが……

95名無しさん@そうだ選挙にいこう :04/12/17 22:53:44
前スレで時刻の表示UserFormにリアルタイムに時刻を表示する
といった様な質問があったような気がしますが、どの様にやるのか
例文をもう1度、教えて下さい。
XP、2002

96名無しさん@そうだ選挙にいこう :04/12/17 23:04:25
>>93
ぐぐれば見つかるよ
検索結果では解決できなかったらもう一度詳細を。

>>94
折れ線なのか縦棒グラフなのか横棒グラフなのかそこらへんを。

>>95
レス番とか具体的な内容がわかればコピペするけど?どうする?

97名無しさん@そうだ選挙にいこう :04/12/17 23:49:52
>>95
前スレでの質問者です。

以下、標準Module
Public ScheduleTime

Sub NowTime()
ScheduleTime = Now() + TimeValue("00:00:01")
UserForm1.LabelNowTime.Caption = ScheduleTime
Application.OnTime ScheduleTime, "NowTime"
End Sub

Sub NowTime_Stop()
Application.OnTime ScheduleTime, "NowTime", Schedule:=False
End Sub

以下UserFormのコードへ
Private Sub UserForm_Initialize()
Call NowTime
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Call NowTime_Stop
End Sub




98名無しさん@そうだ選挙にいこう :04/12/17 23:53:28
>>95
この回答と同時に教えていただいたのが
StatusBarコントロールを使用する方法です。
コードを書かなくっていいので、個人的には
こちらの方がしっくり用途に合っておりました〜!

がんばってくださいね!!


9995 :04/12/18 00:03:24
>>97
親切に、コピペしていただきありがとうございます。



100名無しさん@そうだ選挙にいこう :04/12/18 00:59:34
エクセルのグラフ作成で教えてください。
ある計算式を用いて割合を%で出しました。
その割合を円グラフで表したのですが、同時に出来た凡例の名称が
1,2,3,4,5となっていたので変えたいのですが変えることができませんでした。
凡例って任意の言葉に変えることは出来ないのですか?
エクセル2000+WIN2000です。
宜しくお願いします

10194 :04/12/18 01:24:14
>>96
折れ線です

102名無しさん@そうだ選挙にいこう :04/12/18 01:54:12
>>84
次の様にすると、いい感じになるかも。

まず、オートシェイプの直線を1本ひく。その直線の名前を HideLine に変える。
そして、オートシェイプの書式設定で直線の色を線なしにする。
あとは、SelectionChangeイベントのコードを下の様に変えると、
別セルを選択しなくてもその場のクリックでチェックのOn/Offが出来ます。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 If Target.Cells.Count > 1 Then Exit Sub
 If Target.Font.Name <> "Webdings" Then Exit Sub
 Target.Value = IIf(Target.Value = "", "a", "")
 Target.Offset(0, 1).Activate
 [HideLine].Select
End Sub

直線の名前は HideLine じゃなくても、 コードの最後を
[直線に付けた名前].Select にすればいいだけですけど。

って、もう見てないかな。

103名無しさん@そうだ選挙にいこう :04/12/18 08:46:26
>>100
グラフを作成する際に、数値以外に「数値のラベル」にあたる
セルも選んであげると表示されます。

たとえば以下の表であれば、

  1月 2月 3月 合計 比率
A 10 20 30  60  26%
B 30 40 50  90  39%
C 40 30 20  80  34%
計 80 90 80 230 

一番下の「計」をグラフにしたければ、1月〜3月を、
比率の%をグラフにする今回の円グラフの場合は、
A〜Cの部分を選択します。


104名無しさん@そうだ選挙にいこう :04/12/18 09:03:04
>>101
グラフにしたい数値が、以下の数値ということですよね?
309 299 269 259 244 219 199 189 179

作成したグラフのX軸(項目軸)にはなにが書いてあって
Y軸(数値軸)にはなんて書いてありますか?


105名無しさん@そうだ選挙にいこう :04/12/18 10:57:37
ActiveなBookに「Sheet1」「Sheet2」「Sheet3」があるかどうか判断するマクロは
どう書けばいいでしょう?
>26氏と同じようなことをしたいのですが、当方では「あ」フォルダの中に
いらんファイルがいっぱい入ってるんで、開いたフォルダに上記3シートがない場合は閉じて
次のファイルを開きたいのです。
フォルダの中のファイルを次々開いてはコピーして閉じる、というマクロまでは
できてるんですが特定の複数のシートがあるかどうかを判断するのが
わからなくて困ってます。どなたかご教示いただけないでしょうか。

106名無しさん@そうだ選挙にいこう :04/12/18 11:34:30
>>94
散布図で。

107名無しさん@そうだ選挙にいこう :04/12/18 12:19:55
>>105
開いたブックに、その3つのシートのうち2つのシート(例えば「Sheet1」と「Sheet3」)
しかなかったら、そのブックは無視するんですか?

108名無しさん@そうだ選挙にいこう :04/12/18 13:28:19
>>106
おお、有り難う。
これでデータまとめるのもはかどります

109名無しさん@そうだ選挙にいこう :04/12/18 15:18:58
>>107
そうです。3つ全部なければ無視して閉じ、次のブックを開く処理に移ります。

110名無しさん@そうだ選挙にいこう :04/12/18 16:19:29
>>109
関数にしてみたけど、こんな感じでどうでしょうか。

Function SheetExists(ParamArray SheetName()) As Boolean
  On Error GoTo SheetChkErr
  Sheets(SheetName).Select
  SheetExists = True
  Exit Function
SheetChkErr:
  On Error GoTo 0
  SheetExists = False
End Function

Sub 使い方()
 If SheetExists("Sheet1", "Sheet2", "Sheet3") Then
  MsgBox "シートは全てあります。"
 Else
  MsgBox "存在しないシートがあります。"
 End If
End Sub


11187 :04/12/18 16:54:15
>>88さん、ありがとうございます。
試して見ましたが、D8のセルに =SUMIF(D2:D6,">0")ですと、
D7,-5 D8,0 となります。
この数式を使うと、負の単位データが無視されるようですね。
これをヒントに、D7セルに、=SUMIF(D2:D6,">0")*0.05
と入力したところ、ばっちり思った通りの表が出来ました。
改めて、ありがとうございました。


112名無しさん@そうだ選挙にいこう :04/12/18 17:01:33
>>110
関数ですか。わざわざありがとうございます。
早速試してみます。

113名無しさん@そうだ選挙にいこう :04/12/18 18:16:40
関数って普通は

function myfunc(byval a as double) as double
end function

とかやりますけど、引数と関数出力をともに配列にすることは
できますか?

function myfunc(byval a(10) as double) (10) as double
とかやってもだめでした。。。

114名無しさん@そうだ選挙にいこう :04/12/18 20:42:17
>>113
引数・戻り値ともにVariant型にします。
簡単な例なんで、エラー処理は考えてませんが。

Function myfunc(ByVal a As Variant) As Variant
Dim i As Long, TempArray(10) As Double
 For i = 0 To 10
  TempArray(i) = a(i) * 0.5
 Next
 myfunc = TempArray
End Function

Sub 使い方()
Dim i As Long, TestArray(10) As Double
Dim ResultArray As Variant, MsgStr As String

 MsgStr = "引数の配列の中身" & vbCrLf
 For i = 0 To 10
  TestArray(i) = i
  MsgStr = MsgStr & i & " : " & TestArray(i) & vbCrLf
 Next
 MsgBox MsgStr
 
 ResultArray = myfunc(TestArray)
 MsgStr = "戻り値の配列の中身(0.5倍された値)" & vbCrLf
 For i = 0 To 10
  MsgStr = MsgStr & i & " : " & ResultArray(i) & vbCrLf
 Next
 MsgBox MsgStr
End Sub

115名無しさん@そうだ選挙にいこう :04/12/18 21:43:41
UserFormを表示したまま、Sheetのセルに入力する方法って
ありますか?またUserFormをタスクバーに入れるか、最小化
する事が出来るのでしょうか?
別のBooKを使用したい場合があります。
どなたかご存知であれば、教えて下さい。お願いします。


116名無しさん@そうだ選挙にいこう :04/12/18 22:08:57
>>115
UserformのプロパティでShowModalをFalseに

117名無しさん@そうだ選挙にいこう :04/12/18 22:20:41
>>115
>>116さんに補足すると、Excel97では無理。

118115 :04/12/18 22:56:00
>>116さん
>>117さん
ありかとうございます。
みなさん色々ご存知ですね!
どの様な感じで色々なことを覚えていくのですか?
私は、これまでイルカに聞いてきましたが、そろそろ
限界に来ているみたいです。
良い参考書みたいな物があるのでしょうか?
また何かありましたら、よろしくお願いします。

119117 :04/12/18 23:19:02
>>118
このスレ見てるだけでも勉強になるかも。
「こんなやり方があったのか!」とかよくあるし。

>>115の質問も既出だったりします。そんなにしょっちゅう出る質問でもないけど。

イルカに聞くよりググったほうがいろんなコードが見れていいかもですね。

120名無しさん@そうだ選挙にいこう :04/12/18 23:45:28
ググれで答えんじゃねえよハナクソ
答えられなきゃ出しゃばんな能無し

121名無しさん@そうだ選挙にいこう :04/12/19 00:43:38
0(A、A')、0.001(B、B')、0.01(C、C')、0.1(D、D') 、1(E、E')
このような分布から
散布図とって検量線引きたいんですが
変なところをグラフが通りどうしてもうまく行きません

対数メモリにしても0があるためうまく行かずに
かすらないようなグラフが出ます
どうしたらいいですか


122名無しさん@そうだ選挙にいこう :04/12/19 00:49:53
>>120
ぐぐらないと行けない理由もぐぐれば分かるから
自分で調べてからおいで

123名無しさん@そうだ選挙にいこう :04/12/19 00:52:21
>>120
読解力ないな

124名無しさん@そうだ選挙にいこう :04/12/19 00:54:55
>>120
下らない質問するほうが悪いでしょ

125100 :04/12/19 01:28:51
>>103
ありがとうございます。
実は社内で年齢層の割合を出したのですが、選択方式(1、20代、2、30代・・・)で
集計をしてしまったのです。
集計結果には

  人数    割合
1. 30      30%
2. 40      40%
3. 30      30%
となっているので円グラフにすると凡例が1,2,3となってしまいます。
この凡例の1,2,3を20代、30代、40代に変える方法を教えて欲しいのです。



126名無しさん@そうだ選挙にいこう :04/12/19 01:47:01
>>125
項目軸ラベルを設定する

20代 30代 40代 と書いた列を作成
グラフをクリックしメニューから
グラフ→元のデータ→系列
で作成したものを設定する

127名無しさん@そうだ選挙にいこう :04/12/19 02:25:58
>>114
ありがとうございました。うまくできました。
追加で申し訳ないんですけど、定数を宣言するとき配列で
宣言可能ですか???
気持ち的には
const a(10) as long = array(0,1,2,3,4,5,6,7,8,9,10)
みたいなかんじで…。

128名無しさん@そうだ選挙にいこう :04/12/19 10:43:24
>>127
不可能です。

129名無しさん@そうだ選挙にいこう :04/12/19 11:46:58
>>79
なんか無理矢理ですが。
セルを移動すると、移動前のセルの背景色を赤くしてます。

'以下標準モジュールに記述
Public 移動前のセルアドレス As String
Public 移動後のセルアドレス As String

Sub Auto_open()
 移動前のセルアドレス = ActiveCell.Address
 移動後のセルアドレス = ActiveCell.Address
End Sub

'以下をシートモジュールに記述
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 移動前のセルアドレス = 移動後のセルアドレス
 移動後のセルアドレス = Target.Address
 Range(移動前のセルアドレス).Interior.ColorIndex = 3
End Sub

130名無しさん@そうだ選挙にいこう :04/12/19 12:26:45
VER:Excel2003 , OS:XP

【問】 
x(n)=COS(2πfnT)のDFTを求めよ。但し、F=1000HZ,サンプリング周波数(=1/T)=10000,N=8とする。 
【公式】 

     N-1  j2πn(fT-k/n)      -j2πn(fT-k/n) 
1/2   (e            +e                     ) 
     n=0 

公式が見難くてすみません。 
EXCELにて離散フーリエ変換を行えると耳にしましたがセルに入力する式が想像すらつきません。
(;つД`) 
お分かりの方がいましたら、ご教授下さい。

131名無しさん@そうだ選挙にいこう :04/12/19 12:48:39
>>130
分析ツールの中に、フーリエ解析分析ツールというのがある。
しかしそれを使う前に、公式の意味を理解しておいた方がいいんじゃないの?
8点なら手計算でもできるし、データとsinとcosの3列を作って掛けて足すだけでしょ。

132130 :04/12/19 13:10:34
はい、フーリエ懐石分析ツールを見つけました。
そして式を作ってみたのですが式自体を理解していないというか・・・
下に作ったファイルをあげて置きましたので見ていただき間違いを正していただければ幸いです。
ttp://nullpo.mydns.jp/up/updir/1295.zip

131氏の言うとおりに公式の意味を理解しておくのがベストなのでしょうが、
全く分からないわけで…(;つД`) 
お時間に余裕がありましたら式の意味も簡単にでも結構なので教えていただきたいです…

133名無しさん@そうだ選挙にいこう :04/12/19 18:30:51
>>132
式の説明はできるが…
理系の場合、高校でさわりを、大学入ったら必ずみっちりやると思うけど。
そもそも君はどういう目的でフーリエ変換をしたいのか。
問題を出されたというのは、内容を理解しなさいという意味なんじゃない?

134名無しさん@そうだ選挙にいこう :04/12/19 18:44:46
>>132
パスはなに?

135132 :04/12/19 20:25:08
>>133
高校が文系で何を血迷ったか大学で理系を選択したんです。
>>問題を出されたというのは、内容を理解しなさいという意味なんじゃない? 
それは同意なんですが内容自体が分からない講義(教科名:信号処理)というか…
逃げる理由を作っているわけではないのですが原理とか全く分からないんです…

>>134
パスワードがかかってたようで、すみません。上げ直しました。
ttp://nullpo.mydns.jp/up/updir/1301.zip
です。内容は変えてません。すみませんでした。

136名無しさん@そうだ選挙にいこう :04/12/19 20:57:07
2つ教えてください。
1、A1:A100をグラフの表示範囲にしているときにA101:200をグラフの表示範囲に
自動的に追加する方法はないでしょうか?
最初からグラフの範囲に入れているとグラフが縮小して表示されるのでやりたくありません。

2、グラフで2軸を用いて片方の軸はX軸1点に対して複数の点をプロットできる
グラフを表示する方法はないでしょうか?
2軸折れ線グラフだとどうしてもそれぞれ1点しかプロットできないので困ってます。

137100 :04/12/19 21:31:56
>>126
ありがとうございます。
項目軸ラベルを設定してみます。

138名無しさん@そうだ選挙にいこう :04/12/19 23:59:41
ttp://www1.ourtokushima.net/hoken/jidoukatei/kosodatehiroba/syousika/syousika.html

このように、棒グラフと折れ線グラフを混ぜたいのですがどうやればいいのでしょう?

139名無しさん@そうだ選挙にいこう :04/12/20 03:26:33
2系列(以上)のグラフを棒グラフで作って、
折れ線にしたい系列を右クリック、グラフの種類で、折れ線グラフを指定。

140名無しさん@そうだ選挙にいこう :04/12/20 11:06:15
すいません、ちょっと質問させてください。

エクセルで3つのセルにそれぞれ[会社名][部署名][所属課]を文字列値として持たせています。
これら3つのデータを別のセルに(式:=C5&" "&D5&" "&E5)で表示するよう数式を持たしてるんですが、
それぞれ3つのデータ繋げた新たなデータとして、どこかのセルに「値」として持たす方法はあるんでしょうか?
いまのところ、各セル値の内容をいちいちコピー&追加ペーストしています。
出来れば今、数式をいれているセルに(C5&" "&D5&" "&E5 で出来た一つの値を F5 にいれる)ようななんらかの指定をいれて
一括して行いたいと考えてます。

どなたか、お願いします。


141名無しさん@そうだ選挙にいこう :04/12/20 13:32:27
■質問よろしいでしょうか?


A1 に 12.345678 という数値がセルに入っているのですが
これを 12.3 と少数点第一位までの表示にしたくて、別のセル (B1) に
=(A1/1000000))と関数を入れました。

これで B1 が 12.3 になったので、不要な A1 を消そうとすると、B1も消えてしまいます。
(B1がA1を参照しているので当然なのですが)

そこで B1 の書式設定を 文字列にすればいいのかと思い、やってみたら
また B1 が 12.345678 に戻ってしまいます。

不要な A1 の データを消した上で、 B1 のデータを 12.3 のままにするにはどうしたらいいのでしょうか?

142名無しさん@そうだ選挙にいこう :04/12/20 14:52:27
>>140-141
変換したいセルを全て選択して、コピーして編集メニューから「形式を選択して貼り付け」
「値」選んでOKをクリック

143名無しさん@そうだ選挙にいこう :04/12/20 14:55:19
>>142
なる…
んな手があったか…

てっきり特殊な計算が必要かと思いまつた(^^;
有難うございます。

144 :04/12/20 14:55:43
>>140です

145名無しさん@そうだ選挙にいこう :04/12/20 15:57:41
>141
A1の書式を「セルの書式設定」で「 0.0 」に設定する手もある。
ちなみに桁数を処理する代表的な関数は
・切り捨て:ROUNDDOWN
・四捨五入:ROUND
・切り上げ:ROUNDUP

146名無しさん@そうだ選挙にいこう :04/12/20 16:14:06
どうしてデフォで値の貼り付けアイコンが無いか
不思議なぐらいよく使います。
ユーザー設定で、ツールバーに置いておくのが吉。

147名無しさん@そうだ選挙にいこう :04/12/20 16:36:05
皆様のPCでOfficeXPでエクセルを起動して試して欲しいのですが

エクセル起動→適当にセルに何か書く→そのままスタートから電源を切るを選ぶ。
するとエクセルが変更を保存しますか?って聞いてくる。
そのまま一分ほど放置→プログラムの終了エラー発生。

他のマシンでも同じ現象が発生しました。
これを回避する方法をさがしています。

OSのバージョン:Windows XP-SP2(SP1でも発生する)
エクセルのバージョン:Office XP @Execl2002 (10.6501.6626)SP3

148名無しさん@そうだ選挙にいこう :04/12/20 16:48:01

!!!とてつもない バカ発見!!!

149名無しさん@そうだ選挙にいこう :04/12/20 17:04:21
俺もみんなに試して欲しいんだが、
エクセルを起動したまま電源を抜くと
保存しますかって聞いてこないんだ。

150名無しさん@そうだ選挙にいこう :04/12/20 17:11:20

http://ringoriri.fc2web.com/22/fir/ 最近、この子に萌え。


     まじヤバイ・・

                リリカぁ、俺とも頼む・・・



151147 :04/12/20 17:23:34
馬鹿にされるのは構わない。

実は目の見えない人がPCで音声ソフトだけ頼りにエクセルを使ってるんだよ。
それで間違えて保存し忘れて終了して電源切るとかやってしまうらしい。
しかし上に書いたようにエラーが出る。

保存のダイアログが出てるのにエラーがでてしまうと
音声ソフトまで異常を起こしてしまって音声が止まってしまう。
すると手も足もでなくなる。

それでエラーが出なくなる方法を探してるのだが。
無理なのかなぁ・・・

152名無しさん@そうだ選挙にいこう :04/12/20 18:03:44
>147
状況も聞かずにバカにしてゴメン
Windowsのキー操作をカスタマできれば誤操作は減らせそうだけど
具体的には分らないな。重ねてゴメンネ


153名無しさん@そうだ選挙にいこう :04/12/20 18:21:30
OSが電源を切ろうとしてEXCELに終了するように命令を送ったけど
返事が無かったのでエラーになった、といった感じだと思います。
エラーを出なくするというのは、「セーブせずに強制終了」
「電源を切るの取りやめ」色々ありますがどれでしょう?
いずれにしても、スタートメニューではなく
ttp://www.vector.co.jp/vpack/filearea/winnt/util/restart/index.html
このようなWindows終了ソフトを使えば解決するかもしれません。

(本当はOSの設定で何とかなるのかもしれませんがよく知りません。)

154147 :04/12/20 18:26:33
ほかのPCでもエラーになるのかな?

まあ最悪エクセルのバージョンを2000とかに下げれば回避出来る
ので...それが一番いいかなとか思ってますが

155名無しさん@そうだ選挙にいこう :04/12/20 18:31:26
別に目が見えようが、不自由だろうが
保存し忘れて電源切れば同じことでわ?
つか、先に書けよ。スレ違いだ。

156名無しさん@そうだ選挙にいこう :04/12/20 18:44:35
>>154
Excelだけでなるの?
音声ソフトが入って無くても同じ結果なの?

157147 :04/12/20 18:51:58
最初音声読み上げソフトのいたずらかと思ったのですが
入れてない漏れのノートPCでも発生しますた。


158名無しさん@そうだ選挙にいこう :04/12/20 20:35:26
エクセルでファイルを開くときに自動的にマクロを実行する方法はないでしょうか?
グラフを更新するマクロを書いているのですが、ファイルを開いたときに自動的に
グラフを更新したいのです。

159名無しさん@そうだ選挙にいこう :04/12/20 20:45:23
>>158
Sub Auto_Open()
'やりたいこと
End Sub

160名無しさん@そうだ選挙にいこう :04/12/20 23:38:10
OS XP Ver.2002

ワークシートを、座標軸に見立てたとします。
X軸とY軸の交差する位置(セル)に入力された値を返す関数が知りたいのです。

具体的には、200行&100列程度のデータの行、列、それぞれの検索値で検索させて
交差するセルに入力されている値を返す関数を作成したいです。







161名無しさん@そうだ選挙にいこう :04/12/20 23:43:34
>>159
レスありがとう。
それでやろうとしても、マクロを有効にするかどうかの画面がまず出てしまいます。

162名無しさん@そうだ選挙にいこう :04/12/21 00:34:35
>>160
INDEX

?


163名無しさん@そうだ選挙にいこう :04/12/21 00:35:45
>>161
当然です。
マクロのセキュリティレベルを最低にしたらどうですか?

164名無しさん@そうだ選挙にいこう :04/12/21 00:58:37
>>163
Thanks!

165名無しさん@そうだ選挙にいこう :04/12/21 02:48:54
デジタル署名

166名無しさん@そうだ選挙にいこう :04/12/21 05:31:53
Windows XP Professional SP1, Excel 2000

以上の環境で以下の事をやりたいのですが宜しくお願いします。

A:csvファイル(メールアドレス)
B:xltファイル(メールアドレス)

AとBの2つがあり、各々を比べてAの中にBと同じ
メールアドレスがあればAから削除をしたいのですが・・・。
こういう場合は、どういった方法で行うと良いですか?

167名無しさん@そうだ選挙にいこう :04/12/21 07:23:26
>>162

レスありがとうございます。

INDEX関数とMATCH関数をネストさせると
よいみたいです。
ヒントをありがとうございました。



168名無しさん@そうだ選挙にいこう :04/12/21 08:30:41
質問させて下さい。
セルのデータの入力規制をリストとし、シート全体をドロップダウンリストから入力する形式にした時に、
A列の1を選ぶと、B列ではこの範囲しかリストに表れないという絞込み表示をする、ということはどうしたら出来ますか?
例えば生徒を入力する時に、A列-学年リスト、B列-クラス番号リスト、C列-生徒名簿リストとした時に、
A列で1年生、B列で2組を選択すると、C列のドロップダウンリストは1年2組の名簿しか出て来ない、という
ようにしたいのです。
分かりにくくてすみません。
分かる方がいたら宜しくお願いします。

169名無しさん@そうだ選挙にいこう :04/12/21 16:00:19
質問致します。
Mac版Excel98を使ってます。
WindowsのExcelユーザーからデータが送られて来たのですが、Mac上で正常に開けません。
エラーメッセージ
「ファイルエラー:データが失われた可能性があります。」
「このファイルには、現在使用中のコード ページに変換できない文字が含まれています。」
等と表示され、全8ページ中、2ページまでしか開けません。
これの、正常に開くための改善策はありますでしょうか?宜しくお願いします。

170名無しさん@そうだ選挙にいこう :04/12/21 17:46:01
質問です、エクセルでグラフを書きたいのですがプロットした
点が自動的に線で結ばれると思うのですが、一部分だけ線を
消すにはどうすればよいのでしょうか?階段状のグラフを書き
たいのですがどうしても垂直線が表示されてしまうのです。

171名無しさん@そうだ選挙にいこう :04/12/21 21:46:51
office2000 windows XP 環境です。

30社の過去四年間の月度年計データを折れ線グラフで表示するように
言われたのですが、折れ線グラフが30本もあって見にくいので、
選択したデータ、例えば3社くらいだけを折れ線グラフに表示したいのですが、
どうやってやれば良いのか分かりません。
VBAは調べながらなら、なんとか書ける程度です。
やっぱりVBAでやるしかないのでしょうか。

もし、VBAでやるしかない場合、ポイントとなるところを教えて
いただけるとうれしいです。

よろしくお願いします。

172名無しさん@そうだ選挙にいこう :04/12/21 22:18:46
エクセル2000でシート間の移動をキー操作で行うにはどうすればよいのでしょうか?マウスを使うスペースに恵まれません。教えてください。よろしくお願いします。

173名無しさん@そうだ選挙にいこう :04/12/21 22:47:01
>>168
入力規則の元の値が参照しているセルがA列やB列を見て変化するようにIFなどで工作する

>>170
消したいグラフの要素を選択(線か点の上で2回クリック)後にダブルクリック
データ要素の書式設定のパターンで線を「なし」にする

174名無しさん@そうだ選挙にいこう :04/12/21 23:27:52
>>164
マクロウィルスにとってやりたい放題の環境が出来ました。プ

175名無しさん@そうだ選挙にいこう :04/12/22 00:50:16
>>172
Ctrl+PageUP or PageDown

176名無しさん@そうだ選挙にいこう :04/12/22 03:27:40
EXCEL2003/XP/ネット未接続/携帯より書き込み

教えて下さい。(VBA)
フォームのRefeditでセル範囲を指定した場合、Valueの値はシート名からですよね?シート名をのぞいたセル範囲の値はどうすれば参照できますか?分かんなかったので、文字列関数使って範囲部分を抽出して、Range型変数に代入したら当然エラーで…(◎-◎;)
宜しくお願いします

177172 :04/12/22 06:44:27
ありがとうございまつ

178名無しさん@そうだ選挙にいこう :04/12/22 09:41:04
>>176
Range(RefEdit1.Value).Address
ってことですか?

179名無しさん@そうだ選挙にいこう :04/12/22 10:11:33
>>113,>>114
値渡しなのでaをVariant型にしてるんだろうが、TempArrayを
用意するのなら、aは参照渡しの方が良くないか?
Function myfunc(a() As Double) As Double()
Dim i As Long, TempArray() As Double
 ReDim TempArray(LBound(a) To UBound(a))
 For i = LBound(a) To UBound(a)
  TempArray(i) = a(i) * 0.5
 Next
 myfunc = TempArray
End Function

昔のバージョンは
Function myfunc(a() As Double) As Variant
としないと駄目だったような記憶もあるが、漏れの
Excel2003はDouble()でいいみたいだ。

aが参照渡しでそのまま使って問題なければ、
Function myfunc(a() As Double) As Double()
Dim i As Long
 For i = LBound(a) To UBound(a)
  a(i) = a(i) * 0.5
 Next
 myfunc = a
End Function
でもよさそうだな。
最初の方がパフォーマンスはよさそうだが。

180名無しさん@そうだ選挙にいこう :04/12/22 13:52:34
1つのセル内で改行するには、どうすればいいのですか?
(スペースを入れて改行する方法は除きます)

OSはWindowsXP、Excelは2002です。

181名無しさん@そうだ選挙にいこう :04/12/22 14:05:09
>180
Alt+Enter

29スレでは初めてだけど、これも歴代スレで何度も質問あったしFAQ行きキボン。
例文こんな感じ?

FAQ:セル内改行について
Q:セル内で改行したいんですがどうすればいいでしょうか
A:改行したい位置でAltを押しながらEnterを押せばセル内改行できます。



182名無しさん@そうだ選挙にいこう :04/12/22 14:12:32
>>181
なるほど。できました。ありがとうございます。

183名無しさん@そうだ選挙にいこう :04/12/22 21:43:55
使用OS ウィンドウズXP Excel2002を使用しています
以下のような表の場合
    A       B
   ギコ      ギコ
   しぃ      しぃ
   モナー     モナー
   ギコ      ゾヌ
   ゾヌ
   モナー
A列に名前を入力した時点でB列に自動的に出力させるような
関数はどのようになるのでしょうか?
重複することなくB列に出力させたいのですが、可能でしょうか?

184名無しさん@そうだ選挙にいこう :04/12/22 23:10:45
>>183
A列とB列の関連性は?

文字列が有るか無いかを判断したいだけなら、ifでnullか否かを見ればいいだけでは?


185名無しさん@そうだ選挙にいこう :04/12/22 23:26:56
>>184
具体的には以下のような表です

   A     売り上げ     B      一日の売り上げ
  ギコ      100 ギコ         200
しぃ      2000 しぃ 2000
  ぞぬ      500 ぞぬ        1500
ぞぬ 1000      モナー 200
  ギコ      100
  モナー 200

このような表です。
A列に名前を入力→自動的にB列にも名前が入る(重複はしない)


186名無しさん@そうだ選挙にいこう :04/12/22 23:30:32
すいません・・・改行がうまくできてませんでした・・
具体的には以下のような表です

   A     売り上げ     B      一日の売り上げ
  ギコ      100      ギコ         200
  しぃ      2000      しぃ         2000
  ぞぬ      500 ぞぬ         1500
ぞぬ 1000     モナー 200
  ギコ      100
  モナー 200

このような表です。
A列に名前を入力→自動的にB列にも名前が入る(重複はしない)


187名無しさん@そうだ選挙にいこう :04/12/22 23:40:14
エクセルの質問の前に
改行のしかたおぼえろって話だな・・・ぷぷ

188名無しさん@そうだ選挙にいこう :04/12/23 00:08:20
>>186
関数だけでやるなら、他に1列必要になりますがよろしいですか?

189名無しさん@そうだ選挙にいこう :04/12/23 00:31:33
>>188
どのような感じで構成したらよいのでしょう?

190名無しさん@そうだ選挙にいこう :04/12/23 00:32:43
>>187
そのレスに何の意味があるのですか?

191ゴッホ ◆lkGoghDAZs :04/12/23 00:33:23
>>183
関数とは、その関数の書いてあるセル一つに結果を戻すのが目的であって、
複数のセルに自動的に書き込むためのものじゃないよ。
そういうことがしたいのなら、マクロを使うのがいいです。
Alt + F11でVBEを立ち上げて、該当シート名のをクリックし、下のコードを記述。

Private Sub Worksheet_Change(ByVal Target As Range)
 Const Retu As Long = 1
  If Target.Column = Retu Then
   Dim myCell As Range, Hanni As Range, Str As String
   Set Hanni = Columns(Retu)
   Str = Target
    If Application.WorksheetFunction.CountIf(Hanni, Str) <= 1 Then
     If Application.WorksheetFunction.CountIf(Columns(Retu + 2), Str) < 1 Then
      Set myCell = Cells(65536, Retu + 2).End(xlUp).Offset(1)
      myCell = Str
      myCell.Offset(, 1) = "=SumIf(" & Hanni.Address & "," & """" & Str & """" & "," & Columns(Retu + 1).Address & ")"
     End If
    End If
  End If
End Sub

192188 :04/12/23 00:43:29
こんな感じです。

   A     B     C       D         E
1 商品名 売り上げ 商品名 一日の売り上げ (作業用列)
2 ギコ    100    ギコ      200        1
3 しぃ    2000   しぃ      2000
4 ぞぬ    500    ぞぬ      1500
5 ぞぬ   1000   モナー     200
6 ギコ    100
7 モナー   200

最終的に上の表のようになるとして、
1. E2に 1 と入力
2. E3に以下の数式を入力し、それを下にA列の最終行と同じ行までコピー
=IF(COUNTIF($A$2:A3,A3)=1,MAX($E$2:E2)+1,"")
3. C2に以下の数式を入力し、それを下にA列の最終行と同じ行までコピー
=IF(ISERR(SMALL(E:E,ROW(A1))),"",INDEX(A:A,MATCH(SMALL(E:E,ROW(A1)),E:E)))
4.あとはE列を表示しないようにして終わり


でもこういう場合はマクロでやったほうがいいとは思うけど。

193名無しさん@そうだ選挙にいこう :04/12/23 00:51:55
>>178
レスどうもです。
どうもうまくいきません…(;-o-)
初心者ですんません

RefEditで取得したセル範囲のすべてのセルをチェックする場合、

Dim CL As Range

For Each CL In Range(RefEditで取得したセル範囲)
↑こいつを使うんでしょうか?

どうもうまくいかないんです
宜しくお願いします

194ゴッホ ◆lkGoghDAZs :04/12/23 01:02:25
>>193

Forを使いたいんだったら、

For Each CL In Range(RefEdit1.Value)

で、できると思うけど、
何がしたいのかわからないので、Forが適切かどうかはわからない。

195名無しさん@そうだ選挙にいこう :04/12/23 03:24:08
Excel2003を使用しているのですが

Sheetから散布図作成
「近似曲線の追加グラフにR-2乗値を表示する」で、R-2乗値を複数個表示した場合
sheetの値をいじっても結果が反映されないのですが、これって何ででしょうか?

R-2乗値が1つの場合はSheetの値をいじった結果が反映されています。

196名無しさん@そうだ選挙にいこう :04/12/23 05:31:19
>>188
ヴァカな奴らは配列数式とSUMIFでやるかも知らんけど、普通の人はピボットテーブルを使う。


197196 :04/12/23 08:54:48
スマソ>>186だった

198名無しさん@そうだ選挙にいこう :04/12/23 13:13:34
>>195
>R-2乗値を複数個表示した場合
どんな風に複数個表示したのか詳細求む。
それってまったく同じモノ(数値)のままなの?
なんか違えてるの?
それぞれ場所はどこに?

>値をいじっても結果が反映されない
一つも反映されないの? 一つは反映されるの?

199名無しさん@そうだ選挙にいこう :04/12/23 18:31:12
Excel2000を使用しているのですが、折れ線グラフで例えば10000から20000 の間の値で推移するグラフと、10から100の間で推移するグラフを
ひとつにすると、後者のグラフの動きがほとんどわからなくなってしまうので、Y軸を、
     │
 10000│
     〜
     〜
     │
  100 │
     │
    0│
みたいにする方法はありませんか?

200名無しさん@そうだ選挙にいこう :04/12/23 18:37:51
>>199
そのケースなら、どちらかを第2軸にするほうがよくはないか?

201199 :04/12/23 18:58:13
>>200
レスありがとうございます。第2軸にする方法も考えたんですが、その方法だと、2つのグラフが全然値が違うのに
混じってしまうので、見にくいかなと考えたので、199のような方法がないかと考えたんですが・・・

202名無しさん@そうだ選挙にいこう :04/12/23 19:04:58
web上でexcelの問題集ってありますか?
量が結構あるとありがたいです。

203名無しさん@そうだ選挙にいこう :04/12/23 20:46:29
>>201
第2軸にし、それぞれのY軸の最大値と最小値を変更して、グラフが重ならないようにする。
または、2つのグラフを書き、X軸の位置を合わせた後、一方の軸や目盛の色を透明にする。

204名無しさん@そうだ選挙にいこう :04/12/23 20:48:37
>>202
「MOUS EXCEL 問題集 ダウンロード」での検索結果はどうだろう。

205199 :04/12/23 21:42:45
>>203
203さんの方法でやったらうまくいきました。ありがとうございました。

206名無しさん@そうだ選挙にいこう :04/12/24 03:18:16
高校、大学とかの 偏差値72とかを求める関数ってどれでしょうか?

207名無しさん@そうだ選挙にいこう :04/12/24 08:32:49
>>206
「標準偏差」でヘルプ

208名無しさん@そうだ選挙にいこう :04/12/24 13:32:00
マクロでプリンタをAcrobatに指定してシートをPDFとして保存しています。
保存する際にファイル名を指定するダイアログが表示されてしまうのですが
これを表示させないようには出来ないでしょうか?
ファイル名もマクロ内で文字列として渡すことが出来ればいいのですが。

209名無しさん@そうだ選挙にいこう :04/12/24 14:13:59
>>208
最初の日本語の意味が全くわからん
再度、詳細書いてくれ

210名無しさん@そうだ選挙にいこう :04/12/24 14:39:22
>>208
Excel の問題ではない
まずプリンタのプロパティを見ろ

211名無しさん@そうだ選挙にいこう :04/12/24 16:55:51
誘導されてきました。

教えてください。
win2000proでExcel2000を使用しています。二つの症状があります。

@htmlのタグをセルに入力→csv形式で保存
AそのcsvファイルをExcelで開き、編集しようとする
結果
→htmlのレイアウトで開いてしまうようになってしまいます。

@csvファイルをexcelで作成→1セルに一項目で20行程データ作成
A保存→終了
B同じファイルを開く
結果
→すべての項目が1セルに無理やり入った状態で開かれる。
→メモ帳で同じファイルを開いてみるとすべてのデータが改行もされず
ずっと続いた状態でひょうじされる。    

やってみたこと
@コンパネから「地域のオプション」で数値の区切りの設定を確認
→変化無し
AOfficeの再インストール
→通常どおりに開けるようになるが、保存をするとダメ。
B問題のファイルを他のPCで開く→正常に開ける
Cサポートに聞いた→カンマの認識がおかしくなっている可能性があるが
調査をしないとすぐにわからないので、時間がほしいと言われた。

csvファイルをExcelで修正したいのですが、
どうすればいいのでしょうか??


212名無しさん@そうだ選挙にいこう :04/12/24 17:09:09
>>211
そのスレに参考になるレスがある場合があるから誘導元も書いて下さい。


213211 :04/12/24 17:12:48
http://pc5.2ch.net/test/read.cgi/software/1100800383/l50

です。


214名無しさん@そうだ選挙にいこう :04/12/24 18:20:14
エクセルのマクロでちょっと教えて欲しいのですが、
現在どのセルを選択しているかを変数に入れたいのですが、
こういう場合ってどうすればいいのでしょうか?

215名無しさん@そうだ選挙にいこう :04/12/24 18:39:04
>>214 はじめてなの?
とりあえず入れるのは湿り具合を確認してからのほうがいいよ。
あまり痛がられても萎えるしね。それが良いという人もいるだろうけど…
あと、間違ってア○ルにいれんなよ。まだ10年は早い。
今は病気も怖いからゴムは忘れんなよ、待ち合わせ前に用意しとくのがスマ
ートってもんだ。ホテルの備品じゃ信用できないしムードも台無しだろ?
じゃあ頑張れよ、Have a nice X'mas eve!

216名無しさん@そうだ選挙にいこう :04/12/24 18:47:26
>>214
・質問する人は可能な限り具体的に書いてね。
・Excelのバージョン、OSのバージョンも書くとレスが付きやすい。

217名無しさん@そうだ選挙にいこう :04/12/24 19:13:43
シートの内容を枠付きでコピペしたいのですが
どうすればいようでしょうか

Excel2003です

218名無しさん@そうだ選挙にいこう :04/12/24 19:19:17
書式を選択して貼り付け

219217 :04/12/24 19:32:26
>>218
ごめんなさい。言葉が足りなかったです。
コピペする先はテキストエディタです。

220名無しさん@そうだ選挙にいこう :04/12/24 19:39:31
>>219
無理


221217 :04/12/24 19:52:01
>>220
残念です。ありがとうございました。

222名無しさん@そうだ選挙にいこう :04/12/24 19:52:52
>>208
ファイルにプリントする記述をマクロで書いて、psファイルとしてプリント結果を出力。
そのあとにdistillerをマクロで立ち上げてでPDF化する2段構成。

もしくは、参照設定で悪路バットのライブラリ組み込んで、一発でやる。

とりあえず、ぐぐれ。

223名無しさん@そうだ選挙にいこう :04/12/24 20:17:41
>>220
マクロで罫線に変換すればいけるんじゃないの?
セルの枠線があるかないかは、取得できなかったっけ?

224名無しさん@そうだ選挙にいこう :04/12/24 21:16:00
>222
横質問で悪いけど、自分はクセロpdf使ってるから、>210の書いてるように
プリンタのプロパティで保存先フォルダと、確認メッセージの有無を
選択できるんで、プリンタを指定するマクロ書いちゃえばpdfできるんだけど
Acrobatでも同じように出来るんじゃないの?持ってないから知らんけど。
それとも>222みたいにややこしいことしないといけないの?

225名無しさん@そうだ選挙にいこう :04/12/24 21:24:23
>>224
悪路バット6で仕様がかわったから。仮想プリンタがacrobat pdfに統一された。
通常にプリントするとpdfに変換されるけど、ファイルメニューのプリントを選んだときの
ダイアログで「ファイルに出力(L)」にチェックを入れるとpsファイルに落ちる。

以前は、distiller printerでps出力、pdfプリンタでpdf出力というように使い分けていたけどね。

226名無しさん@そうだ選挙にいこう :04/12/24 21:32:05
>225
thx. いろいろめんどくさそうだな…209がうまくマクロ組み上げられる事を祈る。


227214 :04/12/24 22:41:48
OSはXPで、ExcelのバージョンもXPです。

RANGEを使うと選択は出来るけど、どこを選択しているのかの情報を得たいのですよ。
A1を選択している状態でShift+Ctrl+↓で内容のあるすべてのセルを選択しているのですけど、
一番下のセルはどこが選択状態なのかを知りたいのです。


228名無しさん@そうだ選挙にいこう :04/12/24 22:47:59
>>227
ぐぐればすぐ見つかりますよ
ttp://www.google.com/search?hl=ja&lr=lang_ja&ie=UTF-8&oe=UTF-8&q=excel+%E9%81%B8%E6%8A%9E%E3%82%BB%E3%83%AB+%E5%8F%96%E5%BE%97&num=50

229214 :04/12/24 23:36:16
選択範囲 代入
でぐぐってたもんで何も引っかからなかったありがとね。


230名無しさん@そうだ選挙にいこう :04/12/25 01:17:23
A1=2004  A2=12

セル      式           (セルの表示形式)   (値)
A3   =DATE($A$1,$A$2,1)        m/d        12/1
A4   =A3+1                  d          2
A5   =A4+1                  d          3
--省略--
A34  =A33+1                  d          1
A35  =A34+1                  d          2
--省略--
A65  =A64+1                  d          1

というような表なんですが、ここで各月の1日だけ表示形式を「m/d」(月を表示)にすることはできないでしょうか?
A1とA2の年と月は可変するので、セルの表示形式そのものを変更することができません。
A4以降の式を、たとえば =IF(DAY(A3+1)=1,TEXT(A3+1,"m/d"),A3+1) とすると文字列になってしまって
曜日が出せなくなってしまい、それ以降の曜日の表示が狂ってしまいます。

231名無しさん@そうだ選挙にいこう :04/12/25 02:11:22
>>230
条件書式で何とか出来ないか?

232名無しさん@そうだ選挙にいこう :04/12/25 03:17:55
>>230
もし曜日をB列に表示するのであれば、
B3セルに =A3  B4セルに =B3+1 としてB4セルを下にコピーすれば
A列が文字列でも関係なくなるけどどうでしょう。

233208 :04/12/25 09:59:16
>>222
サンクス、.psのファイル出力とShellExecuteで期待通りの動作が出来たよ。
多謝

234名無しさん@そうだ選挙にいこう :04/12/25 12:18:37
質問よろしいでしょうか?バージョンはOS、EXCELともに2000です。
1つのブックの中に'集計'、'0301'〜'0312'の計13個のシートがあります。
で、'0301'〜'0312'のシートの構成は同じとします。

それで、集計シートの中でvlookup関数を使って'0301'〜'0312'のどれかの
シートを参照したいんですが、方法はありますでしょうか?

式としては、
=VLOOKUP(B2,A2!$A:$F,3,FALSE)
という感じにしたい(A2のセルに0301とかが入っている)んですが、
強制的にA2をファイル名と見なしてしまうようです。

何かいい方法があったら教えてください。お願いします。


235名無しさん@そうだ選挙にいこう :04/12/25 12:43:51
>234
何かいい方法って言うより>12を読んでないの?
とりあえずこんな感じで。
=VLOOKUP(B2,INDIRECT(A2&"!$A:$F"),3,FALSE)

236234 :04/12/25 13:16:14
>>235
ありがとうございます。>12は読んだんですが、セルの指定とシートの指定なので
別物かな?と思い読み飛ばしてました。すいませんです。

237230 :04/12/25 23:16:17
>>231
条件付き書式でセルの表示形式が指定できれば話は簡単だったんですが・・・
新バージョンではぜひ対応して欲しいです。

>>232
解決しました。
今まで曜日を隣のセル(A列)を元に出していたので、A列が文字列になるとそこから後が狂ってしまったんですね
曜日は上の列+1と出せばよかったんですよね・・・全然気づきませんでした。
とにかく、ありがとうございました。

238名無しさん@そうだ選挙にいこう :04/12/26 00:14:28
ある範囲の合計を求める関数は何か?

と試験で聞かれたのですが、どう答えればいいのかわかりません。
Excel2003でOSはXPです。


239名無しさん@そうだ選挙にいこう :04/12/26 00:19:52
>>238
SUM

240238 :04/12/26 00:25:15
サンクス

241名無しさん@そうだ選挙にいこう :04/12/26 00:46:42
ttp://uploader.zive.net/index.phpの1886zip

それぞれC2〜C7セルのエラーの意味と対処法
今はまともに入力できないので入力できるようにする設定
をそれぞれ教えてもらえないでしょうか?

242名無しさん@そうだ選挙にいこう :04/12/26 01:31:29
質問です。
200列、300行あるデータを別表に例えば、723156、7100000と
入力すると3475と表示させたいのですが、どの関数を使用すれば
よいでしょうか?
列をHLOOKUP関数で、行はVLOOKUP関数でそれぞれ検索させて
両方に合致する検索値をひとつのセルに表示させるのが目的です。
理論的には、HLOOKUPと、VLOOKUPをネストさせるような
感じなんですが、具体的にどうすればよいのかがわかりません。

データ
Code No.723156723157723160723162・・・・(200列)
68002222650834347216684
69001112925120053047237
70001313200210058877790
71000003475237564708343
72001153750265070538896
74002224300320082191002
  ・
  ・
(300行)

別表で、上のデータから検索した値を参照させる。
行、列の数値をそれぞれ入力すると、その両方に合致した検索値が
表示される。
   
       723156 ←入力する
7100000 3475←行と列の双方の検索値に合致した数値

入力する



243名無しさん@そうだ選挙にいこう :04/12/26 01:50:02
>>242
データがよくわかりませんが、

INDEX

状況にあわせて
MATCHをネスト

244名無しさん@そうだ選挙にいこう :04/12/26 01:55:44
>>241
中部大学宮島研究室伊藤英朗
宿題は自分でやりなさい。

245名無しさん@そうだ選挙にいこう :04/12/26 11:17:06
ム板のVBAスレにするか迷ったのですが、こっちに書かせてもらいます。
VBAから外部DLLに構造体を渡したいのですが、どのようにすればよいのですか?
構造体もその外部DLLで定義されています。

246名無しさん@そうだ選挙にいこう :04/12/26 12:28:16
>>243
ありがとうございました。

INDEX(配列、MATCH(検査値、検査範囲、照合の型)、MATCH(検査値、検査範囲、照合の型)
で、目的の別表がすんなりできました。


247名無しさん@そうだ選挙にいこう :04/12/26 13:33:03
>>245
ここに説明が書いてあります。
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/modcore/html/deovrpassinguserdefinedtypes.asp

248245 :04/12/26 15:24:24
>>247
dクスコ

249名無しさん@そうだ選挙にいこう :04/12/27 00:17:45
別のシートに、例えば名前などのリストを作成しといて
別のシートのセルをクリックすると、
その名前のリストがズラーっと出てくる様にするのって
どうやるんでしたっけ?

250名無しさん@そうだ選挙にいこう :04/12/27 01:01:32
意味わかんねーぞアホ

どんな質問でも答えてもらえると思うなよ

251名無しさん@そうだ選挙にいこう :04/12/27 02:30:11
>249
「データ(D)−入力規則(L)」の入力値の種類で「リスト」を選んで
元の値を指定。

このこと?

252名無しさん@そうだ選挙にいこう :04/12/27 07:38:36
>>251
横レスで申し訳ないんだけど質問。
それって別シートでもできたんだっけ?

253名無しさん@そうだ選挙にいこう :04/12/27 10:49:58
>205
できるよ
別ファイルのシートだとしらないけど

254名無しさん@そうだ選挙にいこう :04/12/27 12:23:07
教えてください。
Excel初心者です。
環境はOS me
Exceは XPです
問題集を作成するうえで、セル範囲内で
改行できるようにしたいのですが
どのようにすればよいかわかりません。
御指導宜しく御願い致します。

255名無しさん@そうだ選挙にいこう :04/12/27 12:42:21
>>254
>>180-181

256名無しさん@そうだ選挙にいこう :04/12/27 13:11:24
254です
>>255さん
教えていただき
有難う御座います

257名無しさん@そうだ選挙にいこう :04/12/27 13:48:29
現在、簡単なマクロ(エクセル上の数表を図でコピー)を作って、そのマクロをツールバーとショートカットキーに入れようと
しています。
とりあえずALT+Pに割り当てたいのですが、「ユーザー設定〜マクロ」でツールバーに登録し、その登録したボタンにさらに
ショートカットキーを設定しようとしたのですが、うまくいきません。
ボタンを登録し、コマンドの”選択したボタンの編集”で、名前のところに(&P)を入れてもダメ、(%P)を入れてもダメ。
マクロ内で
Application.OnKey "%p", "図でコピー" 'Alt + P 表などを図でコピー
と入れても(他にもショートカットキーを作っているのでそこに)ダメです。

どうやったらショートカットキー登録できるでしょうか?マクロのショートカットキー登録はやったことがないので・・・(´・ω・`)

258名無しさん@そうだ選挙にいこう :04/12/27 14:06:00
平均値などの計算方法について教えてください。
セルの平均値は=AVEVRAGEを使えばすぐに求まるのですが、配列変数に入っているデータの
平均値を計算するにはどうしたら良いのでしょうか?
今はいちいちセルに一度代入してから計算していますが時間がかかるので。

259258 :04/12/27 14:50:17
このままではあまりにもお馬鹿な質問なので。
平均値は変数をすべて足し合わせて割れば出来るのですが、標準偏差などとなると
どうしても複雑な計算をしなければなりません。
何か良い方法は無いでしょうか?

260名無しさん@そうだ選挙にいこう :04/12/27 14:53:45
折れ線グラフに横線を追加したい場合ってどうすればいいですか?
例えばデータが5の場所にラインを一本引きたいのですが、
セルにデータを代入せずにラインを引くにはどうすれば出来ますか?

261名無しさん@そうだ選挙にいこう :04/12/27 14:55:17
>>258
セルに保存する訳がよくわからない。

262名無しさん@そうだ選挙にいこう :04/12/27 15:15:36
>>259
どういったやり方をしたいのかわかりませんが、
平均値を求めることが出来るなら標準偏差も求まるのでは?

263258 :04/12/27 15:37:46
例えばa(0)からa(99)までにデータが入っているとすると
for文を使ってbにa(0..99)までをすべて足しあわせて100で割れば平均が出ますよね。
ですが、標準偏差となるとSTDEV関数が使えないので困っています。

264名無しさん@そうだ選挙にいこう :04/12/27 15:44:31
>>263
なんで使えないの?
使わなくても平均出してからもう一度Forで回せば?


265名無しさん@そうだ選挙にいこう :04/12/27 15:51:50
>>263
Application.WorksheetFunction.StDev(配列)

266名無しさん@そうだ選挙にいこう :04/12/27 19:39:01
>>257

どこで狂っているのかわからんが
うちでは

Sub auto_run()
Application.OnKey "%p", "コピー"
End Sub

Sub コピー()
MsgBox "コピーだよ"
End Sub

とやると、ちゃんとAlt+Pでメッセージボックスが出るよ

267名無しさん@そうだ選挙にいこう :04/12/27 21:31:56
エクセルをこれから勉強しようと思っているのですが、
@独学で理解できますか?
Aエクセル97しかないのですが、2003を購入した方がいいですか?

268名無しさん@そうだ選挙にいこう :04/12/27 21:34:48
質問です。Excel2003、ミ田 XP 使用です。

セルにそのExcelファイルの最終更新日を表示する方法はありますか。
関数でも、マクロでも構いません。

宜しくお願いします。


269名無しさん@そうだ選挙にいこう :04/12/27 21:43:10
>>267
@ 何をどこまで理解しようと思っているのかわからないから明確にはいえない。
  表計算の基本的から学ぼうと思ったら、変なクセ付く前にスクールに行ったり
  講習会に参加するのもいいかもしれない。
  独学でも問題ないが、テキスト選びも大切だし、わからないことを
  気軽に聞ける環境だとやりやすいと思う。
  (わからないことをちょっと聞くならこのスレで用が足りるかもな。)

A 表計算ソフトでどんなことが出来るの?ってレベルならバージョンはあまり
  関係なく勉強できると思う。それだけならわざわざ購入する必要はない。
  しかし、バージョンが97で、テキストや参考書はこれから買おうとしているなら
  古本屋を回らないといけないかも。そう考えると買ってしまうのも手かも知れない。

あまり参考にならなくてスマソ

270名無しさん@そうだ選挙にいこう :04/12/27 21:49:56
>>267

最初は「よくわかる」とか「これから始める」や「できる」といった入門書を読むことから始めるとイイです
人に聞くにしても用語自体がわからないと教えるほうもたいへんです

97でも一通りのことは出来ますが、2000-2002-2003と進むにつれ関数や機能が追加されていますから
最新バージョンを購入されることをお勧めします
97ではマクロを書かないと出来なかったことなどが2002あたりからは
ふつうにメニューから可能になった機能もあります
雑誌等でも2003を中心に解説してあるようですから古いバージョンの場合は参考になりません

271名無しさん@そうだ選挙にいこう :04/12/27 22:20:52
>>267
2003が入れられるかまず調べてからにしろよ。

272名無しさん@そうだ選挙にいこう :04/12/27 22:27:02
>>268
こちらをどうぞ。
http://www.google.co.jp/search?hl=ja&q=%E3%83%96%E3%83%83%E3%82%AF%E3%81%AE%E6%9B%B4%E6%96%B0%E6%97%A5%E3%82%92%E5%8F%96%E5%BE%97&btnG=Google+%E6%A4%9C%E7%B4%A2&lr=

273名無しさん@そうだ選挙にいこう :04/12/27 23:29:14
>>272
ありがとうございました。



274名無しさん@そうだ選挙にいこう :04/12/28 01:25:45
サーティファイの検定受けた方よろしければ感想をお聞かせ下さい。

275名無しさん@そうだ選挙にいこう :04/12/28 08:44:04
試験受けなくてもいいけどFOMの参考書分かりやすい


276名無しさん@そうだ選挙にいこう :04/12/28 12:13:20
まだ97使ってるよ。
職場が97でvbaも使うので2000以降で開発すると不具合が出る場合が多い
資格とるんだったら最新verがいいだろうけど、そうでなければ職場や学校
の環境に合わせる方がいいとおもうね

277名無しさん@そうだ選挙にいこう :04/12/28 13:41:10
エクセルで郵便番号入れると住所が出てくるやりかたあると聞いたのですが
どうやるんでしょうか?


278名無しさん@そうだ選挙にいこう :04/12/28 14:09:07
VBAを作ったんですが、これを特定のブックだけでなく、あらゆるブックからでも呼び出せるようにしたいのですが、
どのようにしたらよいのでしょうか?
現在の設定では、VBAを作る際に開いていたブックを閉じてしまうと、そのVBAが呼び出せなくなってしまいます。

279257 :04/12/28 14:42:46
>>266
多分、エクセルのどっかが壊れてるっぽい(´・ω・`) どうやっても出来ない・・・
再インスコして、リトライします・・・アリガd 


280名無しさん@そうだ選挙にいこう :04/12/28 15:00:09
>277
Excel単体にはそういう機能は無いよ。
IMEが郵便番号辞書に対応してればそれ使えばいいけど、
Excelでやるなら日本で使われてる全ての郵便番号に対応した住所を入力したシートが必要だよ。
まあこれは既存の物が使えるし(このくらいは自分で探してね)、あとはVLOOKUPか簡単なVBAでいける。

281名無しさん@そうだ選挙にいこう :04/12/28 16:01:22
>>280
こういうアドインならExcelにもありますよ。
http://www.microsoft.com/downloads/details.aspx?FamilyID=6F6AF8EF-B9DD-4E21-9E63-AF4A0FF4E7CE&displaylang=ja

ただ>>277の言ってるのは、たぶんIMEの機能を使う方法だと思うが。

282名無しさん@そうだ選挙にいこう :04/12/28 17:00:22
>>277

MS-IMEのATOK共にプロパティー→辞書で郵便番号辞書にチェックを入れて→OK
で、郵便番号を入れて→変換
これが一番簡単

>>278

マクロの保存先を「個人用マクロブック」にすればOK

283282 :04/12/29 05:38:23
× MS-IMEのATOK
○ MS-IMEとATOK

>>278

個人用マクロブックに記録すればOK

284名無しさん@そうだ選挙にいこう :04/12/29 08:02:48
MSのIMEは、変換モードを「人名/地名」に合わせておかないと
郵便番号変換はできなかったような。
バージョンによって違うのかな? ATOKは知らね。


285名無しさん@そうだ選挙にいこう :04/12/29 11:10:40
初心者ですがお願いします。
テキストファイルから数値をコピーしてエクセルにペーストする場合、
例えば「111 222 333」などの数字を、ひとつのセルにではなく、
「111」「222」「333」というように、スペースを自動認識して3つの
セルに自動的に分ける、というようなことは可能でしょうか?
よろしくお願いします!

286名無しさん@そうだ選挙にいこう :04/12/29 11:25:11
285
可能です

287名無しさん@そうだ選挙にいこう :04/12/29 11:34:09
>285
ペーストしてから編集するなら[メニュー] > [データ] > [区切り位置...]
ペースト時に分けたいならペースト前にRefoで「\refo.exe /RE "s/ /\t/g"」

Refo
ttp://www.beyond-boundaries.info/Applicat/Refo.html

288名無しさん@そうだ選挙にいこう :04/12/29 11:52:13
>>285
めんどくさいけど可能です。

289名無しさん@そうだ選挙にいこう :04/12/29 12:02:04
>>285
できるんじゃね?

290名無しさん@そうだ選挙にいこう :04/12/29 15:45:13
質問なんですが
商品(A,B,C)と取引日の2項目があって
商品A,B,Cのそれぞれ最後に取り引きした取引日を求めることは出来ますか?


商品A 取引日
商品B 取引日
商品C 取引日

291名無しさん@そうだ選挙にいこう :04/12/29 16:01:05
>>290

言ってることがよくわからん

292名無しさん@そうだ選挙にいこう :04/12/29 16:06:45
>>285

テキストファイルをexcelで読み込めばいいだけ
テキストファイルウィザードが自動的にスペースで区切って各セルに格納する

293290 :04/12/29 16:40:47
リスト
2004年12月24日商品A
2004年12月25日商品B
2004年12月27日商品C
2004年12月28日商品A
2004年12月28日商品B
2004年12月28日商品C
2004年12月29日商品C
2004年12月30日商品A

この表の商品Aが最後に取り引きされた日を求めたいのですが

商品Aで検索
最後に取り引きした日
商品A2004年12月30日
とだすのはどうやればいいでしょうか?

294名無しさん@そうだ選挙にいこう :04/12/29 17:00:34
>290>293
DMAX関数使えばいい。
具体的なやりかたはヘルプに詳しく載ってるからそっち見てね。

295名無しさん@そうだ選挙にいこう :04/12/29 20:16:57
ありがとうございました。

296名無しさん@そうだ選挙にいこう :04/12/29 20:23:16
>>293

リストが一つのセルに「2004年12月30日商品A」と入っているとやっかいになるが
そうではないようだな

297名無しさん@そうだ選挙にいこう :04/12/29 20:24:36
ワークシート1(データ入力用)
リスト
2004年12月24日商品A
2004年12月25日商品B
2004年12月27日商品C
2004年12月28日商品A
2004年12月28日商品B
2004年12月28日商品C
2004年12月29日商品C
2004年12月30日商品A


ワークシート2(プリントアウト用)
商品Aで検索
最後に取り引きした日
商品A2004年12月30日


このようにワークシート間での
データの受け渡し方法はありますか?

298名無しさん@そうだ選挙にいこう :04/12/29 21:03:11
>297
あるよ。
別シートでもDMAX関数は使えるので
あとは自分でやってね。

299285 :04/12/30 00:30:35
出来ました
どうもありがとうございました!

300名無しさん@そうだ選挙にいこう :04/12/30 18:50:59
もうすでに様式が決まっているエクセルで作った表に、手で毎回線を引いて
折れ線グラフを書いてるんですが、別のデータシートに数字を入れて、
この決まっている表に折れ線グラフを自動的に書くには、どうすればでき
るんでしょうか。よろしくおながいします。


301名無しさん@そうだ選挙にいこう :04/12/30 19:58:02
>>117
ここを参考にしてみては?
http://blog.livedoor.jp/tetolon/
このブログの11月23日の記述に書いてあるよ。

302名無しさん@そうだ選挙にいこう :04/12/30 23:49:34
CSVのデータをエクセルに取り込むんですが、データの中に0ではじまるものがあり、先頭の0が省略されてしまいます・・・
なんとかCSVの中身をそのままエクセルに取り込めないものでしょうか

303名無しさん@そうだ選挙にいこう :04/12/30 23:55:38
>>302
データの頭に'をつけて文字列として扱ったら出来ない?


304名無しさん@そうだ選挙にいこう :04/12/31 00:00:17
>>303
即レスどうもです。読み込んだあとに'をつければ0が復活するんでしょうか・・?
ちょっと今エクセルがない環境なので明日にでもやってみます

305名無しさん@そうだ選挙にいこう :04/12/31 00:22:24
>>302
(1) 拡張子を csv から txt に変更する。
(2) Excel の「ファイル」メニューから、(1)を開く。
(3) 区切り文字に "," を指定して、書式を文字列にする。
または
(1) csv ファイルをテキストエディタで開き、0 を他の文字に全置換する。
(2) Excel に読み込む。
(3) 置換した文字を 0 に再置換する。

306名無しさん@そうだ選挙にいこう :04/12/31 01:07:57
Windouws Meでオフィス2000を使用しています。
少し前にマイクロソフトのアップデートをしたところ
エクセルの既存のファイルが開きません。

Microsoft Office 2000 SR-1 Personalをインストールするのに
必要なファイルが見つかりませんと表示されて、ファイルが開きません。

どうしたら、良いのでしょうか?
年末でサポートセンターもお休みで困っています。



307名無しさん@そうだ選挙にいこう :04/12/31 12:58:42
>>306
SR-1やらSP-3やらを入れなおす。
>>300
別シートでグラフを作り、図のリンク貼り付けかなんかする。

308名無しさん@そうだ選挙にいこう :04/12/31 13:15:13
>>277-282
Office 更新プログラム: 郵便番号辞書
http://www.microsoft.com/downloads/details.aspx?FamilyId=45192822-FBA7-49E6-B220-09BB32250EB3&displaylang=ja
なんかでは「…Access や Excel に付属する住所入力支援…」てのが
出てくるのよね。Excelに付属?

それはともかく、市町村合併も多いことだし、ゆうびんホームページを
常に参照してコピペするってのもありかも。

309コンパウンド :04/12/31 15:26:42
始めまして。。。唐突な質問ですみません。Excelを使用していて最
近になり頻発する現象があり大変に困っています。ここで質問させてください
実はExcelを使用して定期的に上書き保存をしていくと
突然「保存できませんでした」と表示されるようになります。立ち上
げ直すとまた1〜2回くらいまでは上書き保存できますが、3回目くらいの
書きから同様に「保存できませんでした」と表示されてしまいます
Excel自体の問題ではないのかも知れませんが保存をするのは

310名無しさん@そうだ選挙にいこう :04/12/31 15:35:01
>>309
間違いなくExcel自体の問題ではないのでスレ違いです。
さようなら。

311名無しさん@そうだ選挙にいこう :04/12/31 16:14:53
>>309
>1
     /)_/)    ( ・質問する人は可能な限り具体的に書いてね。
    < ゚ _・゚> .。oO( ・Excelのバージョン、OSのバージョンも書くとレスが付きやすい。

312てめえ :04/12/31 18:39:25
>>310
てめーは何モンだ!偉そうに語るな!
ただのPCオタクだろ!てめー


313名無しさん@そうだ選挙にいこう :04/12/31 19:02:13
>>312
原因はOSだとおもうぞ
スレ違いであってますよ^^;

314名無しさん@そうだ選挙にいこう :04/12/31 19:18:45
>>302
Excel2000の場合
データ→外部データのデータの取り込み→テキストファイルのインポート

Excel2002以降の場合
データ→外部データのデータの取り込み→データの取り込み

でウィザードが起動するよ。
Excel97以前の場合は>>305の方法を使う

315300 :05/01/01 00:20:36
あけおめ!

>307
レスどうもです。

316名無しさん@そうだ選挙にいこう :05/01/01 00:28:16
■回答者の方へ
・テンプレを知らず、また使用しない質問者にも回答者は寛容であること。
・何度同じ質問が出ようがバカバカしかろうがしっかり誘導&回答すること。
・中級者以上(回答者)で心の狭い人、忙しい人は見ないことを勧めます。
・中級者以上(回答者)は心の広い人や暇な人でなくてはなりません。

317名無しさん@そうだ選挙にいこう :05/01/01 21:49:27
さがしてもなかったんだって!
他のシートの参照の仕方ってなんかキー押しながらできたろ?いちいちビックリマークつけてらんない!
なんだっけ!思い出せない!
2003なんだけど

318名無しさん@そうだ選挙にいこう :05/01/01 21:51:14
>>317
どの質問のことだ?

319名無しさん@そうだ選挙にいこう :05/01/01 21:52:56
質問者は以降質問したレス番号を名前にしてくれるとありがたい

320名無しさん@そうだ選挙にいこう :05/01/01 22:00:34
317はただ荒らしたいだけだからスルーしろ

321名無しさん@そうだ選挙にいこう :05/01/02 02:02:31
>317
=の後、普通にシートを切り替えて目的のセルを選択するだけですが?

322名無しさん@そうだ選挙にいこう :05/01/02 04:02:39
こんばんは。
つい最近Office2003の入ってるPC買いました。
それで更新のチェックでワードのほうはちゃんと日本語サイトにつながるのに
エクセルはなぜか英語のサイトにつながっちゃいます。
これはそういう仕様なんでしょうか。
再インストールすれば直るでしょうか?

323322 :05/01/02 04:14:51
と思ったら直ってた。おさわがせしました。

324名無しさん@そうだ選挙にいこう :05/01/02 13:08:32
例えばA1に入っている数式をA2、A3・・・にコピーしたいのですが、
A1を選択してドラッグでコピーするとセルの書式までコピー
されてしまいます。

A2以下にあるセルの書式は元のままで、数式のみを一括して
コピーしたい場合はどのようにすれば良いですか?

325名無しさん@そうだ選挙にいこう :05/01/02 13:22:19
>324
左ドラッグではなく右ドラッグで「書式なしコピー」
コピーして「形式を指定して張り付け 張り付け対象:数式」

しかしなんでこんな基本的なことも調べられない奴が居るんだ・・・
あ、冬休みだからか。まあ小学生なら仕方ないかもな。

326名無しさん@そうだ選挙にいこう :05/01/02 14:27:37
文句を言いながらも教えてやるアンタは結構いい奴と見たがw

327つまらないことですが :05/01/02 17:17:02
Excel2000のツールバーの色についてですが、
http://tool-ya.ddo.jp/2ch/trash-box/contents.jsp?file=20050102171038946.jpg
の丸で囲んだところが黒くなってます。普通のソフトだと灰色っぽい色だと思うのですが、
Excelってこんな色でしたっけ?環境はXPSP2です。

328名無しさん@そうだ選挙にいこう :05/01/02 17:41:36
>>327
見れない

329327 :05/01/02 17:48:22
>>328
IEで開けば見えると思います。

330327 :05/01/02 17:49:42
今気づきましたが
327でツールバーと書いたのはスクロールバーの間違いです。

331名無しさん@そうだ選挙にいこう :05/01/02 19:04:17
>>327
全くもって問題ない。
そんなこと気にする必要はないから、違うことに頭使え

332名無しさん@そうだ選挙にいこう :05/01/02 19:07:20
>>327
Excelだけ色が変なら
修復でもしろ

333名無しさん@そうだ選挙にいこう :05/01/02 20:25:55
>325
ありがとうございます。

334名無しさん@そうだ選挙にいこう :05/01/02 20:37:59
名前、住所、生年月日、給料とかならんでいて
Vlookupを使う場合。

名前からだと結果となる列(たとえば給料)だと
4を入力すればよいのでしょうが、
給料から名前をVlookupでだす方法はないのでしょうか?
たとえば-4とか・・。(w

335名無しさん@そうだ選挙にいこう :05/01/02 20:40:57
最後の(wがいらつく・・・

336名無しさん@そうだ選挙にいこう :05/01/02 20:59:04
>334
Vlookup関数では無理。
DGET関数なら可能。使い方はヘルプ参照。

337名無しさん@そうだ選挙にいこう :05/01/02 21:43:49
★新春恒例 おみくじカキコ<新風舎バージョン> の書き込み方

アクセス方法
 1.書き込みの名前の欄に http://metamo.fusianasan.net/ と入力します。
 2.E-mail欄に、あなたの年齢を入力します。
  (年齢別調査らしいからご協力お願いします。)
 3.本文に sinpusya<所属部署>【例:sinpusya<hensyubu>】を入れて、書き込みボタンを押します。
 4.メッセージが「確認終了いたしました。ありがとうございます。」に変わればばOK。
 5.サーバーが重いと2chに戻ってくるけど、まあ何回かやれば大丈夫。
 6.家庭の電話回線よりも、企業や学校の専用回線からの方がサーバートラフィックの
   都合上つながる確率が高いです。
  (注意!)全て半角で入力してください!!
   http://metamo.fusianasan.net/ ←は、管理者専用の為「直リン」で飛んでも
   「サーバーが見つかりません」になります。
   つまり、この掲示板から上記の操作を実行してください。

見られた人はきっと、今まで生きてた中で一番幸せになれます!!

338http://metamo.ふしあなさん.net/ :05/01/02 21:55:30
sinpusya<risugumi>

339http;//matemo,fusianasen,net/ :05/01/02 22:08:47
sinpusya<risugumi>

340名無しさん@そうだ選挙にいこう :05/01/02 22:12:02
>>334
vlookupを使用する場合は
給料の右の列に一列挿入して名前のセルを参照すればOk

341名無しさん@そうだ選挙にいこう :05/01/03 01:35:29
>>335
似たような感情を抱いた。
多分「w」が何の意味かわからず>334は使用してるのだろう

342名無しさん@そうだ選挙にいこう :05/01/03 03:29:36
>>336 >>340
ありがと♪

343... :05/01/03 12:50:14
rankをあいうえおのひらがな形式で分けたい場合はどのようにすればよいのでしょうか?教えていただけますか?

344名無しさん@そうだ選挙にいこう :05/01/03 16:57:49
Excel97 + Win2000 です。

オートフィルを使おうと思ってセルのハンドルをドラッグしたらフリーズしてしまい、
強制終了したらこの2日分くらい入力してたデータが消えてしまいました。

作業中の一時ファイルとかどこかに残ってないでしょうか?

あと一定時間ごとの自動セーブとかのオプションはないのでしょうか。

345名無しさん@そうだ選挙にいこう :05/01/03 17:26:35
>>344
強制終了したファイルではなく、新規のエクセルを起動すれば
自動回復なんたらって画面が出た気がする。

それと自動セーブオプションはあります。

ちゃんと答えてくれる人が出てくるまでもう少し様子見した方が良さそうですね。
すみません。

346名無しさん@そうだ選挙にいこう :05/01/03 17:27:45
と、思ったがエクセル97ですか・・・
345の内容はエクセル2002でした。

347名無しさん@そうだ選挙にいこう :05/01/03 17:43:10
その後 Excelのあるフォルダ、マイドキュメント、テンポラリに指定しているフォルダ等
いろいろ調べましたが、それらしいものは見つかりませんでした。

一定時間ごとの自動セーブオプションもExcel97にはなさそうです。

>>345 さんもありがとうございました。


死にたい…

348名無しさん@そうだ選挙にいこう :05/01/03 17:51:57
>>347
97にも自動保存ありますよ
ttp://www.biwako.shiga-u.ac.jp/sensei/kumazawa/tips/excel02.html

349名無しさん@そうだ選挙にいこう :05/01/03 17:55:19
セル内に入力した8ケタの数値のうち、下4ケタで表をソートしたいのですが、こういうソート
方法はありますか?Excel2000を使っています。

350名無しさん@そうだ選挙にいこう :05/01/03 19:16:42
>>348
ツール − アドインから「自動保存」をチェックしたらメニューに出ました。
とりあえずこれからの分は大丈夫になると思います。

どうもありがとうございました。

351名無しさん@そうだ選挙にいこう :05/01/03 21:53:52
>>349
下4桁を作業用セルに書き出してソートするというのは駄目ですかね

352名無しさん@そうだ選挙にいこう :05/01/03 23:57:45
>>349
ワイルドカードを使うとか
?=一文字を表す(?は半角)

8桁で下4桁、例えば●●●●1234という数値を取り出したいなら

????1234

上のように?を4つ入れて下四桁を指定する、という具合です。

353名無しさん@そうだ選挙にいこう :05/01/04 01:17:19
????

354名無しさん@そうだ選挙にいこう :05/01/04 14:07:19
単にケツから4桁取り出せればいいんでは?
それをソートすればOK

355名無しさん@そうだ選挙にいこう :05/01/04 14:24:50
>>354
>>351が既に同じ回答してる。

356名無しさん@そうだ選挙にいこう :05/01/04 20:29:31
検索をし、ヒットしたらそこをアクティブにするというマクロを書きました。
以下のように書いたのですが、うまくいきません。
というのは、セル内に「うんこ」の文字があるのに、検索がヒットしないのです。どこが間違っているでしょうか?

'うんこを検索
Set c = Selection.Find(What:="うんこ", After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False)

'検索がヒットしたらそこをアクティブに
If Not c Is Nothing Then
c.Activate
End If

357名無しさん@そうだ選挙にいこう :05/01/04 20:31:51
>>356
     /)_/)    ( ・質問する人は可能な限り具体的に書いてね。
    < ゚ _・゚> .。oO( ・Excelのバージョン、OSのバージョンも書くとレスが付きやすい。

358356 :05/01/04 20:44:50
>>356です。

ご指摘ありがとうございます。
少し考えをまとめて書き直しますので、またよろしくお願いします<(_ _)>

359名無しさん@そうだ選挙にいこう :05/01/04 21:22:11

うんこの文字を検索し、もしうんこがあったら、そこをアクティブにして、セルの色を変えると
いうことをしたいのです。(100回繰り返しで)
そこでいろいろ教えてもらいながら、以下のようなマクロを書きました。
しかし、うまくいきません。
なぜか、現在アクティブになっているセルのみを検索してしまい、他を検索しないのです。
どこが間違っているのか教えてください。
OS WINXP:エクセルのバージョン 2000 です。

For roop = 1 To 100

'うんこを検索
Set c = Selection.Find(What:="うんこ", After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False)

'検索がヒットしたらそこをアクティブに
If Not c Is Nothing Then
c.Activate
End If

'色を変える
With ActiveCell.Interior
.ColorIndex = 15
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With

next roop

360名無しさん@そうだ選挙にいこう :05/01/04 21:37:50
>>359
うんこ検索部分を

'うんこを検索
If roop = 1 Then
 Set c = Selection.Find(What:="うんこ", After:=ActiveCell, LookIn:=xlValues, LookAt _
 :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
 False)
Else
 Set c = Selection.FindNext()
EndIf

みたいにすればいいかも

361359 :05/01/04 21:46:15
>>360
レスありがとうございます。

あれ?でも、それだと、一回しか(変数roopが1の時のみしか)検索しないことにならないでしょうか?

362名無しさん@そうだ選挙にいこう :05/01/04 21:59:14
>>361
2回目以降はFindNext「次を検索」です

363名無しさん@そうだ選挙にいこう :05/01/04 22:00:17
>>362
おお、そうですか。
よくわからないですが、調べてやってみます。
ありがとうございました。<(_ _)>

364名無しさん@そうだ選挙にいこう :05/01/04 22:39:36
うんこじゃなくてテストとか普通の言葉だったらよかったのに・・・

365名無しさん@そうだ選挙にいこう :05/01/05 04:57:44
http://office.microsoft.com/ja-jp/templates/TC010593781041.aspx?CategoryID=CT010752811041
こんな恥ずかしい質問してもいいかしら・・・
家計簿テンプレ、1月度の数値をクリアする方法って、
その範囲を選択して数値をクリアしないといけないのでしょうか?

366名無しさん@そうだ選挙にいこう :05/01/05 04:59:46
すいません。わすれてください。勘違いしてました・・・。

367名無しさん@そうだ選挙にいこう :05/01/05 06:08:05
何でしたか?

368名無しさん@そうだ選挙にいこう :05/01/05 09:43:31
OSはXP、Excelは2000を使用しています。
Excelで関数を使用しようとすると、強制終了してしまいます。
Fxボタン、=を押しても、挿入→関数を押してもすべて強制終了になります。
どうすればよいでしょうか?
ぐぐっても出てきませんでした。
よろしくお願いします。

369名無しさん@そうだ選挙にいこう :05/01/05 13:25:35
ファイルかレジストリが壊れてるっぽいので
Officeをアンインストしてから、再インストしてみる。 当然アップデートも当てる。
それでだめならOSごと再インスト

370名無しさん@そうだ選挙にいこう :05/01/05 19:21:14
excel2000は「アプリケーションの自動修復」って無かったけ

371名無しさん@そうだ選挙にいこう :05/01/05 20:08:02
Excel2000とWin98SEです。
Excelの使い方についてなんですが、
入力した単語の長さに合わせてテキストOrWeb出力時の列幅を変える方法ってないんでしょうか?
例えば
A     B   C
会社    の   品物
会社のもの 買いモノ品物
と言った場合に
会社の品物
会社のもの買いモノ品物
と出力するようにしたいのですが……
(そのままだと
  会社    の   品物
  会社のもの 買いモノ品物
 となってしまう)

372名無しさん@そうだ選挙にいこう :05/01/05 20:14:23
>>370
あります

373名無しさん@そうだ選挙にいこう :05/01/05 20:15:24
>>371
タブ区切りで出力ってなかったっけ?
今手元にエクセル無いから確認できずのままなんですが。
一度試してみてください。

374371 :05/01/05 21:21:14
すいません、タブ区切りってどういう意味でしょうか?
テキスト(タブ区切り)で出力したんですが、全く状況は変わらず……
(列幅は一定のまま)

375名無しさん@そうだ選挙にいこう :05/01/05 21:35:44
>>368
SPは何?

376名無しさん@そうだ選挙にいこう :05/01/05 21:39:40
>>371
何がしたいのかよく分からない。
入力した単語ってテキストファイルからインポートってこと?
タブ区切りはぐぐれ、すぐ見つかるから。

377名無しさん@そうだ選挙にいこう :05/01/05 22:00:53
>>371
質問の意味もまともに理解できないまま「タブ区切り」と
いってしまいすみません。

371さんのエクセルファイルの中身を
A        B       C
会社      の      品物
会社のもの  買いモノ  品物
を↑こんな感じでテキストファイルに吐き出したいってことで良いのでしょうか?



378名無しさん@そうだ選挙にいこう :05/01/05 22:32:41
OSはWins2000でExcel2000使用です。
Bシートの計算結果をAシートに出力することって可能?
複数のシートの計算結果集計して簡単な決算書作りたいんだけど…

379371 :05/01/05 23:05:22
すいません、わかりにくかったみたいで……
会社の品物
会社のもの買いモノ品物
といったように、続けて出力したいんです

>376
失礼
早合点して、タブキー打ったりしたら、そのポイントで次の列の単語に
直結(間の空欄ナシ)するのかと思いまして……

380名無しさん@そうだ選挙にいこう :05/01/05 23:36:55
マクロを使えば出来るけど
出力したあとに、置換のほうが簡単。

381名無しさん@そうだ選挙にいこう :05/01/06 01:02:23
>371
Sub A列からC列までを結合してテキストに保存()
 Dim file As Integer
 Dim r As Long
 Dim endrow As Long

 endrow = Range("A65536").End(xlUp).Row
 file = FreeFile
 Open "C:\hoge.txt" For Output As #fileno ' ""で囲んだ部分に保存先パスを入力
 For r = 1 To endrow
  Print #file, Cells(r, 1).Value & Cells(r, 2).Value & Cells(r, 3).Value
 Next r
 Close #file
End Sub

こんなかんじでいいんか?

382名無しさん@そうだ選挙にいこう :05/01/06 01:03:34
>>371
そもそも目的はなんなの?
他のセルはそのまま出力したいの?

383名無しさん@そうだ選挙にいこう :05/01/06 01:06:52
すみません、教えてください。

このようなデータがあったとします。

------------------------------------------------
商品一覧表

 コード | 商品名 | 値段 |
-------------------------------
  A001 |  本A | 1000 |
  A003 |  本C | 1280 |
         ・
         ・
         ・
  A004 |  本D | 1480 |
  D005 |  DVDE | 3800 |
  D006 |  DVDF | 4800 |

------------------------------------------------

このデータを印刷した場合、商品が多すぎて1ページ内に収まらず
2ページ以降には見出しが表示されません。
で、ページ設定から行タイトルを指定したのですが、
「商品一覧表」の文字は1ページ目のみの表示としたいのですが
何かよい方法はありませんでしょうか。
※2ページ以降は「商品一覧表」の文字だけ消して空行として印刷したいです。

384名無しさん@そうだ選挙にいこう :05/01/06 09:07:59
>>383
行タイトルに「 コード | 商品名 | 値段 | 」の行だけを指定すればそれでいいのでは?
「商品一覧表」は最初のページにしか出ないと思うけど。

385名無しさん@そうだ選挙にいこう :05/01/06 13:02:21
「商品一覧表」のところをヘッダにしなよ。

386名無しさん@そうだ選挙にいこう :05/01/06 13:45:06
レスありがとうございます。
>>384
見出しだけを行タイトルに指定した場合、2ページ目以降は
紙面上での見出し位置が上に移動してしまい見づらくなるので

1ページ目
------------------------------------------------
商品一覧表

 コード | 商品名 | 値段 |
-------------------------------
  A001 |  本A | 1000 |
  A003 |  本C | 1280 |
------------------------------------------------

2ページ目
------------------------------------------------
(空白行)
(空白行)
 コード | 商品名 | 値段 |
-------------------------------
  A004 |  本D | 1480 |
  D005 |  DVDE | 3800 |
------------------------------------------------

のように印刷したいのですが、いい方法をご存知ありませんか。

>>385
ヘッダにしたのですが、2ページ以降も表示されてしまいます。
1ページ目のみ表示等の条件の付け方が分かりませんので
教えていただけませんか。

387384 :05/01/06 13:51:26
>>386
どうしてもそうしたければ、1枚目と2枚目以降を別々に印刷する。
んで2枚目以降は、ファイル>ページ設定>余白を使って、上部の
余白を大きく取る。くらいしか考え付きません。
あまり意味ないし、面倒なだけのように思いますが。

388385 :05/01/06 14:06:23
>>383
見当違いすまん。
2ページ以降に余白をつくるっていうのがどうもなぁ・・
それなら基本的に384の方法で設定をしておき、とりあえず
まず1ページだけ印刷をして、2ページ以降は余白設定で上の部分を
調整してから一気に印刷をした方がいいんでない?
そのくらいしかわからないなぁ。

389名無しさん@そうだ選挙にいこう :05/01/06 14:15:04
↑の場合は2ページ以降印刷範囲も設定直してね。

390名無しさん@そうだ選挙にいこう :05/01/06 14:22:05
VBAでやればいいじゃん。
その3行をタイトルに設定して、「To:=1(先頭から1頁目まで=1頁目のみ)」を印刷、
次に"商品一覧表"の文字列を削除して、「From:=2(2頁目から最後まで)」を印刷、
で、最後に"商品一覧表"を元のセルに入力。印刷データを2つ送ることになるけど、
よほどショボいプリンタじゃなければプリンタドライバの方で勝手に順次印刷してくれるから。
簡単だからこのくらいのVBAは自分で書こうね。

391385 :05/01/06 14:24:46
思い切り被ってる・・・・
逝ってきます。。

392383 :05/01/06 14:36:39
皆さんありがとうございます。
エクセルの仕様上、印刷を分けたり、
VBAを使う等しか対応できないようですね。
VBAは分からないので、運用でカバーしてみます。
本当にありがとうございました。

393名無しさん@そうだ選挙にいこう :05/01/06 14:38:49
アドバイスお願いします
Win2k,Excel2kの環境で、以下のような部分を持つ表を作っています

データAの合計
データA




データBの合計
データB




以下C、Dと続く


各データの末尾と、データの合計の間は空白を1行はさみます
データの数が一定でないので、合計を求める範囲を可変にしたいのですが、
名前定義やマクロを使わず、各データの合計を求める、もしくは
末尾の行番号を得る方法はありませんでしょうか?


394名無しさん@そうだ選挙にいこう :05/01/06 15:07:13
>>392
遅レスだけど・・・

>運用でカバーしてみます。
賢い人だね。エクセルはじめ、融通気かないソフトやPCに合わさせようとして
時間と労力使うより、人間が融通利かせたほうがホントbetterだと思います。

ちなみに、エクセルには行タイトルもヘッダもすべてのページ一律の概念しかありませんが、
アクセスなら、レポートヘッダとページヘッダと言うように分けて考える事が可能です。

とりあえず、エクセルをベースに考えて
2ページ以降にも"商品一覧表"が入ると、どれが表紙だか分かり難くなると言うのであれば、
自分だったら、ヘッダに "商品一覧表" と "ページ数/総ページ数" の両方を入れるかなと思います。

余計なお世話のレスですみません。


395371 :05/01/06 15:31:04
>381
すいません、マクロの簡単な使い方とかおしえていただけないでしょうか?
ツール→マクロ→VBEEditior
で、Sheet1えらんで上のを貼り付け(出力先だけいじって)ファイルのエクスポート
といった感じでやってみたんですが、
clsファイルをツール→マクロ→マクロ、で選んでも
ファイル名または番号が不正
とでてしまいます
(マクロはほとんどわからないもので……)
あ、あと、これが4列(A列からD列まで)だったらどうなるんでしょうか?
& Cells(r, 4).Valueとかを追加すればいいような気もするんですが、
Range("A65536")もいじらなければいけないような気もして…

>380
出力したあとに、置換って、どういうことですか?

>382
説明難しいんですけど、ABCDっていうファイル名で保存しなければ
ならなかったところを(AC→固定名)Bフォルダ内にD、という形で
保存してしまったため、仕方なくフリーのファイルのリストアップソフト
使ってリスト作って整理しようとしたが、ABCDという形でのリストを
作れるほど細かく出力設定できるものが見つからず、仕方なくExcel
出力し、
A、C列→挿入&置換ですべての行にA,Cを
B列→フォルダ名
D列→ファイル名
と設定して出力、っという苦肉の策を講じたが、
ABB CD
ABBBCD
AB  CD
なってしまう、といった状況なんです

396名無しさん@そうだ選挙にいこう :05/01/06 16:00:34
excel2000を使ってるんですが、
名前ボックスでセルや範囲に名前を付けたものを削除するのって
どうやるんでしょうか?
ヘルプでもどこに解説してあるのか分からないんです。

397名無しさん@そうだ選挙にいこう :05/01/06 16:10:12
>>396
挿入→名前→定義

398396 :05/01/06 16:13:49
あ、ありがとうございます。

まさしく灯台基暮らし…

399名無しさん@そうだ選挙にいこう :05/01/06 16:18:44
>393
「データの合計の間」の行のB列に"任意の区切り文字"を入力。
区切り文字を入れたセルの文字色を白にするか、表示形式を""にする。(又は列ごと非表示)
例えばこんな感じ(実際にはB列の文字は見えないようにする)
    A          B
               A
データAの合計
データA

               B
データBの合計
データB

               C
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
データD

               End

で、合計用の関数はは
データA =SUM(INDIRECT("A"&MATCH("A",B:B)+2&":A"&MATCH("B",B:B)-1))
データB =SUM(INDIRECT("A"&MATCH("B",B:B)+2&":A"&MATCH("C",B:B)-1))
データC =SUM(INDIRECT("A"&MATCH("B",B:B)+2&":A"&MATCH("D",B:B)-1))
データD =SUM(INDIRECT("A"&MATCH("D",B:B)+2&":A"&MATCH("End",B:B)-1))

400名無しさん@そうだ選挙にいこう :05/01/06 16:21:58
>395
Sheet1じゃなくて標準モジュールにコピペ。(標準モジュールが無ければ作成)
で、[ツール] > [マクロ] > [マクロ]で、[A列からC列までを結合してテキストに保存]を選択して[実行]

> & Cells(r, 4).Valueとかを追加すればいいような気もするんですが、
それでOK

> Range("A65536")もいじらなければいけないような気もして…
こっちは最終行を取得するためのものなので、列が増えても関係ない。そのままでOK

> 出力したあとに、置換って、どういうことですか?
テキストエディタやgrepツールで正規表現置換する。
Excelに関係ないしPC使う上で初歩的なことなのであとは自分で調べてね。

401393 :05/01/06 16:34:46
>>399
あ、なるほど。区切り文字で解決出来ますね。
区切り文字の処理は帳票の体裁に応じて考えてみます。
ありがとうございました!

402名無しさん@そうだ選挙にいこう :05/01/06 17:30:55
ロシア人の写真家が撮影した、100年前のカラー写真だって
http://bbs.enjoykorea.naver.co.jp/jphoto/read.php?id=enjoyjapan_12&nid=49755&work=list&st=&sw=&cp=3

403名無しさん@そうだ選挙にいこう :05/01/06 20:59:45
A1にB1*C1の数式を入れてた場合、B列にセルを挿入した場合
C1*D1に自動的に変りますが、B1*C1のままに固定したい時は
どのようにすればよろしいですか?

EXCEL2000です。

404名無しさん@そうだ選挙にいこう :05/01/06 21:29:13
>>403
$

405Thirteen :05/01/06 21:29:20
Thirteen〜副収入総合サイト〜
http://www.geocities.jp/thirteen_tokyo/index.html

406名無しさん@そうだ選挙にいこう :05/01/06 21:30:39
オートシェイプで書いた図形を固定するにはどうすればいいでしょうか?
シートの保護以外の方法を教えてください。
お願いします。

407名無しさん@そうだ選挙にいこう :05/01/06 21:35:39
>403
=INDIRECT("B1")*INDIRECT("C1")

>404
それは絶対参照。
数式セルを移動、又はフィルコピーした際には参照先は変わらないが
参照先セルが移動した場合は参照先が書き変わってしまう。

408403 :05/01/06 21:50:29
ありがとうございます。試しにやってみたら出来ました。
実際は複雑な数式なのでこれからチャレンジしてみます。

409207 :05/01/07 00:02:20
質問です。countif関数で条件が一つしか入れれません。例えば列Aの値が50かつ列Bの値が100であるデータの数を知りたいのですが、どのようにすればよいのでしょうか?

本当に困っています。どなたか教えて下さいm(_ _)m

410名無しさん@そうだ選挙にいこう :05/01/07 00:23:49
> countif関数で条件が一つしか入れれません。
そういうものです。

> 例えば列Aの値が50かつ列Bの値が100であるデータの数を知りたいのですが、どのようにすればよいのでしょうか?
DCOUNT関数を使えばいい。使い方が解らなければヘルプ参照。

411名無しさん@そうだ選挙にいこう :05/01/07 00:40:01
>本当に困っています。どなたか教えて下さいm(_ _)m
これ何かムカツカね?

412名無しさん@そうだ選挙にいこう :05/01/07 00:55:49
いいんじゃねーの? 当に困ってるんだろうから。
俺は逆にOSやExcelのバージョン書かないのがムカついたので
具体的な方法書かずに、関数名だけ答えてみた。

413名無しさん@そうだ選挙にいこう :05/01/07 01:13:43
>>411
むかついたのは良いがイチイチここに書き込むな。
しかも誰かに同意を求める口調で・・・

と、俺のレスに対しても同じこと言われるんだろな。
すみませんm(_ _)m

414名無しさん@そうだ選挙にいこう :05/01/07 04:21:48
EXCEL2003を使っているのですが、
たとえば、ctrl+PageDownで最後のシートまでいったあとに、
さらにctrl+PageDownしたとき、一番最初のシートに戻るような
設定などはありますでしょうか?
そんな機能はないでしょうかね??

415名無しさん@そうだ選挙にいこう :05/01/07 05:13:32
>414
設定は無い。でもVBAなら出来る。

Private Sub Workbook_Open()
Application.OnKey "^{PGDN}", "ループ"
End Sub


Sub ループ()
If ActiveSheet.Name = Worksheets(Sheets.Count).Name Then
Worksheets(1).Select
Else
ActiveSheet.Next.Select
End If
End Sub

416名無しさん@そうだ選挙にいこう :05/01/07 05:20:21
>>415
ありがとうございます。

設定はないですか。
VBAでやるしかないんですか。挑戦してみます。

417名無しさん@そうだ選挙にいこう :05/01/07 07:48:57
オートフォーマットを全体に(ワークシートの左上A1セルの左上)指定してしまったら、ファイルがものすごい大きくなってしまい、
じゃあまた同じ範囲に、オートフォーマット解除かければいいや!!と思ったら、更に倍・・・・
70000KBになってしまったんですが、どうすればよいでしょうか???

418名無しさん@そうだ選挙にいこう :05/01/07 08:50:39
A列にA00001〜G99999の連続ではない数字が入ってます。
F00001〜F99999以外の行を削除するようにマクロを組みたいのですが
教えていただけませんか?EXCEL2000です。


419名無しさん@そうだ選挙にいこう :05/01/07 09:21:45
>417
全てのセルを選択して書式設定を全てクリアすればいいんでない?

>418
Sub A列の1文字目がF以外の行を削除()
 Dim r As Long
 Dim endrow As Long

 endrow = Range("A65536").End(xlUp).Row
 For r = endrow To 1 Step -1
  If Left(Cells(r, 1).Value, 1) <> "F" Then Rows(r).Delete
 Next r
End Sub

↑は先頭がF以外の行を"削除"するので、行の値の削除(消去)なら7行目の最後を
DeleteからClearに書き換え。

420名無しさん@そうだ選挙にいこう :05/01/07 12:00:54
教えてください。1500件くらいのデータにコードを振り分けているのですが、その確認用に
vlookupを振ったコードの隣の列に入れておいて、コードを入れたらその内容が表示されるように
してあります。
先ほどまでは何でもなかったのですが、突然再計算がものすごく時間がかかるようになってしまいました。

リアルタイムで再計算をしなければならないので、手動計算にはできません。

どうしたら再計算がまた前のように早くなるでしょうか?

421名無しさん@そうだ選挙にいこう :05/01/07 12:41:01
環境も原因と成り得ることも書かずに
「突然再計算がものすごく時間がかかるようになってしまいました」
という曖昧な結果だけ書かれても答えようがないよ。

とりあえずOSとExcelのバージョン、ハード構成(CPU、RAM)、
計算に何秒程度掛かるのか、不都合発生前と比べての設定やシートの変更点
くらいは書け。
あ、もちろんOS再起動くらいは試してるよね?

422名無しさん@そうだ選挙にいこう :05/01/07 12:53:53
Excelの表組みのデータをイラストレーターのデータに変換したいのですが、
これって出来ないのでしょうか?。
イラストレーターで最初から作り直さないとダメでしょうか???

423名無しさん@そうだ選挙にいこう :05/01/07 13:06:03
>>421
失礼、取り乱していたモノで(w
winxpに、エクセル2kです。
再起動はやってみました。


424名無しさん@そうだ選挙にいこう :05/01/07 13:09:51
>>423
421の
>とりあえずOSとExcelのバージョン、ハード構成(CPU、RAM)、
>計算に何秒程度掛かるのか、不都合発生前と比べての設定やシートの変更点
に答えるまでは何もレスしないことにする
再起動で治ったら無問題

425名無しさん@そうだ選挙にいこう :05/01/07 13:13:13
>>422
自分で何も調べてないのが見えてムカツク
>>423
(w がものすごくムカツク

426名無しさん@そうだ選挙にいこう :05/01/07 13:15:40
>>424
パソコン自体にはあまり詳しくないのですみません。

OS 名Microsoft Windows XP Professional
バージョン5.1.2600 Service Pack 1 ビルド 2600
システムモデルOptiplex GX280
システムの種類X86-ベース PC
プロセッサx86 Family 15 Model 3 Stepping 4 GenuineIntel ~2994 Mhz
プロセッサx86 Family 15 Model 3 Stepping 4 GenuineIntel ~2994 Mhz
合計物理メモリ512.00 MB
利用可能な物理メモリ169.55 MB
合計仮想メモリ1.69 GB
利用可能な仮想メモリ1.03 GB
ページ ファイルの空き容量1.20 GB

で情報は足りるでしょうか?
ちなみに計算時間は、それまでは、計算させて戻ってくるまで1秒程度でしたが、現在はファイル容量は変わらないのに
20秒以上かかっています。

427名無しさん@そうだ選挙にいこう :05/01/07 13:17:40
>>とりあえずOSとExcelのバージョン、ハード構成(CPU、RAM)、
>計算に何秒程度掛かるのか、不都合発生前と比べての設定やシートの変更点
を書いたら、424が有効な回答を出来るのか、お手並み拝見。

428名無しさん@そうだ選挙にいこう :05/01/07 13:20:36
なんかいらついた人が多いですねぇ

429名無しさん@そうだ選挙にいこう :05/01/07 13:21:06
>>426
タスクマネージャからプロセスを調べてみる
変なのが動いてるわけじゃないなら

SPを当てる
アプリの修復をする
デフラグをする。
メモリを解放する

情報が少なすぎてPCの一般的な処置しか答えられんわ
問題がどれなのか調べなおしてみて。
エクセルなのかOSなのかってことね。

430名無しさん@そうだ選挙にいこう :05/01/07 13:23:56
>>417
Excelは、一旦作ったものを削除してもファイルサイズが減らないことがある。
シート、モジュール、オブジェクトとかね。
元のサイズにするには、新規ブックに同じ物をコピペすればOK。
シート右クリック -> シートの移動/コピーではダメかもしれない。 未確認。

431名無しさん@そうだ選挙にいこう :05/01/07 13:28:39
>>425
失礼しました

>>429
タスクには変なのは見あたりませんでした。
デフラグとアプリの修復をしてみます。
ありがとうございました。

432名無しさん@そうだ選挙にいこう :05/01/07 14:26:30
>>420
vlookupをたくさん使ってる? 
あやしそうな関数をひとつづつValueCopyで数字にして速くなるかやってみれば?
範囲の指定が D:E (行を指定しない) みたいな感じになってない?

シートの下や右の空白を 行や列の削除できれいにして保存して開けなおすと
パフォーマンスが改善する場合があります。
ファイルのサイズも小さくなったりすることもある




433名無しさん@そうだ選挙にいこう :05/01/07 15:35:27
WinXpにExcel2002です。


 あるセルの数式や関数式で、別のセルのもつデータを加工したり、データを入れたりする
 事って出来るんでしょうか?

 たとえば、セル[A1]にある文字の数をLEN(A1)で調べて、その結果をセル[C1]に代入するのを
 セル[B1]に入れたい…と考えてるんですが

434名無しさん@そうだ選挙にいこう :05/01/07 15:59:53
>433
つまり
[A1]文字列
[B1]数式   :=LEN(A1)
[C1]値     :3
って感じにしたいのか?それは関数式では不可能だよ。
数式の結果は必ず数式を入れたセルに返るもの。
VBAでならどうにでもなるけどね。

435371 :05/01/07 17:28:20
>400
すいません、やはり同じエラーが……
ちなみに、デバック選ぶと
Open "D:\hoge.txt" For Output As #fileno
が黄色くなってるんで、ここがおかしいんだと思うのですが……

436名無しさん@そうだ選挙にいこう :05/01/07 17:43:06
winMEのExcel2002です。

A1からA31に日付(1/1から1/31)、
B1からB31にその日のデータが入ってます。
データは毎日入力するので、
別のシートに最新の日付のデータを
取り出したいのですが、そのような関数はありますか。

=関数(B1:B31) とやって空欄でない
一番下の数値を取り出したいです。

437名無しさん@そうだ選挙にいこう :05/01/07 17:46:40
>435
ゴメン、俺が間違ってた。
Open "D:\hoge.txt" For Output As #fileno

Open "D:\hoge.txt" For Output As #file
でよろしく。

438名無しさん@そうだ選挙にいこう :05/01/07 18:00:50
Excel 2003(sp1)を使っています。

折れ線グラフを書いたときに、
X軸にラベルを付けます。
「時間(min)」と。

これを確定すると、
「(時間(min」
となってしまいます。(「)」が「(」となって最初にくる)

あるいは、Y軸にラベルを付けると、
確定したときに、途中で文字が切れてしまっています。

X軸も、Y軸も、ラベルを付けるのがうまくいきません。

これを、きちんとした表示にする方法はないでしょうか。

439名無しさん@そうだ選挙にいこう :05/01/07 18:04:28
>436
今日の日付のデータ
=VLOOKUP(TODAY(),Sheet1!A1:B31,2)

B列で一番下のデータ
=INDIRECT("Sheet1!B"&COUNTA(Sheet1!B1:B31))

シート名(Sheet1)はそっちで書き換えてね。

440名無しさん@そうだ選挙にいこう :05/01/07 18:11:22
>>439
ありがとうございます。
これからやってみます。

441418 :05/01/07 18:26:49
>>419さん
ありがとうございました。他にも使えそうで助かります!

442名無しさん@そうだ選挙にいこう :05/01/07 19:07:57
>>439
ありがとうございました。
上の方法で無事にできました。

443名無しさん@そうだ選挙にいこう :05/01/07 19:24:23
winXPのExcel2000です。

VBAなのですが、ユーザーフォーム内のコンボボックスにデータを
重複させずにリストアップさせる方法にはどうしたらいいのでしょうか?
例として

番号 種別        名前
1   RPG        ファイナルファンタジー
2   アクション     マリオ
3   RPG        ドラクエ

という表があるとして、種別の列をRowSourceに指定すると

RPG
アクション
RPG

となってしまいます。これを

RPG
アクション

と表示したいのですが。

444433 :05/01/07 21:22:41
>>434
そうですか…
ちなみにそのVBAでなら、どういうコードになるんでしょうか?
上記の例でいいです。
ちょっとVBAトライしてみたいです。
けど、コードだけ教えてもらえたら非常に幸いなんですが、、ダメですか?


445初心者 :05/01/08 03:39:02
とても初心者な質問なんでしょうが、こまっています。
いまオフィスXPのExcelを使い問題集を作成しているのですが
見やすいように各セルに四角い枠をつけたいんでのです。
罫線アイコンでセルに一つづつ枠をつけることはできたのですが
いかんせん入力した問題数が多いので、なにかよい方法はありませんでしょうか!?
問題bニ問題、回答の3つを使っております。
ご指導のほど宜しくお願い致します。

446名無しさん@そうだ選挙にいこう :05/01/08 04:51:01
残念だけど質問の意味がよくわからなくて
答えになってないかもしれないけど

Ctrl+Y (Ctrlキー押しながらYを押す)で前回操作の繰り返し

これを利用して、
まず1箇所に枠を付けた後、次からは右手はマウス、左手はCtrl+Y

あと、Ctrlキー押しながらセルを順次クリックすることで
複数セルを選択できるから、それから Ctrl+Y するとか。

447名無しさん@そうだ選挙にいこう :05/01/08 05:47:30
Private Sub Worksheet_Change(ByVal Target As Range)

 If Target.Address = "$A$1" Then
  Range("C1") = Len(Range("A1"))
 End If

 If Target.Address = "$A$2" Or Target.Address = "$B$2" Then
  If Range("B2").Value <> "" Then Range(Range("B2").Value) = Len(Range("A2"))
 End If

End Sub

上の3行はA1に入力した文字列の文字数をC1に表示。A1の内容が変更されたら再計算。B1、C1には数式は入らない。
[文字列][   ][   3]

下の3行はA2に入力した文字列の文字数をB1で指定したセルに表示。
A2又はB2の内容が変更されたら再計算するが、B2が未入力なら再計算無し。(セルアドレス以外を入力するとエラー)
B2を変更すると、新たに指定したセルに計算結果が代入されるが、
前回計算結果を代入したセルの値が残るので、自動で消したければ前回の代入セルをStatic変数に格納してクリア掛けろ。
[文字列][ C2 ][   3]
[文字列][ D2 ][   ][   3]

B1に数式を入力して、その結果をVBAで代入したいなら、
B1に「LEN(A1)=C1」などと入力して、VBAの変数に"LEN"、"A1"、"C1"に格納して計算させればいい。
変数への格納はLen、Mid、InStr、InStrRev、Left、Right、などの簡単な文字列操作関数を使ってB1の文字列をバラせばOK。
この方法なら取り出した関数文字で条件分岐させることでLEN以外の関数にもつかえるけど、関数によって引数の数や意味が違うので
作業は簡単だけど結構面倒くさいのでやりたければ自分で勉強して書いてね。

448名無しさん@そうだ選挙にいこう :05/01/08 11:42:46
初カキコです、よろしくお願いします。
officeXPでウインドウズMeです。

見積書を作っているのですが、数が増えてきてシートをどんどん足して
行きたいところなんですが、既に記入ずみの
ものしかなく、ワークシートのコピーだと数値、数式そのまま
コピーされてしまいますよね?

新しいシートで入力する前に1個ずつ消してかないとだめなので・・
ワークシートを枠、表の形式だけ残して数値のない状態で
コピーはできないでしょうか?

あと、ワークシートすべてを印刷印刷する方法もできればお願いします。


449名無しさん@そうだ選挙にいこう :05/01/08 11:49:35
>>448

メニューの
「編集」→「ジャンプ」→「セル選択」→(たとえば)「定数」と「数値」をクリック
んで、デリートキー。

本来は、ヒナガタのシートを1枚用意して、それをコピーするのがスジだと思うけどね。


後半の質問は。シートを複数選択(shift押しながらシートタブクリック)で印刷するよろし。



450名無しさん@そうだ選挙にいこう :05/01/08 13:49:27
ご丁寧にありがとうございます。

おっしゃるとうり雛形から作るのがスジですよね。

上司にちょくちょく聞かれるのがこれで、おかげで助かりました〜

これからは雛形使うようにそれとなく言ってみますドモデシタ



451名無しさん@そうだ選挙にいこう :05/01/08 15:58:04
低脳な質問で申し訳ないのだが

棒グラフを作った時に
棒グラフの表示の順番(パーセンテージの多い順に上から並べるなど)を
変更するにはどうしたらいいのだろうか・・・・

エクセルの表の順番を入れ替えてからグラフを作ってみたりしたのだが
どうにもこうにもブルドックですorz

452名無しさん@そうだ選挙にいこう :05/01/08 17:24:57
特定のセルの値をファイル名にしたいんですがどうすれば良いんでしょうか?
そのセルの値を変数として取り込んでセーブしようとすると
変数の値ではなくて変数の名前がそのままセーブされてしまいます。

453452 :05/01/08 17:32:25
言葉足らずでした。
変数をファイル名の一部にしたいんですが
例えば変数がExcelなら『2ch Excel スレ』みたいには出来ませんか?



454名無しさん@そうだ選挙にいこう :05/01/08 18:42:45
>>453
何をやりたいのかいまいちわからんが、
=CELL("filename",A1)
としておけば、ファイル[シート名]の絶対パスが取得できる。
それを使いところだけ切り出せばいい。
おいらはそれで見積もり番号をシート名にして使ってるよ。

455名無しさん@そうだ選挙にいこう :05/01/08 19:01:11
>>453
よくわからんがこういうことか?
ActiveWorkbook.SaveAs "2ch"+Range("A1")+".xls"

456433 :05/01/09 01:52:09
>>447
ありがとうございます!
ちょっとこれを機にエクセルでVBA使うの覚える事にします。

457名無しさん@そうだ選挙にいこう :05/01/09 02:33:25
今開いてるファイル名にA1の内容を使いたいってことじゃないの?
別名保存なら出来そうな気はするけど、現在のファイル名を変更なんかマクロでできるの?


458名無しさん@そうだ選挙にいこう :05/01/09 05:59:31
>>451
状況がよくわからないけど、積み上げ棒グラフ?
グラフの棒を右クリックして、データ系列の書式設定の、系列の順序で、
上へ移動とか下へ移動とかは?

複数の棒があるときに、棒ごとに順番を変えるのはできないと思う。
だってドーナツグラフは丸いんだもん。

459451 :05/01/09 12:21:34
>>458
レスサンクス

系列の順序を変更するのではなくて
項目の順序を変える方法がわからないんです

A □□□■■     B □□□□■
B □□□□■  →  A □□□■■
C □□■■■     C □□■■■
            (□・■は棒グラフだと思ってください)

のように変更したいのです

460名無しさん@そうだ選挙にいこう :05/01/09 12:54:45
459は 100%積み上げ横棒グラフ だね。
これだとABCは項目になるね。
元のデータの順を変えれば、グラフに反映されるんだけど、
どうして、451ではダメだったんだろ?
その方法でいいんだけど。

ちなみに、表で上からABCの順にしていたら、グラフでは上からCBAの順になる。
(グラフでは軸に近い方からデータを描いていくみたい)
表でCBAの順にしとけば、グラフはABCになる。
両方の順を一致させるには、縦軸の設定で
「軸を反転する」と「最大項目でY/数値軸と交差する」の両方にチェックすればいい。
蛇足でした。。



461451 :05/01/09 13:12:46
>>460
できました
親切丁寧に教えてくれてありがとう

よーし、がんばるぞー

462名無しさん@そうだ選挙にいこう :05/01/09 14:05:57
WinXP、Excel2002なんですが、VBAでセルの文字列のみをクリップボードにコピーするにはどうすればいいですか?
Range("a1").Copy だとセルのコピーだし、コピーモードを解除するとクリップボードも空になってしまいます。
Excel内で使うならPasteSpecialどうにでもなるんですけどね。
今はCall Shellで、ArgToClpという引数をクリップボードに格納できるツールに対してセルの内容を送ってますが
VBAのみで出来るようにはならないでしょうか?

463名無しさん@そうだ選挙にいこう :05/01/09 18:53:11
>>462
ちなみに、セルのコピーのままだとなにが問題になるんですか?

464名無しさん@そうだ選挙にいこう :05/01/10 02:29:00
>>463
テキストの張り付けが出来るグラフィックエディタやCADに張り付けるとテキストだけではなく余計な修飾や背景色まで張り付けられてしまったり、
( どちらも「形式を指定して張り付け」のような機能があるけど、コレにはショートカットキーが割り当てられてないので使うのが手間 )
クリップボード内の文字を整形するソフトで不都合が出たり
Excelで使う場合でも、例えばA列のセルの文字列をB列のセルの途中に挿入したい場合
( 挿入位置に、「何文字目 」とか「どの文字の後 」等の規則性が無いので編集モードで張り付けるしかない場合 )
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then Target.Copy
If Target.Column = 2 Then SendKeys "{F2}"
End Sub
という感じで操作を簡略化したくても、B列のセルが編集モードになった時点でコピーモードを解除され
クリップボードが空になってしまうので張り付け出来ない・・・・・等々。

必要としない人には問題でも何でも無いんだろうけど俺にとっては問題なので
一応代用策は見つけたけどちょっと重い(というかレスが悪い)から、VBAのみで可能なら教えて欲しいなーと思ったまでで。
変数をクリップボードにコピーとかでもOKなんだけど、Rangeオブジェクト以外にも使えるコピーコマンドって無いんですかね?

465名無しさん@そうだ選挙にいこう :05/01/10 02:52:25
>>464
ここにそのまんまがのってるよ。
ttp://www.tsware.jp/study/vol1/kaibo_15.htm

466名無しさん@そうだ選挙にいこう :05/01/10 03:20:29
>>465
ありがとうございます。
しかしここまで面倒な処理が必要なのか・・・といってもこっちはコピペするだけだけどね。
とりあえずいらないところを削ってみたけど望み通りの動作をしてますです、はい。

467ゴッホ ◆lkGoghDAZs :05/01/10 05:47:20
>>466

クリップボードじゃないけど、似たようなオブジェクトのDataObjectを使うと、

Dim MyData As New DataObject
Public Sub Clip()
 Set MyData = New DataObject
 MyData.SetText ActiveCell
 MyData.PutInClipboard
End Sub

ただ、ユーザーフォームがないと動かないみたいなので、
もし、ユーザーフォームを使用していない場合、
空のユーザーフォームを一つ挿入してください。


468ゴッホ ◆lkGoghDAZs :05/01/10 05:54:57

良く見たら、Newが重複してた。

1行目からNewを削除するか、3行目のSetの行を全て削除してください。

469名無しさん@そうだ選挙にいこう :05/01/10 10:35:23
excel 2000です。 09037080990のような電話番号リストの
エクスポート(CSV)を読み込むと先頭の0が消えます。何か0が
消えないようにする方法はないですか?




470名無しさん@そうだ選挙にいこう :05/01/10 12:09:07
>>469
文字列として読み込んでも?

471名無しさん@そうだ選挙にいこう :05/01/10 13:54:19
「このブックで、これ以上新しいフォントは設定できません。」のメッセについて質問です。
以下、ワークシートA及びBについて比較チェックです。
*グラフ オブジェクトのタイトル→A・B共無し
*同じワークシートにグラフ オブジェクトを貼付→A(2種x16回)B(3種x19回)
*同じワークブック内でワークシートをコピー→A(できる)B(できない。上記メッセ)
*グラフの自動サイズ調整→A・B共無効にしている。
Bは、分割以外に方法は無いですか?サイズは387kb_excel2003です。

472名無しさん@そうだ選挙にいこう :05/01/10 15:03:26
>>469
ファイルの拡張子を.csvから.txtなどに変更してから開く。
または、新しいシートでデータメニューの外部データの取り込みのテキストファイルのインポート。
どちらも、ウィザードでそのデータのカラムを文字列に指定。

473名無しさん@そうだ選挙にいこう :05/01/10 16:33:07
エクセル初心者です。
学校の課題でエクセル使ってなんでもいいから作品をという課題がありました。
エクセル使いこなせなくても作れるものはありますでしょうか?

474名無しさん@そうだ選挙にいこう :05/01/10 16:43:24
煽ってるわけじゃないけど、人に聞くような問題かね?

475名無しさん@そうだ選挙にいこう :05/01/10 16:44:30
>473
課題というのは自分の力でやるものです。
今、他人の力を借りて自分の実力以上のものを提出して評価を得ても
後から追い込まれるのはあなたですよ。

476名無しさん@そうだ選挙にいこう :05/01/10 17:02:32
ページ番号を用紙の右下に印刷したいのですが、
フッタの右端にページ番号を設定すると、用紙の
右端よりかなり内側に表示されます。
右の余白を調整してもフッタの位置は変わらないし・・・。

右端のフッタの位置を、もっと右(印刷できる最大限右端)
にすることは出来ないでしょうか?

エクセルのバージョンは2000です。

既出だったらすみません。


477名無しさん@そうだ選挙にいこう :05/01/10 18:39:02
>473
もう少し待ってればゴッホくんがやってくれますよ。

478名無しさん@そうだ選挙にいこう :05/01/10 20:31:07
Excel2000でデータ入力中、あるファイルにて「問題が発生した為、エクセルを終了します。
ご不便をおかけして申し訳ありません」のエラーが出てしまいました。
保存していてMOにも同じエラーが出ます。
2002か2003だと復旧出来ると聞きますが、漫喫のPCに
フロッピーでデータを持ち込もうと思うのですが如何でしょうか

479名無しさん@そうだ選挙にいこう :05/01/10 20:32:38
追記
その漫喫にEXCEL2003が導入されています。。

480478 :05/01/10 20:34:30
Excelって高いので中古で買いたいのですが
中古PC屋では著作権とかで売れないそうです
ヤフオクとかでも出ますか

481名無しさん@そうだ選挙にいこう :05/01/10 21:20:24
自己責任な

482名無しさん@そうだ選挙にいこう :05/01/10 23:08:21
お聞きしたいのですが、
項目  数
A    500
B 300
A 200
のような表で
項目が「A」の合計を出すときはどうすればいいでしょうか。
簡単な関数でできますか?
環境は2000です。   

483名無しさん@そうだ選挙にいこう :05/01/10 23:14:59
excell2000なんですが、
1077
1078
1079
1077-R
1077-Y
と言うデータが入っている列の書式を文字列にしてから
並び替え(昇順)を行っても上記の並びが変わりません。
1077の次の行に1077-Rが来て欲しいのに。

484名無しさん@そうだ選挙にいこう :05/01/10 23:23:49
EXCEL2003を使っています。ちょっとしたことなんですが。。

1つのブックにシートが複数あり、すべてのシートを印刷するとき、
すべてのシートを選択している状態で印刷ボタンを押すことになって
いますよね。
自分の記憶では、以前、Excel2000を使っていたとき、こんなことが
できなかったと思うのですが、上でのべた機能は、Excel2003以降から
導入された機能なんでしょうか?
もし、Excel2000で同じことができるとすると、どうしたらいいのでしょうか?

485名無しさん@そうだ選挙にいこう :05/01/10 23:28:17
>>484
2000でもできるけど・・・

486名無しさん@そうだ選挙にいこう :05/01/10 23:32:03
>>485
あっ、ほんとですか?
記憶ちがいかも。Excel97だったかもしれない。
・・・うーん、でも、やっぱ2000だったような気がするなあ。。

同じようにシートを全部選択して、印刷ボタンを押しても、
1枚しかプレビューされなくて、すごく困った覚えがあるので。

487名無しさん@そうだ選挙にいこう :05/01/10 23:32:52
>>482
A1〜B3だとしたら
=SUMIF(A1:A3,"=A",B1:B3)

488名無しさん@そうだ選挙にいこう :05/01/10 23:33:46
>>486
次のページとかないか?

489名無しさん@そうだ選挙にいこう :05/01/10 23:34:24
>>483
1077は数値で1077-Rは文字列としてソートされる。
数値は文字列より先になるので、1077を文字として
入力しないとソートできない。'1077 と数字の前に ' を
入れれば文字列になる。
あるいはVBAで強引にするしかないんでは?

490名無しさん@そうだ選挙にいこう :05/01/10 23:35:06
>>487
ありがとうございます。
ちなみに、検索条件が複数でANDやOR条件をつけることはできるでしょうか?

491名無しさん@そうだ選挙にいこう :05/01/10 23:36:15
>>488
そのときは、次のページは押すことができないボタンになっていましたよ。

492名無しさん@そうだ選挙にいこう :05/01/10 23:37:33
>>482
=SUM(IF(B8:B11="A",C8:C11,0))

B列が項目、C列が数でデータが8から11列にあった場合のもの。
入力するときshift+altを押しながらEnterする

493名無しさん@そうだ選挙にいこう :05/01/10 23:37:59
>>486
手元の2000でばっちりできますよ。

494名無しさん@そうだ選挙にいこう :05/01/10 23:38:38
>>478
だめもとでやってみる価値はある。

495名無しさん@そうだ選挙にいこう :05/01/10 23:41:14
>>490
>492を応用する。
てか、sumif覚えるよりこっち覚えれば幾らでも応用できる。

496名無しさん@そうだ選挙にいこう :05/01/11 00:10:24
>>467
ユーザーフォームがなくても参照設定で
MS Forms Object Library
(こんな感じの名前、忘れた)を追加してやればおk

497名無しさん@そうだ選挙にいこう :05/01/11 00:12:53
簡単に出来ると思ったのだが…

 セルで、なんでもいいのでとにかく文字列が
 入っていたら、条件付書式を適用したかったのだが、
 セルの値が="*" の場合。としたのですが、
 上手く行きませんでした。
 どうすれば良いのですか?

498名無しさん@そうだ選挙にいこう :05/01/11 00:18:12
>>497
「空白でない」としたら?

499名無しさん@そうだ選挙にいこう :05/01/11 00:31:22
>>498
どうやって?

500名無しさん@そうだ選挙にいこう :05/01/11 01:42:44
すみません。もしよろしければアドバイスください。
300個くらいComboBoxつくったんですけど

これを処理するのに繰り返し処理使って

neko = array("baka","tako","neko","inu")

for n=1 to 300
sheets(1).ComboBox & n &" .List"=neko
next n

とかで処理できませんでしょうか?
ぐぐったら
Controls("comboBox" & n) とかでましたけど
うまくいかなくて困ってます

お手数ですが、アドバイスをいただけたら幸いです。

501名無しさん@そうだ選挙にいこう :05/01/11 06:39:05
質問なんですが、Excel2002でAlt+Enterでセル内改行された文字列から
VBAで最初の改行位置までの文字数を取得するにはどうすればいいですか?
 一行目
 二行目
という文字列がセルに入力されてた場合、3又は4という数値を取得して、
 一行目a
 二行目
のように1行目の末尾に文字を追加したいのですが
InStrで改行コードを検索しても、改行位置は取得できませんでした。(値は0が返る)
改行位置を取得する部分のコード、又はVBA関数だけでいいのでどうか教えてください。
OSはWindows2000です。


502名無しさん@そうだ選挙にいこう :05/01/11 12:32:55
エクセルが突然使用(操作)不能になることが多く、大変困っています。
対処方法ご存じの方、ご教授願います。

【症状】エクセルを使っていると、ある瞬間からセルが選択されたままの状態が解除出来なくなり、マウスを動かすとその選択範囲が収縮するだけで、クリックが利かなくなる。この症状発生時以外はマウスは正常に作動しています。

【頻度】すぐそうなる時もありますし、しばらくたってからなる時もあり、ランダムに発生します。

【対処】Ctr+Alt+Delの同時押しで何とかエクセルの強制終了は出来ます。以前インストールし直しましたが結果は直っていませんでした。

【環境】WinXPsp1・office2000

503名無しさん@そうだ選挙にいこう :05/01/11 12:56:35
>502
Excelではなくマウスの問題だと思うがそのとき他のアプリは正常にマウス操作出来るの?
その症状が出たとき、キー操作は正常に出来るの?

他のアプリでも同様の症状が出る、又はキー操作は正常、のどちらかに該当するなら
Excelではなくマウス側の問題なのでスレ違い。

Excelのみの症状で、キー操作も出来ないなら
マウスとマウスドライバ、マウスユーティリティー(ボタン機能拡張ソフトやマウスジェスチャなど)の種類、
キーボードとキーボードドライバ、入力拡張(キーマップ変更ソフトなど)の種類を書け。(解らなければ調べること)

504名無しさん@そうだ選挙にいこう :05/01/11 13:02:19
>>501
VBAで取得しないとだめ?
ワークシートのserch関数で取得できるんだけど

505名無しさん@そうだ選挙にいこう :05/01/11 13:08:30
>>497
セルの書式設定の文字列を見てごらん、
文字列を表す記号はどうなってた?

506名無しさん@そうだ選挙にいこう :05/01/11 13:14:36
>>502

F8を押したときのように拡張になるのですね

何も操作しないで、じっと待っていてもなるのか
何かの動作(クリックやセル選択、スクロール等)をしたときになるのか不明

msconfigで常駐ソフトを全て切ってみて、症状が出ないならどれかのソフトが原因


>>503
 
>Excelではなくマウス側の問題なのでスレ違い。

excel使ってて困ってるんだから、そう言わないで対策を考えてあげましょう

507501 :05/01/11 13:17:24
自己解決しました。
InStr(1, Target, Chr(10))

改行文字「Chr(13)&Chr(10)」で検索してましたが
ラインフィード「Chr(10)」で検索すればよかったんですね。

508名無しさん@そうだ選挙にいこう :05/01/11 13:27:10
こんにちは
質問なんですけど
エクセルでマクロ実行後そのシートをコピーして
新しいエクセル立ち上げてそこに貼り付け
保存するとファイルサイズがマクロ付いてないのに異様に
でかいのですが、なんでですか?
そういうもんなんですか


使ってるのはoffice2000です

509名無しさん@そうだ選挙にいこう :05/01/11 14:07:46
>>502です。
>>503さん、>>506さんありがとうございます。
この症状が発生するのは「エクセル」使用中の時のみです。
他のソフトなどの操作時はなったことがありません。
突然ある1つのセルが選択されたまま状態になるので、
マウスを動かせば範囲選択の面積が広がっていくのです。

「何も操作しないで、じっと待っていてもなるのか 」
に関しては普通に作業をしていて突然来る「突発性症状」の為、
何がきっかけになっているかは判断できません。

症状が発生するとクリックが反応しなくなる為、選択を解除出来ないので、
エクセルを強制終了するしか無くなります。
発症すると「保存」も出来ないため、ビクビクしながら使っています。

ちなみにマウスは「エレコム社」の光学有線式です。
キーボードは「NECバリュースター」の純正ワイヤレスキーボードです。



510名無しさん@そうだ選挙にいこう :05/01/11 14:09:08
>>500
Dim mycmb As MSForms.ComboBox
Dim myO As OLEObject
Dim com() As Object
Dim neko
neko = Array("aaa", "baka", "tako", "neko", "inu")

  For Each myO In Sheets("Sheet1").OLEObjects
   If myO.ProgId = "Forms.ComboBox.1" Then
    myO.Object.List() = neko
   End If
  Next

511名無しさん@そうだ選挙にいこう :05/01/11 14:53:31
>509
次にその症状が出た時にキーボードの方向キーを押すとどうなるか試して報告しろ。
これで普通にセル移動が出来ればマウスの問題と断言できる。

> この症状が発生するのは「エクセル」使用中の時のみです。
どのソフトで発症するのかが聞きたいんじゃなくて、発症したときに他のアプリでどうなのかが聞きたいので
これも次回発症時に試して報告よろ。(入力済みのテキストエディタなど右ドラッグのできるアプリで試してね)

> 発症すると「保存」も出来ないため、ビクビクしながら使っています。
自動保存機能使って置け。発症したら自動保存間隔で設定した時間放置してから強制終了させ
再起動してからバックアップファイル読めば最悪の事態だけは免れる。

あと、マウ筋というマウスジェスチャソフトでそういう症状が出ることがあるらしいので、
マウス機能拡張系のソフトを使ってるならそのソフト名を、使ってないなら使ってないと書け。

512名無しさん@そうだ選挙にいこう :05/01/11 15:22:11
>>489
ありがとうございます。
書式を文字列にしても数値であることには変わりが無いってことですね。

513名無しさん@そうだ選挙にいこう :05/01/11 16:25:35
セルの入力モード・編集モードはF2を押すことで、切り替わりますが、
つねに編集モードでセルに入力したい場合、どうやったらいいのでしょうか?
セルにデータを入力するとき、デフォルトは入力モードなので、F2を押さないと
編集モードに切り替わりません。デフォルトで編集モードで入力できればいいなと
思いました。

セルの入力時に、入力モードか編集モードを意識するのがちょっと
面倒だと思ったのと、セルの入力時に、データの打ち間違えが多いので、
それを修正するために、←キーを押したりすると、となりのセルに移動して
しまい、毎回毎回ストレスがたまってしまうため、上記のような質問を
しました。

よろしくお願いします。

514名無しさん@そうだ選挙にいこう :05/01/11 16:37:23
>>502 >>509
当方(Windows2000+Excel2000+Logitech有線マウス(ドライバ9.0))も
その症状の経験あります。
ということで502さんのマシン・ソフト環境だけの問題ではないと思います。

当方も原因がわからず、タスクマネージャから強制終了しています。
んまぁマシンを再起動すると直るし、最近発生してないので原因追求してませんが…
ちなみに私の場合、他のソフト(ウィンドウ)を多数立ち上げた状態で
Excelのみがその症状になるケースが多いような気がします。

515名無しさん@そうだ選挙にいこう :05/01/11 16:40:24
>>511
えらく高飛車な言い方になってるけど
そこまで言っておいて「わからんかった」はないぞ

516 :05/01/11 16:46:04
可哀想な子

517名無しさん@そうだ選挙にいこう :05/01/11 17:13:45
質問です。Excel2000で横軸が日付の棒グラフを作っているのですが
元のデータが
2005/1/11 50
2005/1/13 100
2005/1/14 200
であるとき、このままグラフを作ると
元のデータにない2005/1/12が横軸上に自動的に入ってしまいます。
これを阻止する方法がありますでしょうか?よろしくお願いします。



518名無しさん@そうだ選挙にいこう :05/01/11 17:21:40
>>511>>514>>515さんありがとうございます。

>>511さん
「方向キーを押すとどうなるか」試してみます。
発症中他のソフトの操作には影響ありません。
マウスジェスチャソフトはつかっていません。
今度はマウスも取り替えてみます。

>>514さん
まったく困った症状ですよね!

>>515さん
お気遣いありがとうございます。
でもみなさんに教えていただいてますので助かっております。



519名無しさん@そうだ選挙にいこう :05/01/11 17:47:34
WinXP,Excel2002 です。

VBAで、変数iに1から2000まで値を持たせて、A列の1から2000までのセルが持つ
データの文字数を対応するB列に入れていくといったコードを書くとき、
セル指定に変数を使うのってどう書けばいいんでしょうか?

For i = 2 to 2000
   ・
   ・
   <セルB列(i)行> = LEN(<セルA列(i)行のデータ>)
   ・  ↑
   ・  ↑
NEXT i   ↑
      ↑
     この記述(指定)が分からない…



520名無しさん@そうだ選挙にいこう :05/01/11 17:57:35
>519
For i = 2 To 2000
 Cells(i, 2) = Len(Cells(i, 1))
Next i


Cells(行番号, 列番号)
これはよく使うから覚えておけ。

521名無しさん@そうだ選挙にいこう :05/01/11 18:57:26
>>519

cellsやrangeオブジェクトはVBAの超入門なんだが
何の本も読まずに質問してるのか?

522500 :05/01/11 19:52:35
>>510

ありがとうございます。ありがとうございます。

本当にありがとうございます。


お手数おかけして申し訳なかったです。
めちゃめちゃありがたいです。

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

523519 :05/01/11 21:38:05
>>520
たいへんありがとうデス!
そんなものがあったんですか。
一生懸命 Range( ) の中を試してました。

とりあえず、これからちょっとコード組んでみて今日は帰宅します。


524名無しさん@そうだ選挙にいこう :05/01/11 21:54:43
教えてください!!

Aブックの中のBシートのマクロを実行させ
Aブックの中のCシートをコピーしてAブックの中のDシートに貼り付けたいのですが
Bブックの中のDシート(シート名は同じ)に貼り付いてしまい
更にはそのBブックDシートのマクロが動いてしまい求める数値ではなくなります。

Application.EnableEvents=False
としているのですがBブックの中のDシートのマクロが動くのです。
Sheets("C")Range("A2")=Sheets("D")Range("A2")
としているのですがBブックのDシートに貼り付けられるのです。

根本的に自分は間違っているのでしょうか。悩んでいます。

525名無しさん@そうだ選挙にいこう :05/01/11 22:01:26
>>509
おいらもたまに全く同じ症状になる。
数ヶ月に一回。
OS再起動してみると直っている。
他のアプリは問題なく、キー入力も正常です。
なんなんでしょうな。
ちなみにWinXP+OfficeXPでつ。

526名無しさん@そうだ選挙にいこう :05/01/11 22:13:51
>>524

マクロはAブック内のBシートにPrivate Subで記述してあるマクロですか?
Bブックが勝手に開いてDシートのマクロを呼び出すのですか?

いまいちよくわからないのですが・・orz

527名無しさん@そうだ選挙にいこう :05/01/11 22:16:40
>>525さん
officeXPでもなるんですね!
原因は何なんでしょうね?


528名無しさん@そうだ選挙にいこう :05/01/11 22:20:56
526さん 早速ありがとうございます。
AブックBシートのマクロはPrivateSubに記述してます。
Bブックは勝手に開いたのではなくてOpenの命令をしています。
Bブックの中の項目もAブックのシートに貼り付けなくてはいけないからです。
そのDシートだけが上手くいかないのです。
自分もよくわからずすみません・・orz

529名無しさん@そうだ選挙にいこう :05/01/11 22:57:13
>>527
低スペックPCなのでしょうか?
メモリはいくら搭載してますか?


530526 :05/01/11 22:58:17
>>528

貼り付け前にはAブックがアクティブになってますか?

>更にはそのBブックDシートのマクロが動いてしまい求める数値ではなくなります

Dシート内にWorksheet_ActivateマクロかWorkbook_Openマクロがあるのですか?
起動したときにBブックDシートがアクティブになってませか?

531名無しさん@そうだ選挙にいこう :05/01/11 23:09:25
>>527
同じようなことで悩んでいる人がいるみたいですね。
http://excelfactory.net/excelboard/exgeneral/excel.cgi?mode=all&namber=42753&rev=0

532名無しさん@そうだ選挙にいこう :05/01/11 23:11:36
>>529
256です。
たった今もなりました。
マウスの左右クリック利きません。
あるセルが指定されたまま、マウスを動かせば選択範囲が縮小されるのみです。
キーボードのESCも利きません。
矢印でセルを移動する事も出来ません。
唯一、Ctr+Alt+Delが使えるのみです。
今もその方法で一旦エクセルを強制終了しましたが、
また別のシートを開けても同じ現象のままです。
エクセルが出来ません。
ちなみにインターネットなどには一切影響が出ておらず、
クリックできます。


533名無しさん@そうだ選挙にいこう :05/01/11 23:13:38
>>531さんありがとうございます。
まったく同じ現象です。

534名無しさん@そうだ選挙にいこう :05/01/11 23:15:46
526さん 何度もすみません。
Aブックがアクティブになっています。(会社のPC内なので今確認できないのですがorz)
さては、AブックのDシート は非表示にしているのですがそれは関係あるのでしょうか?!
非表示なのでマクロは探せなくて同名のBブックのDシートを操作しているのでは?!無関係ですか?


535名無しさん@そうだ選挙にいこう :05/01/11 23:21:00
>>531さんのおかげです!
マウスのホイールをクリックしたら直りました!
マウスのハードに問題があったようです!
同じ現象で悩んでおられる全てのみなさんに「朗報」!!


536526 :05/01/11 23:47:33
>>534

>さては、AブックのDシート は非表示にしているのですがそれは関係あるのでしょうか?!

それを早く言ってくだされば・・

対象シートが非表示の場合
sheetsプロパティーのactivateメソッドの場合は同名のシートを、無い(見えない)場合はすぐ後ろのシートが対象に
sheetsプロパティーのselectメソッドの場合はエラーになります

エラーが出ないと言うことはシート選択でactivateメソッドを使用しているものと思われます

シートを表示させる等の対策で希望通りの動作になると思います

537名無しさん@そうだ選挙にいこう :05/01/12 00:29:47
526さんっ!!そういうことだったのですね!!!凄く嬉しいです!!
シート表示させるよう努力します!!!これで眠れそうです。
ありがとございました

538名無しさん@そうだ選挙にいこう :05/01/12 01:17:17
2つのワークシートを、ある列が同値であることを条件に結合させるにはどうしたらいいのでしょうか?
クエリで書くと、
select * from worksheet1 ,(inner join) worksheet2
where worksheet1.A = worksheet2.B
です。

539名無しさん@そうだ選挙にいこう :05/01/12 11:01:38
Excelの初心者ですが
どんな本を読めばいいですか?

540名無しさん@そうだ選挙にいこう :05/01/12 11:12:09
>>539
このスレはちゃんと読みましたか?

541名無しさん@そうだ選挙にいこう :05/01/12 11:59:18
フィルタで質問です。
↓のような表があって

スポーツ|参加者
テニス|A
   |B
   |C
柔道 |B
   |E

ここで、フィルタ機能を使い柔道を選択すると
BとE両方の行が表示されるようにしたいのですが、どうすればいいですか?
Bしかでてきません・・・
Eの横にも柔道を入れろというのは無しでお願いします。

542名無しさん@そうだ選挙にいこう :05/01/12 12:03:21
>>541
>フィルタ機能を使い
>Eの横にも柔道を入れろというのは無しでお願いします。
んじゃ、無理デツ。
物にはルールつうのがありますんで。

543名無しさん@そうだ選挙にいこう :05/01/12 12:26:39
>>541
素人の発想なんだけどさ、
「E」の横のセルにも、「柔道」と入力されていれば、「柔道」で
フィルタしたときに「B」と「E」が表示されるんじゃないの?
「E」の横のセルの「柔道」のフォントを白にしたら、セルに埋もれてみえないと
思う。
あるいは、別な方法で見えないようにすることができるんじゃないかしら。

あんまり、スマートなやり方じゃないけど、馬鹿でかいファイルではないん
だろうし、フィルタするために無駄なデータがあってもいいと思うよ。

と一生懸命マジレスしてみました。

544名無しさん@そうだ選挙にいこう :05/01/12 12:30:38
>541
> Eの横にも柔道を入れろというのは無しでお願いします。
「スポーツ」列に今の空欄に文字を入れるとどんな問題があるの?
見栄えの問題だけなら白文字で入れればフィルタには引っかかるよ。
VBA組めば全ての空欄に白文字で項目入れるのは一発だし。
今空欄になってる部分に文字を入れると見栄え以外の不都合があるなら
具体的にそれを書いてみな。

又は「スポーツ」がA列で「参加者」がB列ならC2に
=IF(A2="",C1,A2)
って入れて下方向にフィルコピーして、C列でフィルタ掛ければ?

545名無しさん@そうだ選挙にいこう :05/01/12 12:34:58
質問の仕方、少しは反省した? 
Eの横には柔道入れる。BCの横にもテニス入れとく。
上の例が、A1からB6にあるとしたら、A2:A6を選択して条件付き書式。
「数式」が「=A2=A1」←このとき$は付かないように、書式で文字フォント「白」。

これで、本当は入っているが表示上は見えない。
でも、入ってるから、オートフィルタに反応する。
新規を入力する時もちゃんとスポーツ名入力しろ、見えないからって忘れるな。
条件付書式は下の方まで余裕を持って設定しとけ。

546名無しさん@そうだ選挙にいこう :05/01/12 12:37:14
>>545
なんで、おまえいばってるの?
質問のし方の反省って、どこでだよ。

547名無しさん@そうだ選挙にいこう :05/01/12 12:55:11
でもさぁ、威張ってるけど結構親切なレスにも思えるような。。。

548名無しさん@そうだ選挙にいこう :05/01/12 15:48:15
545のレス自体は親切なんだけど
最後の2行で全てぶちこわし

入力しろ→入力汁
忘れるな→忘れるなよ
設定しとけ→設定しとけよ

って書けば多少はやわらいだはず

549名無しさん@そうだ選挙にいこう :05/01/12 15:59:50
>>517
グラフウィザードの3手順目ぐらいの
タイトルなどの設定をするところで、
X軸を「自動」を「項目」に変更する。
作ってしまったグラフでも、グラフメニューから変更できる。

550名無しさん@そうだ選挙にいこう :05/01/12 16:00:27
>>545はこのスレでときどき、あらわれる変なやつだろw
>>545みたいなタイプに遠慮していると、どんどんつけあがるだろうよ。


551名無しさん@そうだ選挙にいこう :05/01/12 16:05:36
初心者なんですが、ちょっと質問させてください。

  A
1 安部
2 池田
3 宇川
4 江口
5 織田
6 加藤
・  ・
・  ・

みたいなデータを

  A   B   C
1 安部 池田 宇川
2 江口 織田 加藤
・  ・   ・   ・
・  ・   ・   ・

というふうに、列を振り分けるにはどうしたら良いんですかね?

552名無しさん@そうだ選挙にいこう :05/01/12 16:17:07
データ部分をコピーして、D1あたりで
形式を選択して貼り付け、「行列を入れ替える」にチェックしてOK

データが横並びなったら、元の縦データは消して良し。
A1=D1
A2=G1 と入力
上の2行を選択して、C列までオートフィル
次にA1:C2を選択して、下に必要なところまでオートフィル

553名無しさん@そうだ選挙にいこう :05/01/12 16:21:57
???

554名無しさん@そうだ選挙にいこう :05/01/12 16:27:07
>>551
作業列を作って1,2,3の番号振ってフィルタかけて別シートにでもコピペ

555名無しさん@そうだ選挙にいこう :05/01/12 16:27:57
>>552
Sheet1のA1から縦に入力されているものを
Sheet2のA1から3列にコピーする。

Dim i As Integer
i = 1
Do
 Sheets("Sheet2").Cells(((i - 1) \ 3) + 1, ((i - 1) Mod 3) + 1) = _
   Sheets("Sheet1").Cells(i, 1)
 i = i + 1
Loop Until Cells(i, 1) = ""


556552 :05/01/12 16:31:44
最後の行、訂正しまつ
誤:A1:C2
正:A1:C3

557名無しさん@そうだ選挙にいこう :05/01/12 16:41:47
>新規を入力する時もちゃんとスポーツ名入力しろ、見えないからって忘れるな。
忘れちゃいそうな人にはこれ。

Private Sub Worksheet_Change(ByVal Target As Range)
 Dim r As Long
 Dim endrow As Long
 
 Application.EnableEvents = False
 Target.Font.ColorIndex = 1
 endrow = Range("B65536").End(xlUp).Row
 For r = 3 To endrow
  If Cells(r, 1) = "" Then
   Cells(r, 1) = Cells(r - 1, 1)
   Cells(r, 1).Font.ColorIndex = 2
  ElseIf Cells(r, 1) = Cells(r - 1, 1) Then
   Cells(r, 1).Font.ColorIndex = 2
  ElseIf Cells(r, 1).Font.ColorIndex <> 1 Then
   Cells(r, 1) = Cells(r - 1, 1)
   Cells(r, 1).Font.ColorIndex = 2
  End If
 Next r
 Application.EnableEvents = True
End Sub

558名無しさん@そうだ選挙にいこう :05/01/12 16:42:10
>552
Sub A列を3列に振り分け()
 Dim r As Long
 Dim endrow As Long
 
 endrow = Range("A65536").End(xlUp).Row
 For r = 1 To endrow
  Cells(((r - 1) \ 3) + 1, ((r - 1) Mod 3) + 1) = Cells(r, 1)
 Next r
 Range(((endrow - 1) \ 3) + 2 & ":" & endrow).Clear
End Sub

559名無しさん@そうだ選挙にいこう :05/01/12 16:59:50
>>552
555さんのは別シートに書き出す方法
558さんのは最後に元データを消す方法

元データを書きながら消すのであれば↓こうなる

Sub 三列に振分()
Dim j As Integer
j = 1
Do
  Cells(((j - 1) \ 3) + 1, ((j - 1) Mod 3) + 1) = Cells(j, 1)
  If i > 1 Then: Cells(j, 1).Clear
  j = j + 1
Loop Until Cells(j, 1) = ""
End Sub

どれでも結果は一緒だな

560名無しさん@そうだ選挙にいこう :05/01/12 17:12:58
???

561名無しさん@そうだ選挙にいこう :05/01/12 17:42:52
去年の出納帳を作ったのですが、後で確認するとすべて2005年になっていましたorz
これを手っ取り早く2004年にするのはどうすればいいでしょうか?
セルが全て2005/1/23みたいになってしまっているのです。
お願いします。

562551 :05/01/12 18:15:27
みなさんレスありがとうございます。
>>552さんのやり方を試したのですが「行列を入れ替える」では254行までしか
ペーストできないみたいでした。これは仕様なんですかね?

ちなみに>>555さんのスクリプトが全く判かりません。
せっかくのレスを生かしたいので、マクロ勉強して出直してきます。

563名無しさん@そうだ選挙にいこう :05/01/12 18:19:03
作業列(行)を挿入して、
直したい日付がA1にあるとしたら、↓のように式を入れる
=DATE(YEAR(A1)-1,MONTH(A1),DAY(A1))
これを必要な部分までオートフィル。
直った日付をコピーして、元の場所に値貼り付け。
作業列を削除。

去年が閏年でなかったら、もっと簡単だったんだけどね。
VBAがよかったら、そうレスすると誰かコードか良くてくれるよ、きっと。


564名無しさん@そうだ選挙にいこう :05/01/12 18:19:48
>>561

置換で
検索する文字列 2005
置換後の文字列 2004

じゃだめ?

565563 :05/01/12 18:23:46
日付も置換の対象になるんだ!
本体がシリアル値だから、無理だと思ってた。
勉強になったよ、d。

566名無しさん@そうだ選挙にいこう :05/01/12 20:16:47
教えていただきたいのですが… OS:xp  Ver.2000

ファイル1
   A       B     C      D         E
1 伝票番号 店コード 発注日
2 0123    01     1/1
3 0124    01     1/1
4 0125    02     1/1

ファイル2
   A      B     C       D         E
1 伝票番号 行数  商品名
2 0123    1    ウーロン茶
3 0123    2    緑茶
4 0123    3    コーヒー
5 0124    1    緑茶
6 0125    1    緑茶
7 0125    2    ウーロン茶
上のような二つのファイルがあるとして、
ファイル1の、A列"伝票番号"、B列"店コード"を参照して、
ファイル2のD列"店コード"を作り、そこに数値を表示させたいのですが。






567566 :05/01/12 20:17:14
↓こんな感じで。
   A      B     C       D         E
1 伝票番号 行数  商品名     店コード
2 0123    1    ウーロン茶   01
3 0123    2    緑茶       01
4 0123    3    コーヒー     01
5 0124    1    緑茶       01
6 0125    1    緑茶       02
7 0125    2    ウーロン茶   02
どなたかご存知であれば、教えて下さい。お願いします。

568561 :05/01/12 20:21:24
>>564
そんな単純なこと思いつかなかったorz
ありがとうです。

569561 :05/01/12 20:44:31
出来ると思ったのですが、、、うまく出来ない。
どうすれば、、、、お願いします。

570名無しさん@そうだ選挙にいこう :05/01/12 20:45:36
「ファイル1」はファイル名だよね。2つのファイルは開いといてね。

ファイル1のデータ部分に名前を定義する。名前を「リスト」としたとして
D2=VLOOKUP(A2,ファイル1!リスト,2,0)
式を下にオートフィル。

571名無しさん@そうだ選挙にいこう :05/01/12 21:05:00
どういう方法でもよいのであれば、

366(昨年の総日数)を引いてみるのはいかがでしょうか?

例 

シリアル値  38375 -  366  =  38009

日 付   2005/1/23 - 昨年の総日数 = 2004/1/23

572名無しさん@そうだ選挙にいこう :05/01/12 21:09:38
去年はうるう年だから、1〜2月は366なんだけど、
3月以降は365なんだよね。

>569
どういう風にうまく出来なかったのか、書かないと分からないよ。

573名無しさん@そうだ選挙にいこう :05/01/12 21:13:20
教えていただけますか?
 OS:xp  Ver.2000
一つ目のワークブックの名前を取得しA1のセルへ表示させたいのですが
Range("A1").Value=Workbooks(1).Name
としたらブック名だけ表示されます。
希望としてはドライブ名から表示させたいのです。
何か方法はあるのでしょうか。お願いします。
_| ̄|.............○)) クビになる悪寒がします・・

574名無しさん@そうだ選挙にいこう :05/01/12 21:17:26
>>573
Workbooks(1).fullname
これでどう?

575561 :05/01/12 21:21:16
すみません。書式設定で2005を出したのですが、検索でひっかからなかったり、数個しか検出しないのです。置き換えても
変わらなかったりです。ヘッポコです。

576573 :05/01/12 21:25:40
>>574
+   +
  ∧_∧  +
 (0゜・∀・)   で、できました!!!クビになるのがまぬがれました
 (0゜∪ ∪ +        
 と__)__) + 嬉しくて何度もマクロをクリックしております
ニコニコテカテカです ありがとうございました

577名無しさん@そうだ選挙にいこう :05/01/12 21:34:01
>>575 書式は使わない。

「検索と置換」のダイアログで「置換」タブ
検索する文字列「2005」 書式セットなし
置換後の文字列「2004」 書式セットなし
「すべて置換」

578561 :05/01/12 21:39:12
>>577
ありがとうございます!!
難しく考えすぎてました。感謝します!

579566 :05/01/12 21:49:59
>>570
出来ました!ありがとうございました。

580名無しさん@そうだ選挙にいこう :05/01/12 22:19:00
>>541
返事ないのん?


581名無しさん@そうだ選挙にいこう :05/01/12 22:32:34
( ゚д゚)ノ ハイ!質問!ですが
ドロップダウンリストを設定したとき、リストに無いものを入力する方法ってあるのでしょうか?

582名無しさん@そうだ選挙にいこう :05/01/12 23:08:37
>>581
エラーメッセージを表示させないとかじゃだめかな?

583名無しさん@そうだ選挙にいこう :05/01/12 23:13:11
そのドロップダウンリスト、どうやって設置したヤツ?

584名無しさん@そうだ選挙にいこう :05/01/12 23:22:57
573ですorz
再び教えてくださいませ
A1には先程教えて頂いたドライブ以下のFullNameが入ってます
それを変数としました
Dim ブック名
ブック名 = Worksheets("ファイル名").Range("A1")
その変数を用いてコピペをしたいのですが
以下の文では真っ赤になって受け付けてくれません
ブック名 "&" Worksheets("Sheet1").Range("B1").Copy
ブック名 "&" Worksheets("Sheet2").Range("B1").PasteSpecial
先に進めない私にお力をお貸し下さい



585名無しさん@そうだ選挙にいこう :05/01/13 00:06:16
>>584
なんかすごい効率が悪いような気がするけど。
A1にあるフルパス名と、アクティブなブックはちがうものなのかな?
とりあえずこんなもんでどうでしょう?
VBAの本読んだほうがいいと思うよ。

Dim fn As String
fn = Dir(Range("A1").Value)
Workbooks(fn).Worksheets("Sheet1").Range("B1").Copy


586名無しさん@そうだ選挙にいこう :05/01/13 00:51:29
>>585
      。 ◇◎。o.:O☆οo.
       。:゜ ◎::O☆∧_∧☆。∂:o゜ 始めたばかりで疑問だらけでしたが
       /。○。 ∂(´∀`)O◇。☆
     /  ◎| ̄ ̄∪ ̄∪ ̄ ̄ ̄|:◎: 助けてくださって救われました
    /    ☆。|   ありがとう   |☆
  ▼       。○..io.。◇.☆____.| 。.:
∠▲―――――☆ :∂io☆ ゜◎∂:.   VBAの本もまだまだ理解できませんorz
                           わかりやすい本がないかなー・・



587名無しさん@そうだ選挙にいこう :05/01/13 01:04:59
理解力が有ればWeb上の情報だけで事足りる。
理解力がなければどんな丁寧な解説本読んでも無駄。

588名無しさん@そうだ選挙にいこう :05/01/13 01:14:07
名文でございます
肝に銘じてがんがります 残念ながら頭悪過ぎですが(ナキ

589581 :05/01/13 07:32:27
>>582
それが普通早いですかね。
>>583
データの入力規則から設置です。


590名無しさん@そうだ選挙にいこう :05/01/13 08:12:11
>>587
ちょっとキツ杉だろ

プログラミングやコーディング環境に多少の下地知識があればWeb上の情報だけで事足りる。
コンピュータに係わるいろんな基礎知識が乏しい、特に開発環境の概念みたいなのを知らないと
どんな丁寧な解説本読んでもなかなか十分な理解は難しい。


591名無しさん@そうだ選挙にいこう :05/01/13 09:38:36
簡単な質問ですみませんがシートの背景色を削除するのはどうやるのでしょう?

592名無しさん@そうだ選挙にいこう :05/01/13 10:15:10
挿入→シート→背景色の削除


593名無しさん@そうだ選挙にいこう :05/01/13 11:04:45
エクセルにおいて、エクセルの上のところで表示されている
「セルの色の選択」ボタンを選択をするショートカットキーはありますか?
(「セルの色の選択」ボタンとは、
「B」や「I」、「U」などのボタンと同じならびにあるボタンです。)

594名無しさん@そうだ選挙にいこう :05/01/13 11:30:45
>593
「塗りつぶしの色」のこと? それとも「フォントの色」のこと?
まあ、どちらにしてもセルの書式設定なのでショートカットキーは「 Ctrl + 1 」
ドロップダウンの色設定ダイアログだけ呼び出したいならVBAで設定してね。

595名無しさん@そうだ選挙にいこう :05/01/13 12:09:50
すみません質問させてください
以下現象
1.VBA入りのExcelファイルをネットワーク経由で71ファイル(元は同じファイル(仮にAとする)コピーで71個にした)を開こうとした
2.メモリ不足ですと言われた。(メモリは1024搭載)
3.一度にファイルを開こうとしているためメモリ不足のダイアログが何度も表示されるためPCを強制終了した
4.その後、他のVBA入りのファイルに関しては以前同様の動作をするが、Aを元にコピーして作成したどのファイルを
  開く際にも20秒ぐらいかかる(ローカルドライブにある場合も)

これらの現象に対して解決策として
1.Officeのアンインストール
2.Officeのインストール

を行いましたが改善されません

質問は2点です
1.Officeの再インストールを行った際にツールバーの設定などが引き継がれているのですが、レジストリ等に
 情報が残っているのでしょうか?これも消してインストールし直し対のですがどうすればよろしいでしょうか?

2.ファイルを開くのに時間がかかる現象を何とか直せないでしょうか?(OS再インストール以外の方法で)

申し訳有りませんが宜しくお願いいたします


596名無しさん@そうだ選挙にいこう :05/01/13 12:11:38
>>594
「塗りつぶしの色」のこと? それとも「フォントの色」のこと?
塗りつぶしの色のことです。(セルの塗りつぶしの色。)
標準でそういうショートカットキーはないですか。
セルの書式設定からだとたくさんキーを打たないと目的の色に設定するのが
大変ですね。。
ちなみに、VBAを使えということですが、どのような
プログラムか教えていただけないでしょうか。

597名無しさん@そうだ選挙にいこう :05/01/13 12:13:58
>>593

VBA使わなくてもできるよ。
ツール→ユーザー設定 で、
ショートカットのカスタマイズ可能。



598名無しさん@そうだ選挙にいこう :05/01/13 12:49:16
>>597
エクセルでショートカットキーのカスタマイズなんてできるのですか?
ヘルプでショートカットキーで検索しました。
他のオフィスソフトには、[ボタン名と一緒にショートカット キーを表示する] チェック ボックスが
あるみたいですけど、エクセルにはありませんが
具体的にどのように変更するのか教えていただけませんか?

599名無しさん@そうだ選挙にいこう :05/01/13 13:45:32
>>598

ショートカットキーだったのね?
ならVBA使わんと無理。
俺の勘違い、ごめん。



600名無しさん@そうだ選挙にいこう :05/01/13 13:52:16
> ちなみに、VBAを使えということですが、どのような
> プログラムか教えていただけないでしょうか。
Application.OnKeyに適当なキー設定して、
そのキーで呼び出すプロシージャで「塗りつぶしの色」を呼び出せばOK
これで解らなければ後は自分で調べてね。

601名無しさん@そうだ選挙にいこう :05/01/13 14:02:41
セルの中にある文字列には、セルの書式でフォント色指定する以外に
直接セル内データの特定文字別に色指定出来るけど、これを自動でやる
関数ってあるのかな?
ちなみにVBAでも操作可能なんだろうか?
ヘルプみもまくってそれらしい事描いてある場所不明だし

602名無しさん@そうだ選挙にいこう :05/01/13 14:06:56
>601
関数では不可。VBAなら可能。
VBAでのやり方解らなければ「マクロの記録」で記録されるから
それから不要な部分消せばいい。

603517 :05/01/13 15:07:56
>549
ありがとうございます。助かりました。

604名無しさん@そうだ選挙にいこう :05/01/13 16:27:02
グリッドが無いところがあるのですが、どうやったら元に戻りますか?

605644 :05/01/13 17:22:58
自己解決しました。すみません。

606名無しさん@そうだ選挙にいこう :05/01/13 18:59:13
Excel95w です。
全く初心者的な質問だと思いますが、よろしくお願いします。

シートAのデータに列Aがあり、一意の番号とします。
それでシートBでその番号を指定して、シートAの各行からデータを
引っ張ってくる(自動入力させる)ことはできるんでしょうか。

こういうのはリレーショナルデータベースを使わないと
無理なんでしょうか。

607名無しさん@そうだ選挙にいこう :05/01/13 20:01:56
>>606
VLOOKUP関数で出来るが、多用すると重くなる。
VBAならイベントマクロでできる

608名無しさん@そうだ選挙にいこう :05/01/13 21:52:42
こんな素晴らしい関数があるとは。
多用はしないので、これで十分です。

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

609名無しさん@そうだ選挙にいこう :05/01/13 22:35:57
ALL'!$D$3:$D$65535これってどういう意味?

610名無しさん@そうだ選挙にいこう :05/01/13 23:06:18
>>609
VBAのコードの一部だとしたら
ALLっていうプロシージャかなにかがどっかにないか?

611名無しさん@そうだ選挙にいこう :05/01/14 02:42:50
質問です。教えてください。

PDFファイルから文字列をコピーし、Excelのセルにペーストしようとしています。
コピーした文字列が2行以上にわたる場合でも1つのセルにペーストしたいのですが、
Excelは縦方向に隣接したセルに別々にペーストしようとします。

ペースト内容に改行コードが含まれているからなんでしょうが、これを回避する方法は
ありませんでしょうか?

よろしくお願いします。使用しているのは、Excel2003です。

612名無しさん@そうだ選挙にいこう :05/01/14 02:44:43
>>611
数式バーにペーストする。

613名無しさん@そうだ選挙にいこう :05/01/14 03:10:33
>>612
をを、できました。ありがとうございました。

614そびと :05/01/14 04:35:12
九九の表を作るときに、
相対参照を使ってオートフィルで一個の数式のみで完成することができる。
ってことを学んだんですが、
その後、例えば2×3と3×2は一緒だから片方消したい。
などというとき一個の数式で完成させるにはどうしたらいいでしょう?


615名無しさん@そうだ選挙にいこう :05/01/14 04:57:58
>614
なんか意味不明だが積算対象が反転したものを同一と見なして消したいなら
九九表では「1x1=1」から「9x9=81」まで線を引き
その線に対して左右対称になるので、そのどちらかを消せばいい。
結果的には
  1  2  3  4  5
1 1  2  3  4  5
2   4  6  8 10
3     9 12 15
4       16 20
5          25
こんな感じになるけど、それを数式でやりたいなら
=IF(B$1<$A2,"",B$1*$A2)
をB2に入れてフィルコピーすればいい。左下ではなく右上を消したいなら < を > に書き換え。

616そびと :05/01/14 05:09:56
すごいです!これじゃ伝わらないなと思いつつ
他にどう言っていいかわからなかったんでこんなんだったんですが
聞きたいことドンピシャです。
やばいありがとうございます

617名無しさん@そうだ選挙にいこう :05/01/14 10:42:19
困っています。

メニュバーやいろいろなところを
むやみに触ってしまって(どこをどう触ったのか覚えていないです)、
「シートの見出し」の部分が少ししか見えなくなりました。
元の大きさに戻したいのですが、どうすれば良いのでしょうか?
お教え下さい。

618名無しさん@そうだ選挙にいこう :05/01/14 10:53:16
教えてください。
WindowsXPにExcel2002です。

VBAで、2〜35000行までのB列にある社名に"(株)"があるかどうかのチェックを
For文で作っているのですが、処理中に現在の処理行の番号をタイマーカウンターみたいに
表示する方法ってどうするんでしょうか?
MsgBoxでやってみたら、その都度表示して[OK]ボタンを押さなければならなくなって困りました。


619名無しさん@そうだ選挙にいこう :05/01/14 11:36:08
-10,086円
29,917円
4,957円

この様な列をサム関数で計算したいのですが"円”が入っているために
文字列と認識して結果が0になります。
書式設定などで"円”を除いて数値をして認識させる方法はありますか?


620名無しさん@そうだ選挙にいこう :05/01/14 11:40:15
>>617
シート見出しが横方向のスクロールバーの下に隠れている状況と思われ。
マウスポインタが←||→になるように、スクロールバーの左端にマウスを合わせ、好きな位置まで右にドラッグ。


621名無しさん@そうだ選挙にいこう :05/01/14 11:43:14
>>619
書式設定では無理。

メニューの「編集」−「置換」で
検索する文字列 「円」
置換後の文字列 ブランク(何も入力しない)


622名無しさん@そうだ選挙にいこう :05/01/14 11:45:06
>>619
円を空欄で置換したら?

623名無しさん@そうだ選挙にいこう :05/01/14 11:56:43
>>619
円を表示したまま計算したいなら
>>621-622をやってから
セルの書式設定>ユーザー定義で「#,##0"円"」にでもすればいよ

624619 :05/01/14 12:17:56
レスどうも。
空白置換で問題なく出来ました。
引用元に"円"が入っているので貼り付けした時に判別してくれるのがベストなんですが
やっぱ、一旦貼り付けて置換としないと無理なようですね。
とりあえずありがd。


625名無しさん@そうだ選挙にいこう :05/01/14 12:18:35
セルの値をテキストボックスにリンクする方法はありますか?

626名無しさん@そうだ選挙にいこう :05/01/14 12:28:15
>>624
引用元からリンクしてるなら、
=VALUE(LEFT(A1,LEN(A1)-1))
手でコピペしてるなら、マクロか、作業列作って上の式を入れて、それを計算に使う。

>>625
テキストボックスを選択したら、数式バーに =A1

627名無しさん@そうだ選挙にいこう :05/01/14 12:31:53
>618
For カウンタ変数 = 2 To 35000
 (株)のチェック処理
 Application.StatusBar = カウンタ変数
Next カウンタ変数

これでステータスバーに処理中の行を表示できる。
MsgBoxではボタン確認無しのものは用意されてないから
どうしてもMsgBoxみたいな感じがよければ自分でフォーム作るしかないよ。

628名無しさん@そうだ選挙にいこう :05/01/14 12:33:31
626 助かりました。有難うございました。

629名無しさん@そうだ選挙にいこう :05/01/14 13:07:44
質問です。
オフィス2000を使っています。
OSは98SEですが、そのPCで作成したエクセルファイルを他のPCで開こうとした際に「ファイルエラー:データが失われた可能性があります」と出てしまいます。
それで何度かOKを押すと「メモリ不足です」と出て何とか開くことはできます。
どうしたらエラーにならずに開くことが出来ますか?
ちなみに他のPCはOSがNT4.0でエクセルは2000です。

630名無しさん@そうだ選挙にいこう :05/01/14 13:29:54
>>629
そのファイルのサイズは?
そのファイルにだけ起こる現象?
それとも、色々なEXCELのファイル全てで同じですか?

あと、98SEのPCで開くときは問題なし?


631名無しさん@そうだ選挙にいこう :05/01/14 14:06:10
教えて下さい。

セルに
='[File1.xls]Sheet1 '!$A$1
として違うファイルの値を参照してるのですが、この書式がいっぱいあって
かつ、しょっちゅう参照ファイルが変わります。

普段は「置き換え」でFile1.xlsをFile2.xlsなどに全て置き換えてますが、大変なのでFile1.xlsの部分を
別のセルに書いて、その文字列を基に参照できないでしょうか?
可能ならどのような書式にすればいのでしょうか?

Excelは2003です。

632名無しさん@そうだ選挙にいこう :05/01/14 14:12:12
>>631
INDIRECT関数使うがよろし
HELP見てごらん

633629 :05/01/14 15:02:40
>>630
すみません。
会社のPCは全4台です。
ファイルのサイズは614KB
そのファイルだけに起こる現象で、作成した98SEのPC以外は全てNT4.0です。
ちなみにメモリは全て128MBです。
追加の現象としては、先に書いたように「メモリ不足です」でその画面は出せるのですが、OKで抜けたあと表に入力しようとすると同じく「メモリ不足です」とでます。
3台ともです。
2回続けると「エラーログを作成しています」とでて、画面が閉じてしまいます。

634名無しさん@そうだ選挙にいこう :05/01/14 15:09:04
>>633
とりあえずSP3あててみれば?

635631 :05/01/14 15:09:09
>>632
ありがとうございます。

B1に対象となるファイル名を書き込んで
=INDIRECT("'["&INDIRECT("$B$1")&"]Sheet1 '!$A$1")
こんな感じで参照できたのですが、これって参照するファイル開いてないとダメですよね?
とりあえず開いた状態でもかまわないので助かりました。

636629 :05/01/14 15:18:15
>>634
今他の人の98SEで開いたところ、エラーが出ずに開けました。
ということはSP3?を入れるしかないのでしょうかね。
イントラでもアップデート出来ますか?
出来ない場合はマイクロソフトのページから落とせるのですか?
もう少し調べて見たいと思います。

637名無しさん@そうだ選挙にいこう :05/01/14 16:58:29
>>635
その数式は内側のINDIRECTが余計じゃないか?

それと、Excel2001(Mac用)だと
='Macintosh HD:Desktop Folder:[ブック1.xls]Sheet1'!$A$1
のような形で開いてないブックも参照できるから、
Winでもたぶんできると思う。

開いている別ブックを(INDIRECT使わずに)参照している状態で、
そのファイルを閉じると自動的にリンクが上記のように長いものに書き変わるよ。

638名無しさん@そうだ選挙にいこう :05/01/14 19:23:15
A1にあるハイパーリンクのリンク先アドレスをB1に書き出すにはどうすればいいですか?
関数でもVBAでもいいのでやり方知ってる人居たら教えてください。
OSはXPでExcelは2002です。

639635 :05/01/14 20:05:58
>>637
その”ブック1.xls”の部分は違うセルに書かれてる文字列を参照したいんです。
要は、値を入れたいA1セルはB1セルに書かれているファイル名のSheet1のA1セルを参照。って事です。
なので参照する部分が2つある訳です。
何か上手く説明できませんが、そういうことですw

何か使い方間違ってるかな?

640名無しさん@そうだ選挙にいこう :05/01/14 20:22:10
>639
だから、それが無駄なんだと。

641名無しさん@そうだ選挙にいこう :05/01/14 20:45:05
=INDIRECT("'["& $B$1&"]Sheet1 '!$A$1")


642名無しさん@そうだ選挙にいこう :05/01/14 20:59:23
ええと…1つのセル内のある文字列だけを○で囲むことって出来る?
文字が得意なWordでも、文字列をあとからきっちり囲む機能は見つからなかったんだけども。

643名無しさん@そうだ選挙にいこう :05/01/14 21:04:44
むりぽ。
オートシェイプの○を自力で重ねるしかないもん。
きっちり囲めるかどうかはあなたの腕次第?

644名無しさん@そうだ選挙にいこう :05/01/14 21:24:38
すいませんお願いします。
『COUNT IF』の関数で、○と◎の数を数えたいのですが
『COUNTIF(C1:C5,"○")』の式だと○の数だけしか数えられないんですが
一つの式で○と◎を数えられるって出来ますか?
ただし▼もあるのでCOUNTAだと▼もカウントされてしまうので
都合が悪いのですが。
よろしくお願いします。

645名無しさん@そうだ選挙にいこう :05/01/14 21:36:07
>>644
○と◎の合計ってことかな?
だとしたら足せばいいんじゃない?

646名無しさん@そうだ選挙にいこう :05/01/14 21:44:41
Excel2002で質問です。

excelで同一ファイルの別シートの特定のセルを参照させたいのですが、
「=シート名!セル」でシート名を直接入力するのではなく、
同列の特定のセルの内容をシート名として参照させることはできるのでしょうか?
具体的にはA1からZ1まで項目があり、そのセルの内容と同名のシートを作っておき、
それぞれの●1の内容をシート名として指定して、同列の他のセルにおいてそのシートを参照させたいのです。
(ex. A1の内容が「aaa」で、別に「aaa」というシートがあり、A2〜A100では「aaa」のシートを参照する。
B1以下も「bbb」等となっており、「bbb」等のシートがあり、それぞれの列においてそれぞれのシートの「aaa」と同様の箇所を参照したいのです。)
ためしに「=A1!B20」とシート名ではなくシート名を記入したセルを入力してみましたがうまくいきませんでした。
何か方法はあるのでしょうか?

647644 :05/01/14 21:47:31
>>645さま
普通に二行使って
『COUNTIF(C1:C5,"○")』『COUNTIF(C1:C5,"◎")』って足すって事ですか?
それしか方法はないんですかね〜
◎の数も○に数えたいのですが。。
○は出勤。◎は遅刻。▼は欠席なんで出勤した人数を数える時には
遅刻も出席も分けたくないのですが。。



648名無しさん@そうだ選挙にいこう :05/01/14 21:52:25
通りすがりだけど、こうでしょう。
=COUNTIF(C1:C5,"○")+COUNTIF(C1:C5,"◎")

649名無しさん@そうだ選挙にいこう :05/01/14 21:59:51
>>646
少しぐらいせめて10や20ぐらい、過去ログ読んで欲しいんだけどなぁ。
>631がよく似た事聞いてるし。(やや迷走したけど)

あと >>12なんかにも書いてある。
FAQ誘導からはみ出して見ずらいけどね。 → 次スレでは 『FAQは>>3-15くらい。』に訂正かな。

650名無しさん@そうだ選挙にいこう :05/01/14 22:19:29
>>647
2行にしなくても1つのセルの中で足せばいいと思うけど?

651名無しさん@そうだ選挙にいこう :05/01/14 22:25:22
644です
そうでしたか!そう言う意味だったんですね!
イヤハヤ・・お恥ずかしい。。645、648、650さんありがとう!

652名無しさん@そうだ選挙にいこう :05/01/14 22:29:28
以前>>419でご教示いただきました

Sub A列の1文字目がF以外の行を削除()
 Dim r As Long
 Dim endrow As Long

 endrow = Range("A65536").End(xlUp).Row
 For r = endrow To 1 Step -1
  If Left(Cells(r, 1).Value, 1) <> "F" Then Rows(r).Delete
 Next r
End Sub

のマクロがありますが、B列の文字列の先頭がF以外は削除の場合は
どこを変えればいいのでしょうか?
"A65536"を"B65536"と変えてもうまくいかないのですが。

よろしくお願いします。

653名無しさん@そうだ選挙にいこう :05/01/14 22:52:38
>>652
おいらが>>419書いたわけではないけど
もう1箇所、Cells(r, 1) => Cells(r, 2)に修正。

654652 :05/01/14 22:58:22
>>653さん
ありがとうございました。他の列でも出来るようになりました。

655名無しさん@そうだ選挙にいこう :05/01/15 01:52:11
countif 関数で、「範囲」(例えば、A1からA20まで)の間で、
B2の値と同じ値をカウントするときは、
=countif($A$1:$A$20,B2)
とやります。
また、5以上の値の数をカウントしたいときは
=countif($A$1:$A$20,"=>5")
とするとうまくいきます。

で、「B2の値以上の数」をカウントしたいのですが。
=countif($A$1:$A$20,"=>B2")
=countif($A$1:$A$20,=>B2)
=countif($A$1:$A$20,"=>"B2)

ともうまくいきません。
どうしたらいいのでしょうか??


656名無しさん@そうだ選挙にいこう :05/01/15 02:09:25
>>655
>=

657名無しさん@そうだ選挙にいこう :05/01/15 02:12:34
excel2003 windowsXPです。

エクセルを開こうとすると
「必要なインストールファイルSKU033,CABが見つかりません。」
と表示されます。

解決法ご教授お願いします。

658名無しさん@そうだ選挙にいこう :05/01/15 02:19:08
>657
再インストール
ダメならアンインストール後にインストール
それでもダメならOS再インストール

ここまでやってもダメならMSに怒鳴り込み

659名無しさん@そうだ選挙にいこう :05/01/15 02:27:35
>>658
ううっ。レスありがとうございます。
しかし、PC購入時点ですでにエクセルがインストールされており、
CDそのものがありません。(いわゆるバンドルというのでしょうか?)

この場合はどうすればいいのでしょうか?
眠たいとは思いますが、ご教授お願いします。

660名無しさん@そうだ選挙にいこう :05/01/15 03:18:22
>659
そんじゃXPのシステムの復元機能を試してみる
ダメならシステムのリカバリ
リカバリCDが無いor無くしたならメーカーに問い合わせ

リカバリしても直らなければメーカーに怒鳴り込み

661名無しさん@そうだ選挙にいこう :05/01/15 06:15:44
>>659
バンドルでもCDがないなら
海賊版です。
通報しておきますね。

662名無しさん@そうだ選挙にいこう :05/01/15 07:58:46
>>659
インストールされてるアプリのCDは入っているはず。
購入時についてきたCDを全部見てみることをおすすめします。


663名無しさん@そうだ選挙にいこう :05/01/15 11:14:20
>655
=COUNTIF($A$1:$A$20,">="&B2)

664名無しさん@そうだ選挙にいこう :05/01/15 12:39:48
毎日手動で、AというAccessファイルの中にあるBというテーブルを
Excelにコピーしていますが、マクロでExcelファイル上のみで
テーブルを持ってきて貼り付け可能にはなりませんか?

665664 :05/01/15 12:56:53
追加、Access・Excelともに2000です。

666名無しさん@そうだ選挙にいこう :05/01/15 13:28:13
>>664
マクロの自動記録でも可能だと思われ。
普段の作業を記録して見たらどう?

667名無しさん@そうだ選挙にいこう :05/01/15 14:06:10

計算式で使うとその中の計算を優先させるカッコ→()
はどう表現するのでしょうか。

例:(A1−B1)/90



668名無しさん@そうだ選挙にいこう :05/01/15 14:11:58
>>667
それでいいよ(半角でね)、というより自分で試した方が早いと思うけど。

669名無しさん@そうだ選挙にいこう :05/01/15 14:27:56
>668
さんきゅ!

なんか、複数のセルを結合した1つのセルをカッコ内に入れると
変な計算になったんだ。
だからこのカッコの使い方でいいのか不安になった。
D1とE1を結合したらD1で計算させなきゃいけないみたいだね。



670名無しさん@そうだ選挙にいこう :05/01/15 15:43:16
オフィスのエクセルの検定についてってどこのスレみればいいですか?

671名無しさん@そうだ選挙にいこう :05/01/15 16:04:36
【Word】MOS(MOUS)総合スレッド【Excel】・その5
http://school4.2ch.net/test/read.cgi/lic/1104920861/
とか、他にもあるかも

672655 :05/01/15 16:45:22
>>663
ありがとー!
"不等号"&セル
にすればいいんですね。どうもでした。(*゜з゜)チュッ

673名無しさん@そうだ選挙にいこう :05/01/15 19:05:27
   項目   数量  単価  金額
 商品1     1個   100   100
 商品2     2個   100   200
 小計                300

 商品3     2個   100   200
 小計                200

 合計                500


この様な請求書を見たのですが、Excelでも作れるでしょうか?
紙に印刷された物しか見てないので、Excelで作ったのか、専用のソフトがあるのかはわかりません。
もし、Excelで作れるのであれば、何方か御口授願います。
商品の数によって、小計の位置(行)が変動し、小計の合計を、合計欄に表示するような感じです。

ちなみに、自分の環境は、Win XP+Office XP、Win 2000+Office 2000です。

674名無しさん@そうだ選挙にいこう :05/01/15 19:30:27
>673
データ(D)->集計(B)かなぁ
商品1と商品2は、同一商品で納品日が異なるという意味なのかしらん
小計のコントロールブレイクの条件がよくわからないなぁ

675659 :05/01/15 19:33:55
お騒がせしました。
CD見つかりました。バッチリ復元できました!
本当にどうもありがとうございました。

676名無しさん@そうだ選挙にいこう :05/01/15 22:34:34
>>675
まともな店で購入したなら普通はCD付いてますよ
よかったですね

677638 :05/01/16 00:24:59
だれか解る方居ないですか?

678名無しさん@そうだ選挙にいこう :05/01/16 00:35:52
>>638
は?
B1に =A1 とするだけでしょ?
何がしたいのか分からん。

679名無しさん@そうだ選挙にいこう :05/01/16 00:53:29
>>638
If Range("A1").Hyperlinks.Count > 0 Then
  Range("B1").Value = Range("A1").Hyperlinks(1).Address
End If

こんな感じ?違ってたらごめん。

680名無しさん@そうだ選挙にいこう :05/01/16 00:54:42
Sub HyperlinkAddress()
Range("B1") = Range("A1").Hyperlinks(1).Address
End Sub

VBA良く知らないので変かも?だけど。

681638 :05/01/16 01:08:34
>>679 そんな感じです
>>680 変じゃないです。
お二方どうもありがとうございます

>>678 こんなことがしたかったんです
For a = 2 To 1000
If Cells(a, 1).Hyperlinks.Count = 0 Then Exit Sub
Cells(a, 2).Value = Cells(a, 1).Hyperlinks(1).Address
Next

682名無しさん@そうだ選挙にいこう :05/01/16 01:25:45
値が激しく異なるデータを無理矢理棒グラフにしなければならないのですが、
テレビでよく見る↓こういうグラフってつくれますか?AA稚拙でスマソ。

                                  _
       _                          | |      2000
       | |                         | |
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜300
       | |                         | |
       | |                         | |
       | |            _            | |
       | |            | |            | |       100
       | |            | |            | |
─────────────────────────────

683名無しさん@そうだ選挙にいこう :05/01/16 02:01:19
用意されているグラフ機能では無理です。
妥協案1)Y軸を1軸と2時に分ける。
妥協案2)オートシェイプを多用してそれらしく作り上げる

684名無しさん@そうだ選挙にいこう :05/01/16 07:52:53
>>681
べつにVBAでなくても、
=HYPERLINK(A1)
でいいじゃん。
つか、ハイパーリンクの形でB2に書き出したかったのか、、、

685638 :05/01/16 08:40:26
>>684
それは自分がやりたいことと全然違います。例えば
┌テキスト:Google
└リンク先:http://www.google.com/
というインターネットハイパーリンクがA1にあったら、B1に
ttp://www.google.com/
の部分を書き出したかった。「=HYPERLINK(A1)」だと
┌テキスト:Google
└リンク先:Google
というハイパーリンクがB1に出来るだけです。
679さん、680さんの教えを元に書いた681のVBAだとB列に
ttp://www.google.com/
の部分だけを文字列として連続で書き出せます。

686名無しさん@そうだ選挙にいこう :05/01/16 10:48:04
>>683
ありがとん、やってみる

687名無しさん@そうだ選挙にいこう :05/01/16 11:53:59
すみませんが企業とかでよく見る透けた大きな文字でSAMPLEとか流用禁止とかってどやって
出すのですか?

688名無しさん@そうだ選挙にいこう :05/01/16 12:35:30
>>687
透かし?のこと?

689名無しさん@そうだ選挙にいこう :05/01/16 12:38:49
>>687
透かしはWordの機能です。
Excelにはありませんが、こちらのページで擬似的に
実現する方法が載っています。

ttp://www.excel7.com/chotto20.htm

690687 :05/01/16 12:39:15
透かし?のこと?

あれが透かしかわからないのですorz
ぐぐったけどサンプルなかったから、、

691687 :05/01/16 12:42:27
>>689
 ありがとうです。そんな感じでした。
けっこう面倒くさいですね。ソフトとかあるのですか?

692名無しさん@そうだ選挙にいこう :05/01/16 13:55:15
>691
ソフト?ワードもエクセルも”ソフト”ですが。

693名無しさん@そうだ選挙にいこう :05/01/16 14:33:57
  A B C D E F
1 4  1  2  2 4 1  ×
2 5  1  2  2 5 1  ×
3 3  6  2  2 3 6  ○
4 3  4  2  3 4 2  ○
5 0  1  2  2 0 1  ×
↑このように記述されている表から、
ABC列に3を含み かつ DEF列に2を含む列の数を求める場合(例では2個)
[=sum(if(A1:C5=3,if(D1:F5=2,1,0),0))]
と言う配列数式を作ったのですが、実際返ってくる値は1です。
どうも3行目の分しかカウントされていないようです。

このような場合の配列数式の使い方は間違っているのでしょうか?
正確にカウントさせるにはどうしたら良いのでしょうか?

win2000 excel2002

694名無しさん@そうだ選挙にいこう :05/01/16 14:35:57
>>693
>ABC列に3を含み かつ DEF列に2を含む列の数を求める場合(例では2個)

ABC列に3を含み かつ DEF列に2を含む「行」の数を求める場合(例では2個)

訂正です。

695名無しさん@そうだ選挙にいこう :05/01/16 14:59:02
>693
それだと範囲内で相対的に同じ位置(つまりA1に対してD1)に
3及び2が無いとカウントされないよ。
その式書けるならここまで言えばあとは自分で書けるよね。

696名無しさん@そうだ選挙にいこう :05/01/16 15:01:45
>>695
そうみたいですね。それは数値をいろいろ弄ってみたから理解できたんですけど・・・
とりあえずもうちょっと頑張ってみます。

697693 :05/01/16 15:37:43
ダメダ。何をどうしたら良いかわかんない。

698名無しさん@そうだ選挙にいこう :05/01/16 16:14:05
>693
いろいろやり方あると思うけど
例えば、
G1=IF(ISERROR(MATCH(3,A1:C1,0)),0,1)
H1=IF(ISERROR(MATCH(2,D1:F1,0)),0,1)
I1=IF(AND(G1=1,H1=1),"○","×")
として、縦にオートコピー
その後、G1、H1を非表示にするとか

699698 :05/01/16 16:21:26
最後に=COUNTIF(I1:I5,"○")ですね

700名無しさん@そうだ選挙にいこう :05/01/16 16:22:01
>693
そういうときはVBAでいわろるユーザー関数作った方がいいと
おもわれ。

701693 :05/01/16 16:35:04
やっぱり作業列の作成が手っ取り早そうですね。
VBAはさっぱりわからないので・・・
ただこのスレちらちら見てますが「VBAならできる」ってのが
圧倒的に多いですよね?
エクセル自体は趣味で使ってるだけなんで差し迫ったものは
無かったのですがこれを機会に勉強してみます。

みなさんありがとうございました。

702名無しさん@そうだ選挙にいこう :05/01/16 16:35:58
質問です。環境は2000
項目   数
A    1
B    2
C    3
A    1
B    5
――――――

このような表で「A」と「B」の数の合計を出したい場合
どの関数がいいでしょうか?
また行数が可変なのでマクロで引数を制御したいのですが、
どんな方法がシンプルで賢いやりかたでしょうか?
お願いします。


703名無しさん@そうだ選挙にいこう :05/01/16 16:42:54
>>702
End(xlDown)

704名無しさん@そうだ選挙にいこう :05/01/16 18:54:42
エクセルで2つのグラフを書いて、
そのグラフの交点を求めたいのですが、
エクセルでその値を表示させることはできるのでしょうか。

例えば、sin関数と2次関数などの、解析的には求められないような
グラフの交点を求めたいのです。

705名無しさん@そうだ選挙にいこう :05/01/16 19:42:01
excel2002ですが、
図形描画でグラフに楕円をつけたしたいのですが、
図形描画の楕円を左クリックして、目的の位置に持って言って左クリックで楕円の大きさを
あわせてクリックを離すと楕円が消えてしまいます。
どうすれば表記できるか教えて下さい。

よろしくお願いします。


706名無しさん@そうだ選挙にいこう :05/01/16 21:07:21
>>705
図形描画の楕円を左クリックして
目的の位置に持っていくって意味がよくわからないが
グラフ以外の場所ではかけるのか?
グラフの裏にいっちゃってるとかいうオチじゃないよね?


707名無しさん@そうだ選挙にいこう :05/01/16 21:44:51
ソフト?ワードもエクセルも”ソフト”ですが。
( ´,_ゝ`)プッ

708名無しさん@そうだ選挙にいこう :05/01/16 22:29:37
>>705
先にグラフを選択してから図形を描けば
グラフエリアに図形が配置される。


709名無しさん@そうだ選挙にいこう :05/01/16 23:37:14
>>705
マルチ禁止
★Word/Excel (MS-OFFICE) 初心者スレッド Part20★
http://pc5.2ch.net/test/read.cgi/pcqa/1104680468/361


710名無しさん@そうだ選挙にいこう :05/01/17 03:36:35
/100(割る100)とするところを間違えて*100(かける100)としてしまいました。
一括置換しようとしましたが、*がワイルドカード扱いになってしまい
数式ひっくるめて/100に置換されてしまいます。

置換で*をワイルドカードでは無く、×として認識させるにはどうしたら良いのでしょう?
ヘルプでワイルドカードや置換などを調べてみましたが解決しませんでした。


711名無しさん@そうだ選挙にいこう :05/01/17 04:02:36
>710
*                 ←全角
□半角と全角を区別する。  ←チェックを外す

全角なのでワイルドカードとしては使われないが
全半角を区別しないので文字として"*"にはヒットする。

712名無しさん@そうだ選挙にいこう :05/01/17 07:44:27
>>710
~*

713名無しさん@そうだ選挙にいこう :05/01/17 08:41:08
>>711
>>712
ありがとうございます。どちらの方法でもできるんですね。
勉強になりました。


714名無しさん@そうだ選挙にいこう :05/01/17 10:32:14
officeXPを使っている者です。
ワードファイルを開くとタイトルバーには、「ファイル名」−Microsoft Word
と表示されますが、エクセルファイルを開くと、
Microsoft Excel−「ファイル名」の順に表示されます。
ワードと同じように表示するにはどうしたらいいでしょうか?

7151/2 :05/01/17 11:44:15
Excel 2000をXPで使用しています。
毎日の顧客のデータから新規の顧客だけを抽出し、別の「顧客一覧」に追加しています。


@新規の顧客だけを、「顧客一覧」に追加する方法があったら教えてください。

毎日のデータ 顧客一覧

名前 電話番号 名前 電話番号
 ○ xxx-xxxx   ○ xxx-xxxx ┐
 B xxx-xxxx   ■ xxx-xxxx │
 □ xxx-xxxx   △ xxx-xxxx │元からあった
 C xxx-xxxx   □ xxx-xxxx │データ
 A xxx-xxxx   ▲ xxx-xxxx │
 △ xxx-xxxx   ☆ xxx-xxxx ┘
 □ xxx-xxxx   A xxx-xxxx ┐
 B xxx-xxxx   B xxx-xxxx │新規データ
 ○ xxx-xxxx   C xxx-xxxx ┘のみ追加
 A xxx-xxxx
 ☆ xxx-xxxx

7162/2 :05/01/17 11:44:46
A上が無理な場合、毎日のデータの中で重複しているデータを消去できる方法があったら教えてください。

毎日のデータ 重複しているデータを削除

名前 電話番号 名前 電話番号
 ○ xxx-xxxx   ○ xxx-xxxx
 B xxx-xxxx   △ xxx-xxxx
 □ xxx-xxxx   □ xxx-xxxx
 C xxx-xxxx   ☆ xxx-xxxx
 A xxx-xxxx   A xxx-xxxx
 △ xxx-xxxx   B xxx-xxxx
 □ xxx-xxxx   C xxx-xxxx
 B xxx-xxxx
 ○ xxx-xxxx
 A xxx-xxxx
 ☆ xxx-xxxx

よろしくお願いしますm(_ _)m

717名無しさん@そうだ選挙にいこう :05/01/17 12:06:16
すいません、WXPにexcel2002ですが、
VBAのマクロ実行中にスペースなどなにかのキー入力があったら
途中で中断するコードってどう書くんでしょうか?


718名無しさん@そうだ選挙にいこう :05/01/17 12:57:29
2002は持ってないので、2000での回答ですがたぶん同じ。

VBA実行中にキー入力イベントを検知することはできないっぽい。
解決策としては、「実行中です」みたいなフォームを出して、その中で検知させる。
キー入力イベントを使ってもいいし、[中断]ボタンを用意してもOK。

719名無しさん@そうだ選挙にいこう :05/01/17 13:05:05
それじゃもっと簡単に、
マクロ実行もしくはVBAエディタから[再生]マークで実行させた処理を
コードじゃなくて、何かのキー(例:Ctrl+Alt+Deleteみたいなやつ)中断させる方法を教えてくださいませんか?

720名無しさん@そうだ選挙にいこう :05/01/17 13:06:24
>715
とりあえずVBAで「毎日のデータ」の先頭から「顧客一覧」内を検索して、
無ければ最後の行に追加、ってのを繰り返せばいいと思うけど。
自分でVBA書けないなら下記の質問に答えてくれれば書いてみるよ。

名前と電話番号は別セルで、データはA〜Dまでの4列でいいの?
最初のデータ(○ xxx-xxxx)は何行目?
名前が一致して電話番号が一致しなかった場合の処理は?

>719
Escキーが中断だけど。

721719 :05/01/17 13:12:44
ぐぅお゛っっ

[ESC]で中断できるだなんて…
すいませんでした

722名無しさん@そうだ選挙にいこう :05/01/17 13:31:22
質問です。

EXCEL2kの環境下。
一つのファイルを開くと、まったく同じファイルが勝手に作られ、同時に開きます。
これはどうしたら解決できるでしょうか。

723名無しさん@そうだ選挙にいこう :05/01/17 14:01:40
>>722
タイトルバーでも「ウィンドウ」メニューでもいいですが、ファイル名の
後ろに「:1」「:2」のように数字が着いてませんか?
それなら勝手に作られているわけでなく、同じファイルをふたつの
ウィンドウで開いて見ているだけです。
片方を右上の「×」をクリックして閉じてから上書き保存すればよし。

724名無しさん@そうだ選挙にいこう :05/01/17 14:08:35
>>723 
ありがとうございます
解決しました

ちなみに同じファイルを二つのウィンドウで見るやり方って
どうするんですか?
原因がわかれば今後の役にたつので

725名無しさん@そうだ選挙にいこう :05/01/17 14:51:08
>>724
ウィンドウ→新しいウィンドウを開く
二つと言わず三つでも四つでも・・・。

726715 :05/01/17 15:20:49
>>720
レスありがとうございます。
めちゃめちゃ嬉しいです。

>名前と電話番号は別セルで、データはA〜Dまでの4列でいいの?
>最初のデータ(○ xxx-xxxx)は何行目?

全て別セルでデータの入る場所(毎日→顧客)は 1→1 2→8 3→10 4→11列目です。


○毎日のデータ 4列

 1.日付
 2.ランク(文字列)
 3.名前
 4.電話番号

727715 :05/01/17 15:21:31
○顧客一覧   21列 

 1.日付
 2.  (数値)
 3.  (文字列)
 4.  (数値)
 5.  (文字列)
 6.  (文字列)
 7.  (文字列)
 8.ランク
 9.  (文字列)
 10.名前
 11.電話番号
 12.  (数値)
 13.  (数値)
 14.  (数値)
 15.  (数値)
 16.  (文字列)
 17.  (文字列)
 18.  (文字列)
 19.  (文字列)
 20.  (文字列)
 21.  (文字列)

728715 :05/01/17 15:23:30
>名前が一致して電話番号が一致しなかった場合の処理は?

新規登録となります。


列数と場所が違うと無理でしょうか(汗
空白の列を作って、毎日のデータを顧客一覧と同じ形式にすることは可能です。

もし無理のようでしたらAはどうでしょうか?
すみませんが、よろしくお願いしますm(。_。;))m ペコペコ…



729名無しさん@そうだ選挙にいこう :05/01/17 17:24:08
Win2000 Excel2000です。
ExcelのUserFormオブジェクトを作成し、ボタンやフィールド等を配置しました。
キー入力イベントをフォームで拾いたいのですが、コントロールに拾われてしまいます。
VBで言う keyPreview みたいに、先にフォームにイベントを通知する設定とかありませんか?

730646 :05/01/17 18:38:07
>>649
>>631への説明を参考にやってみましたがエラーがでてしまいます。
=INDIRECT("'["&$Z$1&"]'!C23")

=INDIRECT("Z1")!C23
と試してみましたがだめでした。
ためしにZ1に「シート名!C23」と記述して参照結果を表示させたいセルに
=INDIRECT(Z1)
とやってみたところうまくいったのでセル・シート名は間違っていないようなのですが・・・。
INDIRECTのヘルプも見てみましたが、
Z1(同ファイル内の別のシート名)に記述されたのC23を参照させたいのですが、
これではまずいのでしょうか?
各列においてそれぞれの一番上のセルにあるシート名を参照させたいのですが、
どなたかよろしくお願いします。

731名無しさん@そうだ選挙にいこう :05/01/17 18:59:09

行を基準にしてフィルタをかけることって出来るのでしょうか?


 |あ   |い   |う   |
−+−−−−+−−−−+−−−−+
1|あ1  |い1  |う1  |
−+−−−−+−−−−+−−−−+
2|あ2  |い2  |う2  |
−+−−−−+−−−−+−−−−+
3|あ3  |い3  |う3  |
−+−−−−+−−−−+−−−−+
4|あ4  |い4  |う4  |
−+−−−−+−−−−+−−−−+

デフォルトは縦の列に対してフィルタが動作すると思うのですが
(図で言う「あ」の列に含まれる〜をフィルタ)

これを横の行においてフィルタを動作させることはできるのでしょうか?
(図で言う「1」の行に含まれる〜をフィルタ)

Excel2000を使用しています。

732646 :05/01/17 19:01:55
=INDIRECT(""&Z1&"!C23")
とやったところうまくいきました。
ですが、オートフィルで連続したセルを参照させようとしても
先にあるZ1がZ2,Z3となってしまいます。
シート名はそのままにC23以降を連番にしたいのですが、可能でしょうか?


733名無しさん@そうだ選挙にいこう :05/01/17 19:19:12
>>732
絶対参照 $Z$1

734名無しさん@そうだ選挙にいこう :05/01/17 23:13:22
>726 ( >715 )
Sub 新規顧客抽出()
Dim C As Long, J As Long, EndC As Long, EndJ As Long
EndC = Worksheets("毎日のデータ").Range("C65536").End(xlUp).Row
EndJ = Worksheets("顧客一覧").Range("J65536").End(xlUp).Row
For C = 2 To EndC
 J = 2
 Do Until Worksheets("毎日のデータ").Cells(C, 3) & Worksheets("毎日のデータ").Cells(C, 4) = _
 Worksheets("顧客一覧").Cells(J, 10) & Worksheets("顧客一覧").Cells(J, 11)
  If EndJ = J Then
   Worksheets("顧客一覧").Cells(EndJ + 1, 10) = Worksheets("毎日のデータ").Cells(C, 3)
   Worksheets("顧客一覧").Cells(EndJ + 1, 11) = Worksheets("毎日のデータ").Cells(C, 4)
   EndJ = EndJ + 1
   Exit Do
  End If
  J = J + 1
 Loop
Next C
End Sub

とりあえず「名前」と「電話番号」しか対象にしてないけど、「日付」と「ランク」は手入力でいいの?
あと先頭データが何行目からか答えてないから2行目からにしたけど大丈夫か?

735名無しさん@そうだ選挙にいこう :05/01/17 23:28:31
>731
オートフィルタでは無理、VBAでフィルタ作れば出来る。
行フィルタなんていくらでもサンプル転がってるから
自分で書けないなら適当に拾ってきな。

>732
=INDIRECT(Z$1&"!C"&ROW()+★)
★には「23-最初の数式を入れる列番号」を入れる。
上記数式をA1に入れるなら★は22、B2に入れるなら★は21。

736715 :05/01/18 00:20:24
>734
>「日付」と「ランク」は手入力でいいの?

自動で入力できたらその方が良いのですが ↓ を足せば良いのかな・・・

   Worksheets("顧客一覧").Cells(EndJ + 1, 1) = Worksheets("毎日のデータ").Cells(C, 1)
   Worksheets("顧客一覧").Cells(EndJ + 1, 8) = Worksheets("毎日のデータ").Cells(C, 2)


>先頭データが何行目からか答えてないから2行目からにしたけど大丈夫か?

その通りです。

お手数をおかけしました。
早速使わせていただきます。
分からないことがあったらお聞きするかもしれませんが、
その時はまたよろしくお願い致します。

ホントにホントにありがとうございました〜。


737名無しさん@そうだ選挙にいこう :05/01/18 00:47:35
> 自動で入力できたらその方が良いのですが ↓ を足せば良いのかな・・・
OK

738名無しさん@そうだ選挙にいこう :05/01/18 09:45:16
Win XP Excel2000です。
例えばファイルA.xlsの一部(A,D,F列など)をファイルB.xlsに自動で表示させることはできますか?
ファイルA.xlsのA列を修正するとファイルB.xlsも更新される仕組みです。さらにファイルB.xlsは書き込みできないようにすることも。
おねがいしまーす。

739名無しさん@そうだ選挙にいこう :05/01/18 10:05:54
>>738
自動で表示はリンク貼り付け。
ファイルB.xlsにゃシート保護をかけておくか、書き込みパスワードをつけりゃよろし。
後は自分で調べてね。

740名無しさん@そうだ選挙にいこう :05/01/18 10:33:02
>>739
すげぇ。これこれ。なんかできそうですよ!
どうもでした〜

741名無しさん@そうだ選挙にいこう :05/01/18 10:50:12
あ、ファイルへリンクされている箇所はリンク先まで貼付できないんですかね?

742名無しさん@そうだ選挙にいこう :05/01/18 12:34:38
エクセルでアクセスみたいな入力画面を
実現する方法を教えてください。
あるいは、なんかそういうの作る方法を紹介しているHPなど
ありましたら教えてくださいませ。

743名無しさん@そうだ選挙にいこう :05/01/18 13:17:02
>エクセルでアクセスみたいな入力画面
フォームのことかな?

1、出来合いのフォーム
 表の項目欄を作成>メニューのデータ>フォーム>入力
2、オリジナルのフォーム−シート上に配置&セルと関数で取り扱う
 ツールバー「フォーム」を用いて
3、オリジナルのフォーム−ダイアログボックス&VBAコードで取り扱う
 ツールバー「コントロール ツールボックス」を用いて

744名無しさん@そうだ選挙にいこう :05/01/18 14:27:59
Excel2000 WindowsXPHome使用しております。

マクロにて
2番目のシートから
最後尾n番目のシートまでを同時選択するには
どうしたらよろしいのでしょうか?
この変数nをどう指定したらよいのかが思いつきません。
わかる方いらっしゃいましたらお願い致します。

745名無しさん@そうだ選挙にいこう :05/01/18 14:49:18
>744
Sheets(Sheets.Count)
Sheets.Countはシートの数を返すので
これで最後のシートを指定できる。

746名無しさん@そうだ選挙にいこう :05/01/18 15:28:07
>>744
Dim i As Integer
Dim a() As Variant
ReDim a(Worksheets.Count - 2)
For i = 2 To Worksheets.Count
a(i - 2) = Worksheets(i).Name
Next i
Sheets(a).Select

747635 :05/01/18 17:11:57
635です。
結局>>641で上手くできたら「これを基に色々と」などと経理のババァが喜んだと思ったら「ファイル開いてないとダメじゃんバカ」とぬかしました。
ぬっ頃してもいいんですが、犯罪者にはなりたくないのでファイルを開かないでできる方法あったら教えて下さい。
無理ならVBA(自作関数)でファイルを開かないで参照する手段でもいいです。

748名無しさん@そうだ選挙にいこう :05/01/18 19:15:00
>744です
>>745,>>746さん
無事に思い描いていた通りの結果が得られました。
本当にありがとうございました。

749名無しさん@そうだ選挙にいこう :05/01/18 23:11:02
A1〜A5にランダムに数字が入力されています。
A6にはA1〜A5までにセルの個数の合計の式が入っています。
[=COUNTA(A1:A5)]

そこで、例えばA2の列を非表示にしたときに、A6の合計が-1される
ような事は可能なのでしょうか。どなか詳しい方、宜しくお願い致します。

※オートフィルタで非表示にするのではなく、あくまでも右クリック→非表示を使用しています。

750名無しさん@そうだ選挙にいこう :05/01/19 00:37:33
>>749
=subtotal(

751名無しさん@そうだ選挙にいこう :05/01/19 07:45:10
>>750
このケースにSUBTOTALは使えない。

752751 :05/01/19 08:06:52
すまん。例外があった。
これExcel2003だとできるんですね。
=SUBTOTAL(103,A1:A5)で、=COUNTA(A1:A5)と同じ意味になり、
かつ非表示行も無視してくれる。
ただし>>749さんがExcel2002未満だったらこれもダメですね。

753名無しさん@そうだ選挙にいこう :05/01/19 08:16:54
まあ2002以前なら普通にVBAで可視セルの数を数えればいいじゃん。

754名無しさん@そうだ選挙にいこう :05/01/19 10:56:55
おねがいします。

Excel2000を使っていますが、
複数シートを選択し、ヘッダー・フッターを一括して変更すると、
ヘッダー・フッターのみ更新されて欲しいところ、
ページ設定を全て同じにされてしまいます。
複数シート選択→ページ設定 とやるので、当然といわれればそうなのですが…
ヘッダー・フッターのみ一括更新するには、やはりVBAで組まないとだめなのでしょうか?
あるいは、アドインなどがあれば助かるのですが…

755名無しさん@そうだ選挙にいこう :05/01/19 11:04:58
過去レスに同じのがでてたらごめんね。

セル内の文字を全角カナ文字から半角カナ文字にしたい場合
一括でできる関数とかありますかね?
そのばあい漢字が含まれててもできるのかな?

例) 全角カタカナ→全角カタカナ

756名無しさん@そうだ選挙にいこう :05/01/19 11:07:26
> ヘッダー・フッターのみ一括更新するには、やはりVBAで組まないとだめなのでしょうか?
はい。Deaces


757名無しさん@そうだ選挙にいこう :05/01/19 11:13:08
>>756
ありがとうございました

758名無しさん@そうだ選挙にいこう :05/01/19 11:13:29
>755
置き換え先が別セルでいいならASC関数
今、全角で入力してあるセルに半角で上書きしたいならVBAでStrConv関数

759名無しさん@そうだ選挙にいこう :05/01/19 11:25:51
>758

できました、ご親切にありがとうございました!!!

760名無しさん@そうだ選挙にいこう :05/01/19 11:30:40
ブックの間で、日付をコピー&ペーストすると
1日短くなってしまうんですが

何が原因と考えられますか?

761名無しさん@そうだ選挙にいこう :05/01/19 12:00:27
>>760
具体的に

762名無しさん@そうだ選挙にいこう :05/01/19 13:33:07
すみません、グラフを作成していたのですが、次の様に並び替えをしたいのですが可能でしょうか?

<グラフウィザード>
グラフの種類 横棒
形式 右上

系列1=はい
系列2=いいえ
系列3=無記入
項目軸ラベルに使用=質問1〜質問30(範囲)

今現在の並び
上から「質問1」

替えたい順番
上から「パーセントが高い順」

OSは98SE、エクセルは2000です。

763名無しさん@そうだ選挙にいこう :05/01/19 13:37:35
>>762
方法1、系列の順序で一つ一つ指定して並び替え
方法2、元になる表を並び替えておいてから、グラフ作成

764762 :05/01/19 13:39:24
補足です。
<データ範囲>の<系列>は「行」です。

Y/数値軸はパーセントになっています。

765762 :05/01/19 13:48:50
>>763
やはり既存のグラフを条件を変えての並び替えは不可能でしたか・・・。

方法2の方が、良さげですのでやってみたいと思います。
エクセルで出来るようになれば便利なんですけどね。
どうも有難うございました。

766名無しさん@そうだ選挙にいこう :05/01/19 13:53:27
Excel2002なんですが、特定のセルに任意の画像を背景として表示させるにはどうすればいいですか?
普通に画像をセルサイズに合わせる方法も、シートに画像を背景として表示させる方法も解るんですが
任意のセルだけに表示させたいし、画像を表示させたセルの文字を普通のセルのように編集したいので
どのようにすればいいのか教えてください。OSはWindowsXPです。

767名無しさん@そうだ選挙にいこう :05/01/19 14:10:39
>>765
グラフはそのまま置いといて
元の表を並び替えれば、系列順序変わるよ

768名無しさん@そうだ選挙にいこう :05/01/19 19:56:23
質問なのですが、二重取消線はExcelでもできるのでしょうか?



769名無しさん@そうだ選挙にいこう :05/01/19 19:57:51
フォントの文字飾りにはないなぁ

770名無しさん@そうだ選挙にいこう :05/01/19 23:02:55
エクセルでセルに「-20℃」って入力すると関数として認識してしまうらしくエラーになってしまいます
どうすればいいですか?


771名無しさん@そうだ選挙にいこう :05/01/19 23:18:53
>770
>>10の最初のAnswerによる対処法をどうぞ。


772名無しさん@そうだ選挙にいこう :05/01/19 23:37:21
エクセルXPなのですが関数のことで教えてください。
翌営業日を出す関数を教えてください。
「work〜」だったような気がするのですが、調べても出てきません。
よろしくお願いします。

773名無しさん@そうだ選挙にいこう :05/01/19 23:44:07
>>772
アドインで分析ツールを組み込まないと使えないよ>WORKDAY

774名無しさん@そうだ選挙にいこう :05/01/19 23:47:25
>772
調べても出てこないって・・・
workで始まるのが解ってるならExcelの関数一覧のwの当たりを見れば
ちゃんとWORKDAY関数も載ってる訳だが。

775名無しさん@そうだ選挙にいこう :05/01/19 23:53:06
ファイルから文字列を取得して、
文字列をセルに順番に、設定していきたいのですが、
設定する項目が多くすべて設定する終わるまでに
時間がかかります。

一度にセルに設定する方法ことは可能ですか?

よろしくお願いします。


776名無しさん@そうだ選挙にいこう :05/01/19 23:55:57
具体的に
「2ch」という文字ををコピーして
「1ch」をコピーした時点で
貼り付けを選択したら「1ch」と貼り付けられますが
「2ch」を貼り付けるという事はできるのでしょうか?

777名無しさん@そうだ選挙にいこう :05/01/20 00:00:56
772です。
773さん、ありがとうございます。
助かりました、早速使います。m(__)m
774さん、一覧で探したけど出てこなくて・・・
見逃したのかもしれません。
でも、解ってすっきりしました。

778名無しさん@そうだ選挙にいこう :05/01/20 00:04:10
>775-776
手動でコピペしていて時間が掛かると言ってるならVBAでやれ。
VBAでやってて処理時間が長いっていうならコードを見直すかPCスペック挙げろ。
どうも>776を見ると手動でちまちまやってそうだが。

>777
ゴメン、うちの2002は分析ツール組み込んでるから一覧にあったんだわ。
分析ツール組み込んでなければ一覧にも出ないな。失礼した。

779名無しさん@そうだ選挙にいこう :05/01/20 00:08:01
がんばれ、偽者

780234 :05/01/20 00:08:21
ワード。エクセル、メモ帳などですが

すいません、233とは違う人です
「2ch」という文字をコピーして
「1ch」という文字をコピーした時点で
貼り付けを選択したら「1ch」と貼り付けられますが
「2ch」を貼り付けるという事はできるのでしょうか?

781名無しさん@そうだ選挙にいこう :05/01/20 00:14:59
Office クリップボードを使えばいいんじゃ?
2000以降搭載だっけ?

782名無しさん@そうだ選挙にいこう :05/01/20 00:17:07
もういいからかえれ

783名無しさん@そうだ選挙にいこう :05/01/20 00:17:27
エクセルでのグラフ作成に関してなんですが、
普通、グラフの横軸が項目軸、縦軸が数値軸となっていますが、これを入れ替えることはできますか?
もしできるのならその方法を教えてください。
よろしくお願いします。

784名無しさん@そうだ選挙にいこう :05/01/20 00:19:27
棒グラフなら、横棒グラフ使えばいい。
折れ線の場合は、準備されてない
やって出来なくはないが、かなり面倒

785783 :05/01/20 00:25:36
>>784
ありがとうございます。
折れ線です。
もしご面倒でなければご教授お願いします。

786783 :05/01/20 00:30:06
すいません。自己解決、というか・・・
軸を反転させたり、数値の配置を変えたりで、
型だけは作成することができました。
これでなんとかなりそうです。

787名無しさん@そうだ選挙にいこう :05/01/20 00:33:14
あら、解決したみたいね。
遅ればせながら、良ければ参考に
tp://www.efcit.co.jp/cgi-bin3/wwwlng.cgi?print+200501/05010023.txt

788783 :05/01/20 00:43:44
>>787
あ、どうもありがとうございます。

789名無しさん@そうだ選挙にいこう :05/01/20 11:23:08
教えてください

ローカルディスクからAというファイルを開き
「名前を付けて保存」でネットワークドライブに
A’というファイル名で保存しました。

次にA’というファイルをネットワークドライブから
開くとA’.xls:1 と A’.xls:2でexcelが
2つ起動してしまうのです。なにか原因があるのでしょうか。

OS:WINXP excelは2002です。 よろしくお願いします。

790名無しさん@そうだ選挙にいこう :05/01/20 11:44:26
それは、ウィンドウを2つ開いているからです。
直すには、片方を閉じて、残った方を一度保存。

逆に再現する(ウィンドウを2つ開く)には
メニューのウィンドウ>新しいウィンドウを開く です。

791名無しさん@そうだ選挙にいこう :05/01/20 13:04:51
直りました ありがとうございますm(_ _)m

792名無しさん@そうだ選挙にいこう :05/01/20 14:52:27
EXCELでドラッグして連番を振る機能の
数値を16進数にすることは可能でしょうか?

793名無しさん@そうだ選挙にいこう :05/01/20 14:57:50
関数使わないと無理じゃね?
=DEC2HEX(ROW(),5) 入れてからフィルとか

794名無しさん@そうだ選挙にいこう :05/01/20 17:06:01
EXCELで数値が12.3や23.4を整数にする場合、小数点表示桁下げをすると
四捨五入されて12や23になるんですがこれらの数字をすべて繰り上げした
整数にしたいんですが(13や24)どのようにすればよいのでしょうか?

795名無しさん@そうだ選挙にいこう :05/01/20 18:05:03
>>794
表示桁操作じゃなく、ROUNDUP関数じゃダメ?


796名無しさん@そうだ選挙にいこう :05/01/20 19:58:19
別セルに繰り上げ表示ならセル関数でROUNDUP
現在のセルで繰り上げたいならVBAでROUNDUPだな

797名無しさん@そうだ選挙にいこう :05/01/20 19:59:59
入力した値は正しくありません、ユーザーによって
セルに入力する値が制限されています。

とでて、2003年末までしか年月日が入力できないんですが。
セルの書式>表示形式は、日付>3月4日 となってます。
文字列に変えても表示がシリアルに変わるだけで入力不可でした。

初心者が講習会で作ったそうで、私が聞かれて困ってます。
VBはかじってるんですが、エクセルは疎いんです。
まさか倍精度なんてまだあったんでしょうか。

798名無しさん@そうだ選挙にいこう :05/01/20 20:34:10
>797
[データ] > [入力規則] > [設定]
で入力できる日付範囲の制限が設定されてないか?
確かそのメッセージは入力規則制限のものだと思う。

799名無しさん@そうだ選挙にいこう :05/01/20 20:56:22
>>798
オーーー
ありがとうございます、
N88BASIC からVBへ飛んだので、これは初めて見ました。

800名無しさん@そうだ選挙にいこう :05/01/20 21:42:07
>>795
>>796
なるほどROUNDUP関数を使うんですね。エクセルを最近使い始めたので
知りませんでした。現在のセルに、値を出したいのでVBAを使いたいのですが
よくわからないので調べてみます。ありがとうございました。

801名無しさん@そうだ選挙にいこう :05/01/21 11:45:08
一つのファイルの、「1月」というシートのA1に『平成17年』といれると
自動で「2月」「3月」...というシートのA1にも『平成17年』が入るようにするには
どうすればいいのですか?

802名無しさん@そうだ選挙にいこう :05/01/21 12:12:49
>>801
「2月」「3月」..シートのA1に「='1月'!A1」

803801 :05/01/21 12:17:23
>>802
うわ、できました!
これでかなり助かります、ありがとうございました!!

804名無しさん@そうだ選挙にいこう :05/01/21 12:20:06
>>801
複数シートを選択してから、A1に平成17年
選択の仕方は「シートを選択する」のHELP参照


805名無しさん@そうだ選挙にいこう :05/01/21 15:31:06
>>801

みんな優しいから答えてるけど

A1に='1月'!A1とかってエクセルの超初歩だろ
全く何の本も読まないでここに聞いてるのか?

「できる」とか「みえる」とか「超図解」っていう入門書でも読んでから
わからなくて聞くのならまだしも、何にも調べないでただただ聞くのって
どうかと思うが・・

少しは調べてから書き込もうよ

806名無しさん@そうだ選挙にいこう :05/01/21 16:26:02
オートシェイプを条件によって表示,非表示を切り替える事は出来ますか?

807名無しさん@そうだ選挙にいこう :05/01/21 17:10:09
>>805

そんぐらいスルーしろよ。
余裕のない香具師だな。

808名無しさん@そうだ選挙にいこう :05/01/21 18:51:10
申し訳ないのですがお力添えを出来たらお願いします。
WindowsXP , EXCEL2000を使用しています。

マクロのFor文を使用して、一番下の行に内容の追加をしていきたいのですが
私の作成したマクロでは一番最後のものだけしか表示されません。

A3のセルに「START」と入力されていたとして
A4に「1」、A5に「2」、A6「3」と入力するのに

Dim i As Integer
For i = 0 To 2
Range("a1").End(xlDown).Offset(1, 0).Select
ActiveCell.Value = i + 1
Next i

私が書くとこのようになるのですが、
STARTの下の行のセルには「3」が表示されるだけなのです。
どこがどう間違っているのか私にはわかりません。。

間違いがわかる方がいらっしゃいましたら宜しくお願い致します。

809名無しさん@そうだ選挙にいこう :05/01/21 19:08:45
>>808
>Range("a1").End(xlDown).Offset(1, 0).Select
このコードではA1が空白だと、次に何かデータが入っているセル
の下が選択される。

今の例だと、A1、A2が空白だから常にA4が選択される。
つまりForで繰り返した回数分だけA4を上書きしている。

a1をa3にしな。

810名無しさん@そうだ選挙にいこう :05/01/21 19:13:28
>>808
Dim i As Integer
For i = 1 To 3
Cells(i + 3, 1) = i
Next i

811732 :05/01/21 19:23:59
>>735
うまくいきました。どうもありがとうございました。

ところで&と"というのはどのような機能をもっているのでしょうか?
=INDIRECT(Z$1&"!C"&ROW()+★)
ここになぜ&や"が必要なのかがわかりません。
excelのヘルプにもヒントらしきものが見当たりません。
どなたか教えていただけないでしょうか?

812名無しさん@そうだ選挙にいこう :05/01/21 20:25:52
>>811
& はその左側と右側をくっつける演算子。
" はそれで囲んだ中を文字列として扱う。

A1, B1, A2, B2 にそれぞれ適当な文字や数字を入れて、
C1には 「=A1 & B1」 って式を、
C2には 「=A2 & "B2"」って入れて違いを確認してみ

813名無しさん@そうだ選挙にいこう :05/01/21 21:42:31
>>807

>>805の言うことがわからんでもない
簡単なことを人に聞いて教えてもらうより、自分で読んだり調べた方がよく身に付く

人に聞いて身に付くのは、いろいろ調べてわからなかった後で人に聞く場合

>>801の='1月'!A1がさんざん調べてわからなかったことだとするとちょっと失礼だがな

814名無しさん@そうだ選挙にいこう :05/01/21 21:44:10
excelの大量にあるファイルを30個位まで纏めて結合して
同一のシートとファイルにしてくれるフリーソフトを
前使ったんだが改めて幾ら探しても見つからない。
誰か知らないか?

815名無しさん@そうだ選挙にいこう :05/01/21 21:49:26
さんざん調べて='1月'!A1が解らないような知的レベルだと
自分で調べ付こうが、教えて貰おうが何も身に付かないだろう。

816名無しさん@そうだ選挙にいこう :05/01/21 22:08:30
>>815
ほとんどが身につかないだろうね
だから自分が鬱陶しいと思う質問はスルーしなよ
あなたが言ってることは正論だけどさ
顔も知らない赤の他人なんだからさ、そいつのスキル心配してやる必要ない
実際使えなくて赤っ恥かくのはそいつだし
回答を聞いて、自分で消化吸収し、発展できるやつはそれでいいし

答えてあげる余裕がったりスキルがあったり暇な人が答えればいい
気に入ったやつにだけ、気が向いたときにだけ答えれば十分
仕事でも何でもないからさ

817名無しさん@そうだ選挙にいこう :05/01/21 22:10:57
>814
外部ソフト使うまでもなくVBAで簡単にできるだろ。

818811 :05/01/22 01:51:29
レスどうもです。>>812

&に関してですが、
続けて入力すればわざわざくっつける必要も無いじゃないかと思っていたのですが、
ためしに「=A1B1」と入力するとエラーがでたので
それぞれの境目を明確にするため、と理解すればいいのでしょうか?

また、"は文字列として認識させるために使うのはわかりましたが、
なぜ=INDIRECT(Z$1&"!C"&ROW()+★)に使われているのかがわかりません。
"!C"のように、シート名をあらわす!とそのシートの該当列を示すCを挟むのは何故なのでしょうか?
(なぜ"が必要なのかがわかりません。)

あと、上記のように該当シートの参照先の列をCではなく
参照元のセルと同列同行を参照させようと思ってCOLUMN()を使おうと思ったのですがうまくいきません。
=INDIRECT(Z$1&!COLUMN()&ROW())
では数式が正しくないと言われてしまいます。
どのようにすればよいのでしょうか?

最後に、このような理解を深められるような参考本等お勧めがあったら教えていただけないでしょうか。
よろしくお願いします。

819名無しさん@そうだ選挙にいこう :05/01/22 02:08:38
>「=A1B1」と入力すると・・・(中略)・・・それぞれの境目を明確にするため
「&」は境目を明確にするためのではなく、連結を表す「演算子」です。
演算子とは、+,-,*,/,= など 
「=2+3」 を「=2 3」とやったら、マズイでしょう。演算子とはそういう物です。

>=INDIRECT(Z$1&"!C"&ROW()+★)
この中で、!C が固定文字だから、
C は、計算式でも、関数でも、セル名でも定義してある名前でもないので
そのまま使ったら、#NAME? と聞かれちゃいますよね。

>=INDIRECT(Z$1&!COLUMN()&ROW())
上を考えてもらえば、もう判ると思うけど、どこが#NAME?と聞かれる?
そう ! だよね。 ここは "!" とする必要があります。

こういうことをずっと語ってるような本ってあるかな?
習うより慣れよ、なんじゃない?
あとググッて、自分にしっくり来る説明を探すとか。


820名無しさん@そうだ選挙にいこう :05/01/22 02:16:46
>>818
COLUMNは列番号が返ってきます。


821名無しさん@そうだ選挙にいこう :05/01/22 02:20:15
>>818
=INDIRECT(Z$1&"!"&ADDRESS(COLUMN(),ROW()))
こうかな?

822名無しさん@そうだ選挙にいこう :05/01/22 02:59:30
>818
A1:=INDIRECT(Z$1&"!C"&ROW()+22)
Z1:hoge
の場合、

 式:Z$1         & "!C"           & ROW()      + 22
    ↓セルZ1の内容 & ↓!Cの文字そのまま & ↓A1の行番号 + ↓数値の22
 値:hoge         & !C             & 1         + 22

となり、&の部分は繋げて、+は加算すると「 hoge!C23 」となる
「 =Z$1&"!C"&ROW()+22 」とした場合はA1に文字列として「 hoge!C23 」が表示されるが
INDIRECTは文字列を参照先として扱うのでA1にはシートhogeのC23の内容が表示される。
仮に"!C"の"を外すと「!C」という文字ではなくアドレス「!C」の内容という意味になるが
適当なセルに「 =!C 」と入れれば解るとおり「!C」というアドレスは無効なのでエラーとなる。

823818 :05/01/22 11:29:04
うおお、なんか目からうろこが!!
レスどうもです。>>819-822

ところでCOLUMNについて追加質問なんですが、C8に
=INDIRECT(Z$1&"!"&COLUMN()&ROW())
と入力したところうまくいきません。(Z1にはSheet2と入力)
式自体は意図したとおりに機能しているようなのですが、計算の過程を見ると
=INDIRECT("Sheet2!38")
と表示されます。
ヘルプを参照したところCOLUMNは列番号を返すとありますが、
なぜABCではなく数字になってしまうのでしょうか?(C=3ということですよね?)
>>821のとおりにやったところ問題なくできたのでとりあえず解決はしているのですが、
疑問が残ってしまいました。
よろしくお願いします。

824名無しさん@そうだ選挙にいこう :05/01/22 11:57:31
>823
関数ってのはセル参照メインに使うものではなく
計算メインに使うものなので計算に使える数値を返す。ただそれだけのこと。
まあ、列文字を返す方法もあるし、列を数値で参照する方法もあるけどね。
今回みたいなケースでは>821のアドバイスのように列を数値で参照するのが普通だけど
興味があるなら列文字を返す方法も調べてみな。(たぶんヘルプのみで解るから
因みにVBAでも列番号を返す方法、列文字を返す方法
列番号で参照する方法、列文字で参照する方法がある。

825823 :05/01/22 13:08:15
>>824
なるほど。早速探してみます。
皆さんどうもありがとうございました。

826名無しさん@そうだ選挙にいこう :05/01/22 14:07:14
Sheet1のセルに入っている値の順にSheet4以降のシート名を変更させたいのですが、

Dim i As Byte
For i = 4 To ThisWorkbook.Sheets.Count
Worksheets(i).Name = Sheets(1).Cells(i - 2, 7)
Next i

というのを作ったら、セルの値を入れ替えて再度その順で変更させようとすると
同じ名前が使われてるんで変えられない。て言われるのです。
対象となるセル、シートは100近くあるので自分でちまちま直すのは煩雑です。
なにか良い方法はありませんでしょうか?

827名無しさん@そうだ選挙にいこう :05/01/22 14:43:35
>826
単にシート名の重複が問題なんでしょ。
だったら目的のリネームの前にシート名を連番化でもすれば?

Dim i As Byte
For i = 4 To ThisWorkbook.Sheets.Count
Worksheets(i).Name = i
Next i
For i = 4 To ThisWorkbook.Sheets.Count
Worksheets(i).Name = Sheets(1).Cells(i - 2, 7)
Next i

とかやれば、シート名が数値じゃなければ重複はしないでしょ。
指定したいシート名に数値だけのものもあるなら
Worksheets(i).Name = i & "hoge"
とかさ。

828826 :05/01/22 17:25:06
>>827
なるほど…やってみます

829名無しさん@そうだ選挙にいこう :05/01/22 20:32:34
カイ2乗値を求めたく、CHITEST 関数を使ったのですが
値が合ってるか、手計算したところ、解が違ってました。
データは、実測値が47 53 期待度数が50 50です。
53 47 50 50

これのカイ2乗値は、36/50=0.72になるはずなのに
CHITEST 関数使うと0.396144という値になります。
使い方間違っているのでしょうか?


830名無しさん@そうだ選挙にいこう :05/01/22 20:34:10
エクセルを起動してセルを一箇所クリックすると、
有無の言わさずドラッグの状態になってそれが解除されません。
なんというか、ずっとマウスの左ボタンが押された状態と認識されてるみたいです。
どのファイルでも同じ状況です。
エクセル以外のアプリでは同症状は起こらないのでマウスの不具合ではないと思います。
Officeの修復とか、エクセルだけ削除して追加しなおしたりとかしたのですが
解消されませんでした。
Officeごと再インストールでしょうか。
どなたか解決方法知っている人がいたらお願いします。
Office2003Professional、OSはXPです。

831829 :05/01/22 20:37:00
すいません、値がずれてしまいました。
実測値 期待度数
47 53  50 50
53 47 50 50

832名無しさん@そうだ選挙にいこう :05/01/22 20:48:43
>>830
>>502これと同じなのか?

833502 :05/01/22 21:02:51
>>832
あ。そうです。まさにこれでした。
ログ読んでなんとなく対処法わかりました。
OS再起動とホイールクリックで対応します。
ありがとうございました。

834名無しさん@そうだ選挙にいこう :05/01/22 21:14:51
配列数式について教えてください。
 ・A1:A10に「東京」が4つ,「大阪」が6つ,ランダムに入っている。
 ・B1:B10に数値がランダムに入っている。
このとき,東京,大阪の,B列の数値の平均値を求めるために
 C1に {=AVERAGE(IF($A$1:$A$10="東京",$B$1:$B$10,""))}
 C2に {=AVERAGE(IF($A$1:$A$10="大阪",$B$1:$B$10,""))}
という配列数式を入れました。
B列の数値が全て埋まっているときは問題ないのですが,
B列のいくつかが「空白」の場合でも,
 C1の東京の平均値は,4で,
 C2の大阪の平均値は,6で
割った数値が表示されてしまいます。配列数式を使う場合,
 "" で空白を意味することは出来ないのでしょうか?

835名無しさん@そうだ選挙にいこう :05/01/22 21:59:21
>>834
配列数式はあまり詳しくありませんが。
そのケースではB列の値に関係なく、常に
="東京"であるセル数(4)、="大阪"であるセル数(6)が、
平均を求める際の分母になってしまうせいではないかと。

836534 :05/01/22 22:03:19
直線(図形描画)をコピー&ペーストすると自分の描きたい場所と
全く違う場所に貼り付けられてしまいます。なぜですか?

837名無しさん@そうだ選挙にいこう :05/01/22 22:14:16
>836
見えているのは線でも
コピペ対象は面だから

838534 :05/01/22 22:16:35
関数を使わずに
例えば17.1.22や17/1/22等の入力で2005.1.22もしくは2005/1/22と表示するにはどうすればよいのでしょうか?
セルの書式設定でのユーザー定義でもうまくいきません。

839名無しさん@そうだ選挙にいこう :05/01/22 22:22:33
VBA使えばいいと思うよ

840名無しさん@そうだ選挙にいこう :05/01/22 22:38:30
>>829
CHITESTのヘルプ読んだ?
CHITESTはカイ2乗値を計算するのではないよ。
カイ2乗検定をする関数。
つまり0.396144と言うのはいわゆるp値だよ。

841名無しさん@そうだ選挙にいこう :05/01/22 22:38:49
VBAてどう使うのですか?使えませんm(_ _)m

842名無しさん@そうだ選挙にいこう :05/01/22 23:00:41
>>841
この場で一から説明するのはムリ。
Excel VBAの本はいろいろ出てるので、簡単な本読んでみたら?

843名無しさん@そうだ選挙にいこう :05/01/22 23:09:50
>841
セルに日付として扱えるデータが入力されたら-12年のデータに置き換える・・・とか
文字列として「H00/00/00」という値が入力されたらにHと左から一つ目の/の間にある数値に1988を足して"年"に格納
/と/の間の値を"月"に格納、右から一つ目の/から最後尾までの数値を"日"に格納して、シリアル値を返す・・・とか
いくらでもやり方はあるわけだが。
方法ではなく、単に記述が解らないというだけなら842の指摘通りVBAの本でもVBA解説サイトでも勝手に調べて。

844名無しさん@そうだ選挙にいこう :05/01/22 23:11:33
何度も既出のネタかもしれませんが教えてください。
エクセルのセルを2つ以上に結合させると、連続データの作成で、
先頭のセルから下に向かってドラッグすると加算が1ずつではなく2ずつされてしまいます。

結合したセル
行いたい加算方法
A1A2には=Sheet2!『A1』
A3A4には=Sheet2!『A2』
A5A6には=Sheet2!『A3』

      ・
      ・

実際になる加算
A1A2には=Sheet2!『A1』
A3A4には=Sheet2!『A3』
A5A6には=Sheet2!『A5』

      ・
      ・

どうしてもこの『Sheet2!A5』の部分が結合させたセルの頭の数字になってしまうので
なんとか解消したいです。

スッキリとさせたいと思います。よろしくお願いします。m( __ __ )m

845名無しさん@そうだ選挙にいこう :05/01/22 23:13:10
│  A  │ B │
 食費    150
 交通費  2000
 食費    2500
 携帯費  3800
 交通費  1200

↑この状態で食費の合計を出すにはどうすればよいでしょうか?
最終的にはそれぞれの費用の合計を出せるようにしたいです。↓
食費合計  2650
交通費合計 3200
携帯費合計 3800

初心者ですがよろしくお願いします。

846名無しさん@そうだ選挙にいこう :05/01/22 23:25:52
>844
=INDIRECT("Sheet2!A"&ROW()/2+0.5)

>845
[データ] > [集計]

847名無しさん@そうだ選挙にいこう :05/01/22 23:27:38
Excelを起動すると起動時に、\SriStat\SRISTST.XLAが見つかりません。
ファイルの保存場所が正しいかどうか確認してください。

というエラーメッセージが複数でます。再インストールしても、
治りません。どのようにすれば、エラーが出ないようになりますか?

よろしくお願いします。

848名無しさん@そうだ選挙にいこう :05/01/22 23:32:00
>>843
>文字列として「H00/00/00」という値が入力されたらにHと左から一つ目の/の間にある数値に1988を足して"年"に格納
/と/の間の値を"月"に格納、右から一つ目の/から最後尾までの数値を"日"に格納して、シリアル値を返す・・・

実際、出来ません。どうやって格納するのですか?表示形式内で関数は入力できません。
e.m.d (17.1.22)というユーザー定義をe+1988.m.d (2005.1.22)が出来れば文句無いですが、出来ません。

849名無しさん@そうだ選挙にいこう :05/01/22 23:32:19
OS再インストール

850名無しさん@そうだ選挙にいこう :05/01/22 23:34:22
>848
843で書いた方法はどちらも表示形式のものではなくVBAでの方法だ。
表示形式として出来ないのは当たり前。

851844 :05/01/22 23:39:38
>>846
さっそくのご返答ありがとうございます。
大変感謝。m( __ __ )m

852名無しさん@そうだ選挙にいこう :05/01/22 23:46:57
>>847
過去に↓ を使ってた or 使用中?
ttp://software.ssri.co.jp/lineup.html
↑ を呼び出したが、そのファイルが存在しないので出たエラー。
正しくアンインストール/バージョンアップされなかったか、
そもそもインストールされてないからっぽい。

確認として、メニューの [ツール]→[オプション]→[全般] で
[XLSTART 代替フォルダ名]なんかも見てみたほうがいいかも。

853名無しさん@そうだ選挙にいこう :05/01/22 23:56:54
>>835
やはり,そのままでは分母はそうなってしまいますか…

しかし,average において空白も分母の数に含めてしまうのでは,
配列数式において average を使う場面が限られてしまうと思うのですが…

それとも,配列数式において,うまく空白をノーカウントにできる方法でもあるのでしょうか?

854845 :05/01/23 00:52:18
SUMIF使えば良いんですね。すみませんでした

855名無しさん@そうだ選挙にいこう :05/01/23 01:46:37
>838
今、思い出したんだが、表示形式"yyyy/m/d"が設定されてるセルで
"h17/1/22"と入力すれば、VBAで置き換えるまでもなく自動で"2005/1/22"に置き換わるはずだ。
h入力無しで行きたいならVBAしかないけど。

856名無しさん@そうだ選挙にいこう :05/01/23 09:23:08
>>853
こんなんでどうでしょか。あまりスマートじゃありませんが。
見づらいので絶対参照は抜いてあります。

=AVERAGE( IF((A1:A10="東京")*(B1:B10<>"") ,B1:B10, "") )
=AVERAGE( IF((A1:A10="大阪")*(B1:B10<>"") ,B1:B10, "") )

平均を計算するための条件に、B列のセルが空白でないという条件を
加えてみました。これだと空白セルの分は無視します。

857名無しさん@そうだ選挙にいこう :05/01/23 09:45:05
別のソフトをインストールしたら、メニューバーが消えてしまいました。
表示させるにはどうしたら良いでしょうか?

858名無しさん@そうだ選挙にいこう :05/01/23 10:41:31
excel終了→*.xlbを検索→削除

859名無しさん@そうだ選挙にいこう :05/01/23 10:55:25
>>858
すみません。初心者なもんで、詳しく教えてください。

860名無しさん@そうだ選挙にいこう :05/01/23 10:56:19
>>859
氏ね

861名無しさん@そうだ選挙にいこう :05/01/23 11:00:52
>>859
んじゃ、ここ読んでガンガッテ
http://support.microsoft.com/default.aspx?scid=kb%3bja%3b880939#2

862名無しさん@そうだ選挙にいこう :05/01/23 11:29:01
検索しました。
Excel10.xlbが見つかりませんとでました。

863名無しさん@そうだ選挙にいこう :05/01/23 11:33:56
バージョンは?
2000 なら、excel.xlb
2003 なら、excel11.xlb
ひっくるめて、>→*.xlbを検索汁
くれぐれも先にExcelは終了しておく


864名無しさん@そうだ選挙にいこう :05/01/23 14:41:40
超初心者です。グラフについて質問です。
折れ線グラフを作りたいのですが、X軸の原点が0からではなく、
1から始まってしまいます。X軸を0から始めるにはどうしたらいい
のですか?くだらない質問ですいません・・・。

865名無しさん@そうだ選挙にいこう :05/01/23 14:48:39
超初心者・・・・・ですか。
ここは初心者以上の方対象のスレなので
自力で超初心者から脱してからまたおいで下さいませ。

866名無しさん@そうだ選挙にいこう :05/01/23 15:05:02
>>864
どんなデータを使っているのか不明なので、
はっきり判らんけど・・・

a、0から始まる項目軸ラベルを準備して、それをグラフに参照させる
b、散布図を使う

の、どちらか辺りだと思われます。

867864 :05/01/23 15:26:47
>>866
aの方法で解決できました!!丁寧に教えていただいて
どうもありがとうございました。

868名無しさん@そうだ選挙にいこう :05/01/23 15:32:16
解決オメ。
866の説明でグラフやれるなら、超初心者なんて謙遜しなくていいよ。
865みたいのは、どこにでもいるからキニシナイ。
何も中身ある事が書けないくらいの奴だからさ。

869名無しさん@そうだ選挙にいこう :05/01/23 15:48:43
>>856
おぉ!サンクス!
まだまだ精進が足りなかったようです。


870名無しさん@そうだ選挙にいこう :05/01/23 16:07:42
>>868
Rtn = MsgBox(">>868は無能ですか?", vbYesNo)
If Rtn = vbYes Then
 MsgBox "その通りですね"
Else
 MsgBox "嘘はいけませんよ"
End If

871 :05/01/23 18:03:46
回答者をからかうのは快感でしゅ(^▽^)
けけけ(^▽^)

872名無しさん@そうだ選挙にいこう :05/01/23 18:27:28
質問です
excel2003、winXP使用

xyz10001のような文字と数字が並んでいる2種類(A列とB列)のデータ間で、
重複を調べるのに COUNTIF(A:A,B1)と数式を作り、
コピー&ペーストをしましたが、数式が正確に実行されません。
F2→Enterをすると実行されますが、1500以上データがあるのでかなり手間が
かかってしまいます。解決方法を教えてください。

873名無しさん@そうだ選挙にいこう :05/01/23 18:29:55
ツール>オプション>計算方法
計算方法は自動になってまつか?

874872 :05/01/23 18:32:00
>>873
自動になっています

875872 :05/01/23 18:36:38
>>873
すみません
そのファイルだけ、自動になっていませんでした。
自動にしたら正確に実行されました。
これでうまく出来そうです。ありがとうございました。

876みどり :05/01/23 18:56:53
おほほほほ。

877名無しさん@そうだ選挙にいこう :05/01/23 19:24:13
よろしくご指導願います。

久しぶりにエクセルデータを開こうとしたら、「読み取り専用もしくは暗号化されているため開けません」と出ます。

読み取り専用の属性ははずしてあるので、暗号化かと思います。どうしたらいいでしょうか?

878名無しさん@そうだ選挙にいこう :05/01/23 19:29:47
すべてのセルの"?"を"n"に変えるにはどうすればよいですか?

879名無しさん@そうだ選挙にいこう :05/01/23 19:30:20
ワークシートを左右に分割したんですけど上下にスクロールさせると一緒に動いてしまいます。別々にスクロール表示させるにはどうしたらよろしいんでしょうか?
バージョンは2000です。宜しくお願いさます。

880名無しさん@そうだ選挙にいこう :05/01/23 20:37:37
すみません、お願いします。

非連続のセルを選択して折れ線グラフを表示させたいのですが
セルひとつを個々のデータと認識してしまうのでできません。
ひとつのデータとして扱うことはできるのでしょうか?


881880 :05/01/23 20:47:02
すみません、解決しました。失礼しました。

882名無しさん@そうだ選挙にいこう :05/01/23 20:52:35
>>879
メニューの[ウィンドウ]→[新しくウィンドウを開く]を選択したあと
メニューの[ウィンドウ]→[整列]→[左右に並べて表示]

883名無しさん@そうだ選挙にいこう :05/01/23 20:54:41
>>878
検索する文字列 ~?
置換する文字列 n


884879 :05/01/23 22:15:19
解決しました。ありがとうごさいました。

885名無しさん@そうだ選挙にいこう :05/01/23 22:20:18
>>805
優しい人が答える。それで良いんじゃないのか?

886 :05/01/23 22:29:31
それでいいのでしゅ(^▽^)

887名無しさん@そうだ選挙にいこう :05/01/23 23:04:19
A1〜Z1まで左から順に1位 2位 3位 4位…と入っており
A2〜Z2には最大100最小10の数値が大きい順に入っています。
このセットが400行くらい記入されたデータがあります。

AB2〜AB400にはその行(セット)に存在するある数値が入っており
その数値が何位なのか?をAC2〜AC400に書き出して行きたいのですが
イマイチ上手く行きません。

A  B  C  D  E  F   X Y Z AA AB AC
1位 2位 3位 4位 5位 6位
98 95  83 81 65  51 〜 18 15 11   51 6  ←51はこのセットでは6位
のような感じです。

hlookup関数は下への検索はできても今回のような上(1行目)の検索はできなさそうですし。
指定範囲中、何番目に大きい値か?を返す関数があるのでしょうか?
調べてみましたが見つけることができませんでした。
何か良いアイデアがあれば教えていただけないでしょうか?

win2000 excel2002です。

888名無しさん@そうだ選挙にいこう :05/01/23 23:27:49
>887
普通にRANK関数じゃ駄目なの
=RANK(AB2,AB$2:AB$400)
をAC2に入力したら、AC1:AC2の二つのセルを選択して下方にフィルコピー

889名無しさん@そうだ選挙にいこう :05/01/23 23:34:53
>>888
いや、充分です。ホント充分です。
rankかぁ…知りませんでした。ありがとうございます。

890名無しさん@そうだ選挙にいこう :05/01/24 00:00:59
2002なんですが
ダウンリストを別のシート飛ばすには
どうすればいいのでしょうか?

891名無しさん@そうだ選挙にいこう :05/01/24 00:07:48
>890
ダウンリストって何?

入力規則のドロップダウン式リストなら、
シートを跨ぐ設定は出来ないから、VBAでやるか
リストにしたいデータを、リストを使いたいシートに書き出して
そのセル範囲を指定した上で非表示にするとかしな。

892名無しさん@そうだ選挙にいこう :05/01/24 00:21:34
>891
そうなんですか、ありがとうございました。

893名無しさん@そうだ選挙にいこう :05/01/24 00:24:59
>>891
入力規則でシートをまたぐ場合は
参照される範囲に名前を付けて(例 リスト範囲)
リストの元の値欄に =リスト範囲

これでどのシートからでも、何回でも参照できる

894名無しさん@そうだ選挙にいこう :05/01/24 00:28:40
>>891
シートまたぎは可能だろ。
名前を付けて,それを指定すればいい。

895名無しさん@そうだ選挙にいこう :05/01/24 00:29:14
かぶってた…_| ̄|○

896名無しさん@そうだ選挙にいこう :05/01/24 00:37:56
VBA、リストを使うセルに書き出し、定義参照
3つの方法があるわけだな
ただ、VBAは最初が面倒、書き出しはファイル容量が増える、定義参照は消費メモリが増える
一長一短だな

897Windows2000で、Exel97を使っています。 :05/01/24 06:39:38

他のシートのセルを参照する方法について、お尋ねさせて戴きます。

具体的には、「=ADDRESS(ROW()-2,1,4,TRUE,"別のシート名")」 としてもセルが参照されず、
そのまま「別のシート名!A〜」と表示されてしまいます。

ExcelXP下でも同様の状況でしたので、関数の凡ミスとしか思えないのですが、
どうにも見当が付かず、こちらをお頼りした次第であります。
ご教示のほど、よろしくお願い申し上げます。

898名無しさん@そうだ選挙にいこう :05/01/24 07:53:45
>>897
ADDRESS関数は、「セル参照を表す文字列を作る」関数なのでそれで正解。
実際にそのセルを参照するには、
=INDIRECT(ADDRESS関数で作った参照文字列)
仮にADDRESS関数でD2セルに「別のシート名!A〜」と表示されていればINDIRECT(D2)ね。

899897 :05/01/24 08:39:38
>>898
さっそくのご回答、どうもありがとうございます!助かりました!

900名無しさん@そうだ選挙にいこう :05/01/24 08:45:06
セルに数式がそのまま表示されて、値がでません。
書式設定とか見るとサンプルのとこにはちゃんと答えでてるのに…。
お願いします。・゜・(ノд`)・゜・。

901名無しさん@そうだ選挙にいこう :05/01/24 08:57:58
ツール>オプション>表示>数式 のチェックを外す

902名無しさん@そうだ選挙にいこう :05/01/24 09:05:57
もどったー
ありがとうございますヽ(゚∀゚)ノ


903名無しさん@そうだ選挙にいこう :05/01/24 09:49:09
WindowsXPでExcel97+Office97CDの中の
極東サポートパッチ(KORSUPP.exeとか)で
新規作成で他言語の表示と編集はできるんだけど
他の環境で作られたファイルでは文字化けします。
文字化けを直す方法は無いものでしょうか?

NT+Excel97だとOKなんだけどなぁ。

904名無しさん@そうだ選挙にいこう :05/01/24 10:14:11
「*」 を 「★」 に置換するにはどうしたらいいですか。
「\*」 でエスケープ出来ないんですが。

905名無しさん@そうだ選挙にいこう :05/01/24 10:16:27
>>712 で行けました。。。ごめんなしあ

906名無しさん@そうだ選挙にいこう :05/01/24 10:34:32
Q. * 、 ? で検索するとワイルドカードとして認識されてしまいますが、
  * 、 ? の文字自体を検索するにはどうすればよいですか?
A. ~* 、 ~? のように、頭に ~ を付けることでエスケープ出来ます。


FAQに入れますか?不要ですか?

907名無しさん@そうだ選挙にいこう :05/01/24 11:14:50

入れるべきに一票 ノシ

908名無しさん@そうだ選挙にいこう :05/01/24 18:13:38
>>906

>>711
さんの答えもついでにFAQに入れるに3000点

909名無しさん@そうだ選挙にいこう :05/01/24 18:25:36
winXp+Excel2003なのですが

マクロの記録で、教えて下さい
自動記録で生成されるコードが、一定以上長くなると勝手に _ がついて改行されるのですが
改行されないようにすることは出来るのですか?

改行された方が見やすいとも思うのですが、一命令一行の方が都合がいいのです


910名無しさん@そうだ選挙にいこう :05/01/24 23:58:14
winXp+Excel2002なのですが

データを入力した時に自動的に隣のセルも数値が入るようにする設定はありますか?
例えば、C50にデータを手動で入れたときに、D50、E50にはあらかじめ決められた計算を自動的にして入力してくれるという。

やり方がわからないので、今はその都度、範囲指定して右下+でドラッグしてます。(オートフィル)

911名無しさん@そうだ選挙にいこう :05/01/25 00:05:59
フィルでコピーできる様な関係が、4行ぐらいあれば
あとはデータを入れれば勝手にフィルしてくれる筈。
この機能、2002なら付いてたと思う

912910 :05/01/25 00:10:20
>>911
即レス。ありがとうございます。
最初の頃は仰るとおりできたはずなんですが、いつからかできなくなってました。
何か、設定とかありますか?

913名無しさん@そうだ選挙にいこう :05/01/25 00:22:07
ツール>オプション>編集>データ範囲の形式および数式を拡張する
のチェックを入れる。(デフォルトは入ってる。)

914名無しさん@そうだ選挙にいこう :05/01/25 01:18:34
EXCEL2002+WindowsXPproです。

毎回変わる選択範囲で、四隅をアクティブにする方法がわからず困ってます。
例としてA1:D5の選択範囲で右下になるD5をアクティブにするマクロを書くとしたら
どうなるのでしょうか?
よろしくお願いします。

915名無しさん@そうだ選挙にいこう :05/01/25 01:22:58
p://t_shun.at.infoseek.co.jp/My_Page/Excel-VBA/vba_page5.htm

916名無しさん@そうだ選挙にいこう :05/01/25 06:40:08
WinXPpro+Excel2000の環境です。
平均値の2倍より上は加算しないということをしようとしています。
A11にA1〜A10の平均値を入れるとして、

SUM(IF(A1:A10<A11*2,A1:A10,0))

としましたが、#VALUE!か表示されてしまいます。
サポートページの
ttp://support.microsoft.com/kb/267982/JA/
に掲載されている

SUM(IF((A1:A10>=1)*(A1:A10<=10),B1:B10,0))

などをやっても#VALUE!が表示されます。
セルの表示形式を変更しても改善されず、困っています。
これはどうしたら解決できるのでしょうか?
よろしくお願いします。

917916 :05/01/25 06:55:34
自己レスです。
すいません、解決しました。
ヘルプの見落としでした。
"Ctrl キーと Shift キーを押しながら Enter キーを…"
って書いてありますね。。

918910 :05/01/25 16:13:32
>>913
ありがとうございます。
>>910の「C50にデータを手動で入れた」というところですが、
直接数字を打ち込むのではなく、他のところからデータを持ってきて
貼り付ける(→貼り付け先の書式と一致させる)とやはりうまくいきません。
何か方法はあるでしょうか?



919名無しさん@そうだ選挙にいこう :05/01/25 16:20:14
>>918
> D50、E50にはあらかじめ決められた計算を自動的にして入力してくれるという。
決められた計算なら数式入れとけば?

920名無しさん@そうだ選挙にいこう :05/01/25 16:52:09
スイマセン、質問させてください。
自分はEXCELでセルへの文字入力などでF2やEscを多用するのですが、
頻繁にF1を押してしまい、都度ヘルプが立ち上がるのでかなりウザい
のです。
F1のヘルプ起動を無効化することは出来ないでしょうか?
Excelだけの問題ではないかもしれませんがよろしくお願いいたします。


921名無しさん@そうだ選挙にいこう :05/01/25 17:13:33
>>920
X Button Makerでも使ってF1キーに別なキー(F2)でも割り当てておけば?
常駐させる必要あるけど。
http://www.vector.co.jp/soft/win95/util/se205254.html

922名無しさん@そうだ選挙にいこう :05/01/25 17:21:58
>>920
Application.OnKey "{F1}", ""
を一度実行させる。

923920 :05/01/25 17:38:00
>>921
 なるほど、そんなソフトがあるんですね。ちょっと試してみます

>>922
 VBAを実行ですか、なるほど。ちょっとやってみます。

ありがとうございましたm()m

924名無しさん@そうだ選挙にいこう :05/01/25 21:02:08
一つ質問です。

Sheet1のA1からA10にSheet2のB1からB10の内容をそのまま入れようと思い、
Sheet1のA1に=Sheet2!B1と入力したあとA10までオートフィルで入力しました。
ところが、たとえばSheet2に入力したデータの途中に新しく追加しようと思い、
たとえばSheet2のB4にセルを挿入しても、Sheet1のA1からA10では元から参照していたセルの内容が表示されます。
(勝手に参照先が適宜変更される。)

つねにA1-A10のセルは常にSheet2のB1-B10を参照させたいのですが、どうすればよいのでしょうか?
今のところ覚えたてのIndirect関数を使い
=INDIRECT("Sheet2"&"!"&ADDRESS(ROW(),COLUMN()))
と参照させているのですが、他に何か方法があるのでしょうか?
それともこういう場合はIndirect関数を使うものなのでしょうか?

925名無しさん@そうだ選挙にいこう :05/01/25 21:23:46
>>924
INDIRECT

926名無しさん@そうだ選挙にいこう :05/01/25 21:25:08
なんだ使ってるのか。最後まで読んでなかった。スマソ

927名無しさん@そうだ選挙にいこう :05/01/25 21:43:16
> それともこういう場合はIndirect関数を使うものなのでしょうか?
はい、そうです。
相対参照も絶対参照もセルの挿入、削除に対しては相対移動するので
セルの挿入、削除後も参照先を移動したくなければINDIRECT関数を使うかVBAを使ってください。

928名無しさん@そうだ選挙にいこう :05/01/25 22:25:02
どなたか教えてください
仕事用PCのExcelなんですが
セルに「28」と入力すると勝手に「29」に変わってしまいます
計算式やオートフィルで28の場合はそのままなんですが
なぜか直接入力では変わってしまいます。ほかの数字は大丈夫です
他の同僚のPCはなんともないようです
XpProでオフィスxpですたしか
よろしくお願いします

929名無しさん@そうだ選挙にいこう :05/01/25 22:28:38
マクロ入ってませんか?

930928 :05/01/25 22:43:26
>>929
明日確認してみます。
もしかしたら、他人が元を作った表を使いまわしてたりするんで・・・
でも、新規で作った表もなるような気がします
レスありがとうございました

931名無しさん@そうだ選挙にいこう :05/01/25 22:52:17
初めて質問します。よろしくお願いします。
エクセルで縦、横にわりと長い表があったときに、
表中の数字を全て一列(or一行)で表示するにはどうしたらよいでしょうか?
かなり大きな表がいくつかあるので、コピペではたいへんなのです。
教えてください。

932名無しさん@そうだ選挙にいこう :05/01/25 22:54:16
>>931
何がしたいのかよく分からん。

933名無しさん@そうだ選挙にいこう :05/01/25 22:54:33
>>930
追加です。キーボードの取り替えも試して下さい

934928 :05/01/25 23:00:24
>>930
「8」は入力できるんでキーボードは問題ないと思われます
なぜか「28」だけがEnterを押すと「29」に変わってしまいます


935名無しさん@そうだ選挙にいこう :05/01/25 23:00:47
VBAで出来ます。
仕様がきちんと書かれてないため
具体的な記述は教えようがないので自分で書いてください。

936名無しさん@そうだ選挙にいこう :05/01/25 23:02:12
一つのシートにある数字の配列を一列に並べ替えたいんですが・・・

937名無しさん@そうだ選挙にいこう :05/01/25 23:13:41
>>936
A1 B1
A2 B2
ってのを
A1 B1 A2 B2
とか
A1
A2
B1
B2
みたいにしたいんだろ。
それならVBAで一発だよ。
ただ、1列にするのが2パターン、1行にするのが2パターン、計4パターンあるし、
空白セルをどう扱うかも、対象は値だけなのか書式も含めてなのかも書いてないので
具体的なコードを書いてやることは出来ないってこと。
後出し条件は御法度だし簡単だから自分で勉強して書け。

938名無しさん@そうだ選挙にいこう :05/01/25 23:52:31
就職活動中の大学3年生の者です。
社会人になる前に、EXCELLとWORDの基本はマスターしようと家のOffice XP 2002で練習を始めたのですが
やはり最新版の2003でアップグレードして練習したほうがいいでしょうか?



939名無しさん@そうだ選挙にいこう :05/01/25 23:57:32
>938
金が余ってるならアップグレードしないよりはしたほうがいいが、
現在使ってるのが2002ならさして必要性もないだろ。
基本操作は全く変わらないので、2003で追加された機能に
魅力を感じるようになるくらい2002を使い込んでから乗り換えても遅くない。
そのころには次のバージョン出てるかもしれないし。

940924 :05/01/26 00:08:27
>>924-927
なるほど。どうやら間違った方向に入ってなかったようで何よりです。
レスどうもです。

941名無しさん@そうだ選挙にいこう :05/01/26 00:35:23
>>939
アドバイス、ありがとうございます。
お金の余裕がないので、とりあえず2002をマスターします。

942名無しさん@そうだ選挙にいこう :05/01/26 00:50:56
>>928
>セルに「28」と入力すると勝手に「29」に変わってしまいます
なんかワロタ

943名無しさん@そうだ選挙にいこう :05/01/26 00:55:21
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = 28 Then Target.Value = 29
End Sub

944名無しさん@そうだ選挙にいこう :05/01/26 00:58:00
>>934
オートコレクトで登録されてたりして

945名無しさん@そうだ選挙にいこう :05/01/26 01:20:32
区の調理員の平均年収は、約800万円
http://www.horibe-yasushi.com/Aaa/20010601.htm
民間の倍、年収1300万円も
http://www.mainichi-msn.co.jp/keizai/wadai/price/archive/news/20040110ddm008020999000c.html
大阪市の市バスの運転手さんの年収は実は1000万以上
http://hatena.ne.jp/1073446112
学校用務員の年収880万円 公用車運転手年収1000万円 清掃業年収900万円
http://www.gaku.tv/simin/simin1.htm

東京都町田市の例
http://otd9.jbbs.livedoor.jp/916693/bbs_plain?base=5896&range=1

http://www.2log.net/home/zk1/archives/blog36.html

#すべて具体的根拠にもとづく数字です。
#この結果区立小中学校の給食費は人件費だ
#けで¥2000/食となります。
#(給食のおばさんはすべて区の正職員、勤続期間が長いので
#大半が年収800万以上、退職金は3500万以上です)

#乗用車運転職が57名います。
#最高年収1150万円 平均運転走行距離23キロ/日です。

#役所内はダイアルインですが未だに電話交換手が12名います。平均給与880万円。

946名無しさん@そうだ選挙にいこう :05/01/26 03:51:40
excel2000を使っています。
VBAで図形を扱いたいのですが、
図形1がActiveSheet内にあったら削除、なければメッセージを表示する、
とするにはどのように記述すればいいのでしょう?
For Each 図形 In ActiveSheet.Shapes
If 図形.name = 図形1 then
図形1.delete
End If
Next
という書き方をしたのですが、指定されたオブジェクトがありません
といわれて終わってしまいます。

947名無しさん@そうだ選挙にいこう :05/01/26 09:34:57
エクセル2003です。
点数毎にランク付けをしたいのですが、、

条件として、例えば、
50〜60点  → D
61〜75点  → C
76〜90点  → B
91〜100点 → A     と有った場合。

一つのセルの中に 80点を入力したとします、
で、その横のセルに上記の様な条件で Bと
表示させたいのですが、どうすればいいでしょうか?

よろしくお願いします。

948名無しさん@そうだ選挙にいこう :05/01/26 10:22:46
>>947
IF関数 または VLOOKUP関数とセルにリスト(表)
作業セルを使いたくないなら IF()
ランク付けの基準が変わる可能性or一目瞭然なら、VLOOKUP()



949名無しさん@そうだ選挙にいこう :05/01/26 11:49:55
>>946
図形.delete

950名無しさん@そうだ選挙にいこう :05/01/26 14:21:39
>>948
ども ありやとやんした。

IF関数を使ってやってみたんですが、

=IF(A1="","",IF(E5>=70,"A","B"))

位しか思いつかない… orz

これだと 70以上と70未満くらいしか分けられません
どうかお知恵を拝借したいのですが…。

951名無しさん@そうだ選挙にいこう :05/01/26 14:28:27
>950
=IF(A1>=91,"A",IF(A1>=76,"B",IF(A1>=61,"C",IF(A1>=50,"D",""))))
又は
0    =""
50   D
61   C
76   B
91   A
という表を作って
=VLOOKUP(対象セル,上記表範囲,2)

952名無しさん@そうだ選挙にいこう :05/01/26 14:34:09
>>951
うほっ 早ぇー 重ね重ね サンクスです。



953766 :05/01/26 15:09:10
>>766が解る方居ませんか?

954名無しさん@そうだ選挙にいこう :05/01/26 15:13:15
>>953
シートの背景に画像を置くことはできますが、個々のセルの背景に置くのは
できないのではないかと。
私が知らないだけかもしれませんが、誰も知らないからレスがつかなかったのでは?

955名無しさん@そうだ選挙にいこう :05/01/26 15:18:33
>953
954氏と同様に存じます。
不便でもテキストボックスなどと併用するしかないでしょう。

956名無しさん@そうだ選挙にいこう :05/01/26 15:36:43
エクセルにおける問題かわからないのですが、
10の9乗という式を表示したいのですが、
10の右上に小さい9をつけるような表示の仕方は
できるでしょうか?方法がありましたらご教授ください。


957名無しさん@そうだ選挙にいこう :05/01/26 15:40:09
OS2000 excel97です。
ご面倒かけますが質問があります。

数字のデータがいくつかあります。
その中の組合せの合計が希望する数字にもっとも近くになる組合せを見つけることは
エクセルでできるでしょうか?

例)
データ
1234
20
514
800
12
456・・・・

などの任意のデータ(数字)をいくつか抽出(組み合わせ)して
その合計をたとえば400とか希望にできるだけ近いデータの組合せを見つけることをやりたいと考えております。

こんなことはエクセルで可能でしょうか?

どなたかわかる人ご教示ください。
よろしくお願いします。



958名無しさん@そうだ選挙にいこう :05/01/26 15:49:29
>>957

>>7 が近いのでは?

959名無しさん@そうだ選挙にいこう :05/01/26 15:51:21
>>956
109 と入力します。
数式バー内で「9」だけを選択します。
右クリックして、セルの書式設定で「上付き文字」にチェックします。

もし、Excelで計算できる式というなら、 =10^9です。

>>957
お望みの答えとは違いますが・・・
>>7(FAQ)をご参考に。

960956 :05/01/26 15:56:22
>>959
ありがとうございます!助かりました。
仕事に戻ります・・・

961名無しさん@そうだ選挙にいこう :05/01/26 16:13:01
マクロでオートシェイプを制御していて、そのオートシェイプに他のオートシェイプを重ねて表示した時、
マクロが誤作動する
これを解消するにはどうしたらいいでしょうか?


962名無しさん@そうだ選挙にいこう :05/01/26 16:14:43
ちなみにEXCELのヴァージョンは2002です
よろしくお願いしますm(_ _)m

963名無しさん@そうだ選挙にいこう :05/01/26 17:16:25
印刷時のページ番号がわかる関数ありませんか?
ヘッダーではなくてセルの部分にページ数/総ページ数をいれたいんです。

ちなみにExcel2000 winです

964名無しさん@そうだ選挙にいこう :05/01/26 17:40:40
>>961
どんなマクロ制御してるのかや、誤作動の内容を書かなかったら、
レスつけられないと思う

>>963
1ページの行数と列数、セル番地を使って計算しましょう。
VBAではそれが定法になってます。ということはそんな関数が無いと云うことと思われ

965名無しさん@そうだ選挙にいこう :05/01/26 18:19:06
質問です。
関数で計算した結果、小数点以下が
例えばあるセルでは34.12345、あるセルでは123.44などとなるのですが
小数点以下、有効数字を2ケタに揃えたいのですがこの場合どうすればいいのでしょうか?

osは2000,officeも2000です。よろしくお願いします。

966名無しさん@そうだ選挙にいこう :05/01/26 19:10:34
質問です。
A1に=1+1と入力してあったとして
別のセルでA1を参照した時、計算結果の2ではなくて「=1+1」と表示させることは出来ますか?

967名無しさん@そうだ選挙にいこう :05/01/26 20:49:41
>>944
きっと、それだ!!!
(いたずらか、よく分からんおっさんがいじくったと思われ)

968名無しさん@そうだ選挙にいこう :05/01/26 20:54:03
>>966
普通は無理っぽい。
VBA使えば強引にできるかも、、、

969名無しさん@そうだ選挙にいこう :05/01/26 20:54:39
>>965
セルの書式というのがある。
ヘルプみなはれ。

970名無しさん@そうだ選挙にいこう :05/01/26 21:14:13
お尋ねします。3台のネットワークでXP、エクセルは2000です。
うちの1台で作成した表の中のセルで、たとえば「0000456」と入力→表示できる書類を
他の2台に渡したら、うちの1台だけ「456」と0がなくなって表示されました。
問題のセルを選択して「表示形式→文字列」の設定を行うと元の通りに表示されましたが、
作成時の設定が変わらない設定は、どうすればいいんでしょうか?

971名無しさん@そうだ選挙にいこう :05/01/26 23:25:25
Excel2002で行の表示状態を切り替えるVBAなんですが、
11〜10000の間で「一桁目が1又は0の行のみ表示」と「全行表示」を切り替えたいんですが
全行表示は Rows("11:10000").EntireRow.Hidden = False で問題ないけど、一部非表示のほうが
 For r = 11 To 9991 Step 10
  Rows(r + 1 & ":" & r + 8).EntireRow.Hidden = True
 Next r
だと999回処理を繰り返すため時間が掛かる(といっても2秒くらいだけど)ので
 Range("12:19,22:29,32:39,・・・・・,202:209").EntireRow.Hidden = True
 Range("212:219,・・・・・
のように直接行を指定してみたが、多少は改善されたが50行あるのでまだレスポンスが悪い。
なんとか1行コードか、またはそれに匹敵する処理速度を出す方法は無いでしょうか?
OSはWindowsXP、構成はAth64 3500+、DDR400 2048MBで、スペックアップは出来ません。

972名無しさん@そうだ選挙にいこう :05/01/27 00:43:15
>>971
application.ScreenUpdatingは使ってる?
全表示用のシートにデータ入力する際に、
一部表示用のシートも同時に作っておくとか?

973名無しさん@そうだ選挙にいこう :05/01/27 01:31:44
>972
Application.ScreenUpdatingは使ってます。
↑はイベントプロシージャの先頭と最後にあり、>>971のコードは
中間にあるので書くのを忘れてました。すいません

シートを別々に用意するのは、現在のシートで
Worksheet_Changeやシーケンシャルテキスト入力など使ってるので
同期させるのが困難です。

974名無しさん@そうだ選挙にいこう :05/01/27 01:53:25
OS・XP Excel・2002 です。
速度のデータを時間で積分して距離にしたいのですが、
積分する関数とかありますか?

975名無しさん@そうだ選挙にいこう :05/01/27 02:04:29
>>974
関数としてはないようだけど、
台形法とかシンプソンとか別にむずかしくないので
作業列を作ってやったらいいんじゃない?

976名無しさん@そうだ選挙にいこう :05/01/27 03:49:17
教えてください。
対数目盛表記でのグラフを描いています。
y軸の数値が「10,100,1000,10000,100000,1000000」となり、全て表示させるためには横長になってしまいます。
指数表示にしようと、書式設定を見たら「E」を使う表記法はありました。
理想としては(10^2)10の2乗とか(10^3)10の3乗といったような累乗が上付きで表記されるようなものです。
ご存知の方は、伝授していただけないでしょうか?
よろしくお願い致します。

977名無しさん@そうだ選挙にいこう :05/01/27 04:07:19
>>976
残念ながら仕様上無理です。
どうしてもと云う時は、テキストボックスなどを用いるしかありません。
でも、対数グラフを使うようなケースや人々はEを用いる表に
慣れている事が多かったりもします。

978名無しさん@そうだ選挙にいこう :05/01/27 07:12:25
質問です。

数字がなしなら空白、
1001以下なら5
1001以上,10001以下なら10
10001以上20001以下なら20
といった具合で10づつの手数料の計算のシートを作ってるのですが

最大 7 つまでの IF 関数とヘルプにあり7つまでしか作れず70001以下なら70とそれ以上も作りたいのですが作ることができません。
なにかいい方法ないでしょうか?

これが計算式です。

=IF(H32<1,"",IF(H32<1001,5,IF(H32<10001,10,IF(H32<20001,20,IF(H32<30001,30,IF(H32<40001,40,IF(H32<50001,50,IF(H32<60001,60))))))))

979名無しさん@そうだ選挙にいこう :05/01/27 07:31:12
>>978
VLOOKUPで表引き。
>>950-951あたりのやりとりで説明されてるのと基本的に同じ。
あとはVLOOKUPのヘルプを参照。

980名無しさん@そうだ選挙にいこう :05/01/27 07:55:41
>>979

ありがとうございます。ヘルプ読んでためしてみます。

981名無しさん@そうだ選挙にいこう :05/01/27 08:58:07
>>978
1001以上は CEILING(H32/1000,10) でいいんじゃないの?

982980 :05/01/27 09:14:06
>>981

=IF(H32<1,"",IF(H32<1001,5,CEILING(H32/1000,10)))

これで合ってるでしょうか? VLOOKUPの表引きの表作りまでいっててこづっていましたが
なんかこれでできてるっぽいんですが。

983980 :05/01/27 09:29:04
どうも完成したみたいです。。ありがとうございました。すごく嬉しいっす。

984名無しさん@そうだ選挙にいこう :05/01/27 10:03:57
関数を作成してマウスでセルの右下を移動したら
セルの参照しているセル番号も連続するじゃないですか。

式の中で一つの固定したセルを引用しながらセルを
連続させる記号って何でしたっけ?



985名無しさん@そうだ選挙にいこう :05/01/27 10:06:34
$

986名無しさん@そうだ選挙にいこう :05/01/27 10:09:49
>>985
ありがとうございます。
さっき$をやってもダメだったような感じがしたので
ここで聞いてみました。
もう一回やってみます。

987名無しさん@そうだ選挙に行こう :05/01/27 10:39:31
$a$1

988名無しさん@そうだ選挙にいこう :05/01/27 11:38:48
セルの入力補助用にコメントみたいな白い四角が出てきます
(コメントではないです)
ただ、テキストが表示されてるだけなんですが、これ(なんて呼べばいいかわかりません)の編集方法をお教え願えませんか?


989名無しさん@そうだ選挙にいこう :05/01/27 12:13:05
自宅の windows 2000機から職場にあるexcell のデータを編集したいのですが、
一番安全で楽な方法は何でしょうか?

職場の excell のデータは linux 機に乗っています。職場では windows 
xp 機からsamba で そのデータがある linux 機の directory を mount して
使っています。Linux 機は apache http と open ssh を firewall を通おす
よう設定していますが、他は通していません。apache は安全のためほとんど
何もできないよう設定していますが安全が確認できれば設定を代えられます。
他のprotocol もこの機械に関しては私の一存で通そうと思えば通せます。他
の機械は firewall の外からは見えませんし、見せることは禁止されています。

cvs で管理することも考えたのですが、binary はきわめて扱いにくい。せめ
てxml ならと思うのですが、office 2000 ではなんとも。

990名無しさん@そうだ選挙にいこう :05/01/27 14:15:43
>>989
スレ違い。というか板違い。

991名無しさん@そうだ選挙にいこう :05/01/27 17:44:32
グラフの元データとして、同シート内の特定のセルに入力したシート名の指定したセルを参照させたいと思い、
たとえばグラフを貼るシートのB1にシート名を記入し、指定したシートのG4からG14までの数値をグラフにしようと思って
グラフのデータ範囲に
=INDIRECT($B$1&"!"&"$G$4"&":"&"$G$14")
とやったところ数式が間違ってるとエラーが出ます。
ためしに適当なセルに
=INDIRECT($B$1&"!"&"$G$4")
と入力すると正しく参照しているようなのですが、上の数式が間違っているのでしょうか
それともデータ範囲をINDIRECTで指定することはできないでしょうか?

どなたかご教示ください。

992名無しさん@そうだ選挙にいこう :05/01/27 18:02:44
グラフの範囲に関数や演算は使えないと思います。
シートの適当な位置に元になるデータを呼び出しておく必要があるでしょう。


993991 :05/01/27 18:08:09
>>992
レスありがとうございます。
ほかのセルに読み込んでからそっちを指定したところうまくいきました。

994名無しさん@そうだ選挙にいこう :05/01/27 18:45:45
セルにA,B,C,Dと縦に並べて入力しそれぞれ中央ぞろえにしたところどうもCだけ左に寄っているようなのですが
そんなものなのでしょうか?
インデント等は設定しておらず、書式のコピーをしても変わりありません。

995名無しさん@そうだ選挙にいこう :05/01/27 18:49:08
Cはどのようなデータ? データのせいでは無いのよね?

996994 :05/01/27 19:16:19
普通にアルファベットを1文字ずつ入力しただけです。
誤解を招く説明だったので訂正しますが、
縦方向に4つのセルに1文字ずつ入力しました(A1からA4まで)。
書式設定-表示形式も4つとも標準になっています。

997名無しさん@そうだ選挙にいこう :05/01/27 19:27:18
>>995
うちのも「左に寄ってる」ように見えるわ
今まで気づかなかった

998名無しさん@そうだ選挙にいこう :05/01/27 19:41:02
グラフを貼り付けたのですが、他の閲覧したいセルと表示範囲がかぶっています。
ワンクリックでグラフの表示/非表示を切り替えるようなことはできないのでしょうか?

999名無しさん@そうだ選挙にいこう :05/01/27 19:42:17
>>994
フォントがゴシック系なら左に寄って見えるな
明朝系ならば?

1000名無しさん@そうだ選挙にいこう :05/01/27 19:45:25
1000?

10011001 :Over 1000 Thread
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。


戻る
DAT2HTML 0.34 Converted.