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

Excel総合相談所 91 at BSOFT

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

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

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

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

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

2:複乳
10/04/06 17:46:22
>>994
マクロの記録、と前言わなかったっけ
やり方はテキトーにぐぐれ
後はVBAスレがあるからそっちへ行け
ｽﾚﾘﾝｸ(tech板)
本が欲しいなら何でもいいから一冊買えばいい
「初心者」または「入門」と名が付く奴で一番安いヤツかっとけ
バージョンは不問

あとはいきなり命令を記述できるわけではなく
プログラムの大まかな流れを知らないとプログラムは記述できない
VBはVBというソフト、VBAはエクセル等についてくるVB劣化版。
VBAはVBAと言った方がいい。VBの回答だとVBAに対応していない場合がある
>>997
送ったっけ？

3:名無しさん＠そうだ選挙にいこう
10/04/06 19:41:20
>>2
世の中には掲示板とメールの区別がついてなくて、
「掲示板で教える」ことを「メールで送る」って言う人がいるんだよ。

4:名無しさん＠そうだ選挙にいこう
10/04/06 19:42:46
jl

5:複乳
10/04/06 19:45:18
そうなんですか、勉強になります・・

6:名無しさん＠そうだ選挙にいこう
10/04/06 19:47:33
関連スレ
VBAの質問はこちらで

Excel VBA 質問スレ Part14
ｽﾚﾘﾝｸ(tech板)

7:名無しさん＠そうだ選挙にいこう
10/04/06 21:41:08
>>3
> 「掲示板で教える」ことを「メールで送る」って言う人がいるんだよ。
そんなやつ初めて聞いたぞwwwww

8:名無しさん＠そうだ選挙にいこう
10/04/06 21:48:01
>>6
ここは総合だから、VBAはまずここで(´･ω･｀)

9:名無しさん＠そうだ選挙にいこう
10/04/07 03:52:54
>>7
誰にでも初めてってのはあるもんだ。
カカクコムの口コミとか教えてgooとか見てるといっぱいいるぞ。

10:名無しさん＠そうだ選挙にいこう
10/04/07 12:15:23
＞あとはいきなり命令を記述できるわけではなく
＞プログラムの大まかな流れを知らないとプログラムは記述できない
そのあたりはだいたい解っています
123のマクロなら嫌になるほど書いていますから
VBAの言語のマニュアルが欲しいだけなのです
それが無ければ始まらないしそれがあれば後はどうにでもなるでしょうから
ところがこれが無い
市販の本などというのは著者が教えたいことは書いてあってもこちらが知りたいことは書いてないもので不便極まりないです
Excelに入っているVBAを作ったのはマイクロソフトですからそこのマニュアルが有ってしかすべきなのにおかしいことです
マイクロソフトは自分の所ではマニュアルは販売していないと言い張って聞きません
それではExcelを買えばその中にヘルプという形で当然マニュアルが有るだろうと思っていたのですがこれが無い
私にはこんなことは異常に見えますが皆さん納得しているんですか？
いずれにせよお世話になりましたVBAスレに行くことにします

11:名無しさん＠そうだ選挙にいこう
10/04/07 13:06:33
>>10
ヘルプにはVBAの事も当然入ってる。とても読みにくいけどね。

12:名無しさん＠そうだ選挙にいこう
10/04/07 13:40:42
>>11
見にくくてもいいのです
有りさえすれば
ところが無いのです
今までの状況は、
１　エクセル2002のシート全体のセルの背景色と文字の色を変えたい
２　しかしそれは2003以降で出来ることで2002では出来ない
３　ただしVBAマクロを使えば2002でも出来る
とここまで教わってからVBAの言語マニュアルを手に入れるためOfficeXP2002を手に入れてみましたがそのＶＢＡエディターのヘルプに「Worksheet_SelectionChange」やそれらしい言葉を入れても何も出てこないのです
マイクロソフトにマニュアルが別売で有れば買うからと聞いても無いという返事
じゃあどうすれば手に入るのかと聞いてもそういことは教えられないというあきれた返事しか帰って来ません
困ってしまっています
「Worksheet_SelectionChange」の説明がエクセルのＶＢＡエディターのヘルプに本当に有るのですか？

13:名無しさん＠そうだ選挙にいこう
10/04/07 14:24:17
Worksheet(_）SelectionChangeじゃなくて
Worksheet（.←ドット）SelectionChangeでも出てこない？
あるいは　SelectionChange　だけで調べてみた？

14:名無しさん＠そうだ選挙にいこう
10/04/07 15:02:14
>>12

頭悪そうｗ

15:名無しさん＠そうだ選挙にいこう
10/04/07 15:26:14
「SelectionChange」で出てきました！
ありがとうございます
しかし肝心のシート全体の背景の色を変えるというようなことがこれで出来るのでしょうか
出てくるのは下記のみです
-------------------------
SelectionChange イベント
関連項目対象使用例ｱﾌﾟﾘｹｰｼｮﾝ情報
ワークシートで選択範囲を変更したときに発生します。
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Target 新しい選択範囲を指定します。

使用例
次の使用例は、選択範囲がウィンドウの左上隅になるまで、ブックのウィンドウをスクロールします。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow
.ScrollRow = Target.Row
.ScrollColumn = Target.Column
End With
End Sub
-------------------------

16:名無しさん＠そうだ選挙にいこう
10/04/07 15:29:21
>>14
知識がなさそうｗ

17:名無しさん＠そうだ選挙にいこう
10/04/07 16:07:10
XPでexcel2003を使用している者です。
最新の"2007 microsoft office system 互換機能パック"を導入済みです。

お客様がexcel2007を導入しまして、2007で編集されたファイルを頂き、
自分の環境(2003)で開こうとしますと、
"セルの書式が多すぎるため、書式を追加できません"と表示され、深刻なダメージを受けて
まともに開くことができません。

お客様の手を煩わせる事なく、これを回避する方法はありますでしょうか？

2003でブックの書式数に制限があることは知っているため、原因そのものはわかります。、
最終手段は2007を導入することだと思いますが、それ以外に解決法があればそれを試したいです。

宜しくお願いします。m(_ _)m

18:名無しさん＠そうだ選挙にいこう
10/04/07 16:42:31
>>17
OOoを入れてみるという手もあるが、ちゃんと開ける保証はない。
一番確実なのは、やっぱり2007を入れることだろう。
マイクロソフトのホームページから体験版が無料で落とせるので、使いたいのが今だけなら
そちらをおすすめする。
この先もずっとそのお客さんと付き合っていくなら素直に購入。

19:複乳
10/04/07 17:07:44
>>17
オフィス　ビューワー
でぐぐれば開くためのソフトが色々見つかりますが・・
そんなに複雑怪奇なシートだと2007で試すのが良さそう

20:17
10/04/07 17:43:12
>>18-19さん
OOoを試してみましたところ、無事に開くことができました！

今後編集してお客様とやり取りする機会があることを想定しますと、
最終的には2007導入という結論にはなると思いますが
現在はとりあえず参照できれば充分ですので自分的には解決です。

親切に回答して頂き、ありがとうございました。

21:名無しさん＠そうだ選挙にいこう
10/04/07 21:42:59
そう言えば
OOo3.x系のCalcとExcelではマクロ使ってないなら互換性は完璧といって良いレベルだったな。
WriterとWordだったらやばい事になってたぞw

22:名無しさん＠そうだ選挙にいこう
10/04/08 00:37:58
>15
得意なロータス123で
利用者がセルの背景色や文字のフォントをいじった。
けどそれを、背景赤で文字青に無理矢理変更する。

この処理のコードは書ける？
書いてみてよ。
ロータス製品からMSへの移行はパッケージソフトにもなってるぐらい単純だよ
ロータスやめてMSに切り替える企業の移行作業は８割ぐらいは元ロータスの技術者。
MS->ロータスは難しくてもロータス->-MSは簡単なはずだよ

23:名無しさん＠そうだ選挙にいこう
10/04/08 00:46:43
>>22
そろそろVBAスレでやってほしいんで放置でお願いします

24:名無しさん＠そうだ選挙にいこう
10/04/08 09:30:05
>>22
なに絡んでいるんだ？　このバカは
＞この処理のコードは書ける？
おまえに対してそれをしてみる必要性がどこに有るというんだ？
説明できるか？　このバカ

25:名無しさん＠そうだ選挙にいこう
10/04/08 09:31:04
>>23
放置したいならお前も無駄レス付けないで黙っていろ
このバカ

26:名無しさん＠そうだ選挙にいこう
10/04/08 10:24:31
>>15
イベントってのはマクロをスタートする方法のこと
そのマクロはなんでもいい
色を変えるマクロは自分で作るんだよ

27:名無しさん＠そうだ選挙にいこう
10/04/08 12:50:10
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否
【5 検索キーワード　　】エクセル　メール　アドオン　送信　添付　アウトルック以外　becky　…など

エクセルやワードで編集中のシートやブックを直接メール送信する機能がありますよね
これと同じ様な事をアウトルックエキスプレスを使わないで出来る設定やアドオンなどは
ありませんでしょうか？

具体的にはbeckyを使っており、ボタン一発でブックを仮保存して自動的にメーラーに送るみたいな
機能があれば十分です。

28:名無しさん＠そうだ選挙にいこう
10/04/08 14:12:59
>>26
＞イベントってのはマクロをスタートする方法のこと
わかりました、ありがとうございました
＞色を変えるマクロは自分で作るんだよ
わかりました
それでそのマクロ命令はいったいどういうものなのですか？
私の質問は元々それだった訳ですが
ワークシート全体の背景色をセル単独（またはその集合）の背景色の変更としてではなく変えるマクロとはいったいどういうものなのでしょうか

29:名無しさん＠そうだ選挙にいこう
10/04/08 14:14:44
>>26
このスレが適当でなければVBAの質問スレで続きをお願いします

30:名無しさん＠そうだ選挙にいこう
10/04/08 17:51:37
excelシートに行を365個、列をだいたいの平均寿命の80個、罫線で表をつくり、
ctrlキーとマウスホイールで表を縮小すると、
驚くことに、1個1個のセルがはっきり見えるんです。

つまり人間が生きていくうえで、1日も無駄にはできない、そう思うようになりました。

31:名無しさん＠そうだ選挙にいこう
10/04/08 18:00:12
>>30
1時間=1ドットとすると、80年はだいたい1024x768ドット

32:名無しさん＠そうだ選挙にいこう
10/04/08 18:16:32
>>30　ワロタ

33:複乳
10/04/08 20:44:09
>>30
試しに一つのセルを黄色で塗りつぶしてみた
これだけだとほとんどわからないぐらいの変化だが、
一行あればクッキリと見え、数行染めればはっきりと全体が変わる
成長ってこういう日々の積み重ねなんだな、と思いました。

34:名無しさん＠そうだ選挙にいこう
10/04/08 20:47:28
100年分の１枚カレンダーを見て同じ事を思った

35:名無しさん＠そうだ選挙にいこう
10/04/08 20:59:29
【1 OSの種類　　　　 .】 Windows vista
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可
【5 検索キーワード　　】マクロシート　参照

久しぶりに
図形にマクロの登録をしようとしているのですが、次のようなのは初めてです。

「マクロシートに対する参照を指定してください」との指示が出てくるのですか
意味がわからなく、どう対処したらいいのか教えてください。

36:複乳
10/04/08 21:21:18
>>35
基本、エラーはエラーメッセージを一文字も変えずに検索

37:35
10/04/08 22:10:00
何となくですが、
「マクロシートに対する参照を指定してください」との指示はexcel4.0マクロの
関係のようです。

excel4.0マクロがexcel2007から復活しているけれど、excel2003でvista機で出て
くるのは想定外でした。
結局、
「モジュール名　半角スペース　マクロ名」で登録するとうまく行きました。
xp機のときは、マクロ名だけでマクロの認識をしていたものが、vista機では
モジュール名まで要求するとの結論になりました。

もっと早くこれがわかっていたら、・・・
全自動化したxp機でのマクロがvista機では試行錯誤してもうまく行かず半自動化
に変えて乗り切った???原因がわかったようです orz orz

試行　＋　思考
では。

38:名無しさん＠そうだ選挙にいこう
10/04/08 22:57:40
>>34
そんなカレンダーどこに売ってるんですか？

39:名無しさん＠そうだ選挙にいこう
10/04/08 23:21:52
▼━質問テンプレ (出来れば使ってね) ━━━━━━
【1 OSの種類　　　　 .】 WindowsXP　SP3
【2 Excelのバージョン　】 Excel2007
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】可
【5 検索キーワード　　】日付　シリアル　並び替え　定義

お願いいたします。

日付の入力に関してなのですが、A列にH20/1（H20.1）という形で、
各行を入力して、それをシリアル値に変換して並び替えに使いたいのですが、
可能でしょうか？
H20/1/1(H20.1.1)まで入力するとシリアル値として反応してくれるのですが、
H20/1（H20.1）でH20/1/1として認識してシリアル値を取得する方法がありましたら
ご教授ください。S63/1等、年数・月数の入力でシリアル値を取り出せますでしょうか？
日の指定は特にないです。
（ユーザ定義でH20/1/1と入力してH20/1としての表示はできたのですが、
入力の際にH20/1として入力するとシリアル値として反応してくれませんでした）

40:名無しさん＠そうだ選挙にいこう
10/04/08 23:41:06
>>39
書式でなんとかするのは無理っぽいんで、文字列から数式で年と日を取り出してシリアル値に変換するしかないね

41:名無しさん＠そうだ選挙にいこう
10/04/09 00:04:10
>>40ありがとうございます。。
別の列でA列に/1を追加して、そこからシリアル値を取り出せました。

42:名無しさん＠そうだ選挙にいこう
10/04/09 00:17:49
「100年分の１枚カレンダー」って詳しく教えていただけんだろうか？

43:名無しさん＠そうだ選挙にいこう
10/04/09 00:23:26
１００年カレンダー
URLﾘﾝｸ(plaza.harmonix.ne.jp)

このカレンダーを買った人のなかから次々と自殺者が出たこらしい

44:名無しさん＠そうだ選挙にいこう
10/04/09 00:28:31
１００年カレンダーが買えないから自分でExcelで作りたいのですが、
どうやってつくりますか？
だれか作ってUPしてくれますか？

自分的に必要な機能は、
・A4の1枚であること。
・最初の年(例えば1988年)を指定すると、その年の1988年1月1日から2088年12月31日までが自動でセルに入力されること。
・その入力される数字形式は、ちっちゃくなっても見やすくするため1つのセルに日だけ(月の最初の1日だけは4/1みたいにする。年の初めはどこかに西暦年号を入れる)。

45:44
10/04/09 00:29:18
複乳さん、いつも見てます。尊敬しています。こんなのチョチョイノチョイ(死語)でしょ？作ってくれませんか？あるいは、どなたか・・・。

46:複乳
10/04/09 00:38:02
>>44
別に作るのはいいんだけど、いまいち出力形態が分からない
1行目に1988ねん1/1-12/31
にぎょうめに1989ねん1/1-
なのか
それで日付だけなのか、付きもつけるのか、なんなのか。サンプルでもあればいいんだけど

47:複乳
10/04/09 00:40:34
あとA4の一枚ってのが曖昧すぎてねー
>>30みたいにフォントサイズを1にしたり縮小倍率を1%に設定したりすれば、
1ドットだけどこれは8を表してる、とか言えるわけだし

48:44
10/04/09 00:41:57
しかしこれぐらいはスキルを身につけて自分でつくれるようになりたいな。
みんなどうやってつくる？

自分が思いつくのはこれくらい
・A1を入力用「年代」セルとする。つまりここを変更するだけで、その人用の人生カレンダーが一瞬でできる。
・B2がスタート。つまり1988年1月1日。そして右側にこの年の365日分の日を。
・下にいくにつれて年を1つ増やす。
・条件付書式で、土日は文字に色を塗る。

と思ったけど、さっそく問題が出た。Excelは列が255までなので、1年分の365が入りきらない。

49:複乳
10/04/09 00:45:36
>>48
一つ目はinputboxにするつもりだったな
二つ目は気づかなかった・・
書式設定で縦書きにしてA366を1/1、a365を1/2・・かな・・
それで列が右に行くごとに一年・・・
やりたくないなぁ。

50:44
10/04/09 00:46:06
>>46-47
こんにちは。
それはおまかせしますよ。
作者のかたがつくりやすい方法で。

本当はすべてのセルに 4/9 のように月も日もつけたいけど、ちっちゃいセルになることが予想されるので、1日以外は日だけがいいような気がします。
もしA4の1枚がちっちゃすぎれば、しかたなく4枚で印刷してセロテープでくっつけで、全体として100年分になってる、というような印刷のしかたになるかな。

51:名無しさん＠そうだ選挙にいこう
10/04/09 01:01:25
とりあえず、列を1～約180(半年分)、行を1～200(100年分)にして、A4の横で印刷すれば、
1つのセルが少しだけ横に細長い、いい感じの見やすい長方形になることがわかった。

52:複乳
10/04/09 01:22:54
>>50
URLﾘﾝｸ(www1.axfc.net)
まぁ、大体分かるだろ。右へテキトーにオートフィル。
マクロは1日を1/1、みたいに書式設定を帰てるだけだから
ちなみに12/31は0扱いで、書式設定で0を表示しないようにしている

やっつけ仕事なら任せろ！

あと、A4に加工するのはこれを加工した後でいいと思ったのでさわっていない

53:名無しさん＠そうだ選挙にいこう
10/04/09 01:54:57
>>52
おっと、早い。ありがとうございます。

でもさっそくバグらしいものが・・・・
別の年代を指定すると、月の最初が「7/1」のはずが、「1」「7/2」となることがあります。
これはなおりますか？

54:複乳
10/04/09 02:03:39
別の年代って何年?
あとMacro1　Macro2は無視してくれ。消してもいい
sheet1.sexってマクロだけだな。使う気でイタの

55:名無しさん＠そうだ選挙にいこう
10/04/09 16:29:38
>>29　です
VBAの質問スレの方でも返事は頂けなかったようですがそれは当然のことでした
なぜならVBAなら出来るという解決方法など最初から無かったからです
実はサンプルに手に入れたExcelの2002でしてみると2003以降と同じようにシート全体を選択しセルの色や文字の色を手動で変えれば固定できました
もちろんエクセルでの手動と同じ事をVBAですれば出来るという事にはなりますが2002では手動では出来ないという前提でしたからVBAでのみ出来る方法が有るということになります
ゆえにそのVBAでのみ出来るという解決方法を今までさんざん苦労をして探していましたが結局は有りませんでした
有りもしないものを有ると思い込んで言っていた複乳氏の無知な知ったかぶりに振り回された数日だったようです

56:複乳
10/04/09 16:40:08
ワロタ

57:名無しさん＠そうだ選挙にいこう
10/04/09 16:44:42
i7爆速まで読んだ

58:名無しさん＠そうだ選挙にいこう
10/04/09 17:14:48
>>56
>>55　だが
ショボイ知識しか無いくせに回答者面してんじゃねえぞ
お前は僅かなチップ欲しさに知りもしない道を教えるローマの浮浪者か
根性がさもしすぎるな

59:名無しさん＠そうだ選挙にいこう
10/04/09 17:25:47
だいたいExcel本体には無い動きをさせるVBAコマンドが有ると思えるお前の頭はおかしい
こちらは有るというから有るんだろうと思っていたが買いかぶりだった
バカが知ったかぶりをしていたというのはいかにもネットならではの落ちだったな

60:名無しさん＠そうだ選挙にいこう
10/04/09 20:45:35
とりあえず、こういう方法もある
ｽﾚﾘﾝｸ(tech板:905番)
ちょっと副作用があるが

61:名無しさん＠そうだ選挙にいこう
10/04/09 21:01:21
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2002

Ｆ列にあるデータのうち、"-"を含まないものがあったらE列とF列を
マクロで削除（上方向へシフト）するには、どう書けばいいでしょうか？
If文がダメっぽいです・・

F = Range("F65536").End(xlUp).Row
　For i = 4 To F
　　If Cells(i, 6) = "<>*-*" Then
　　　Range(Cells(i, 5), Cells(i, 6)).Delete Shift:=xlUp
　　End If
Next

A-123
A123
AB-12
ABC-1

というデータがあれば、A123が削除の対象となります。

62:名無しさん＠そうだ選挙にいこう
10/04/09 21:16:18
【1 OSの種類　　　　 .】 Windows vista
【2 Excelのバージョン　】 Excel 2007
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】可
【5 検索キーワード　　】 Excel VBA ファイル名
質問です
フォルダーをファイルを開く時に使う様なウィンドウで指定して
そのフォルダーに入っているファイル名を絶対パス付きで
リストアップするにはどうしたらよいでしょうか？
ファイル名だけや最初に自分でフォルダーのアドレスを
手入力するタイプのものしか見当たりませんでした。
宜しくお願いします。

63:名無しさん＠そうだ選挙にいこう
10/04/09 22:01:28
>>61
まだあるかもしれないけど　好きな方を

1) If Not (Cells(i, 6).Value Like "*-*") Then

2) If InStr(Cells(i, 6).Value, "-") = 0 Then

64:名無しさん＠そうだ選挙にいこう
10/04/09 22:22:53
>>62
Excel2007もってないから動くかどうかしらないけれど
Shellオブジェクトを使うとか

Set Shel = CreateObject("Shell.Application")
Set f = Shel.BrowseForFolder(0, "フォルダを選んでください", 17)
MsgBox f.Items.Item.path

参考サイト
URLﾘﾝｸ(www.roy.hi-ho.ne.jp)

65:61
10/04/09 22:28:33
>>63
ありが㌧ございます。
どちらもうまくいきましたが、上段の方を覚えます。

66:名無しさん＠そうだ選挙にいこう
10/04/09 22:30:37
>>64
ありがとうございます。
なんとかやってみます。

67:名無しさん＠そうだ選挙にいこう
10/04/09 23:27:47
>>55
お前釣りだろ？
数式バーの色を変えてほくそ笑んでいたやつじゃない？

68:名無しさん＠そうだ選挙にいこう
10/04/09 23:31:34
>>65
お前も釣りか？
>>61みたいなループでうまくいくわけねーよ。

69:名無しさん＠そうだ選挙にいこう
10/04/10 00:49:03
質問です。よろしくお願いします。
winXP。エクセル2007.

例えば、、、同じbook内、1～20のシートがあり、おのおの　A1　に数字がランダムに入力されている。

シート21にてcount関数を使い、シート1～20のＡ1の数字が1以上のものをカウントします。
　
このとき、カウントされたシートがどれなのか？を知りたいのです。

何かよい方法はないでしょうか？

知っているかたいましたら教えてください。お願いします。

70:名無しさん＠そうだ選挙にいこう
10/04/10 00:50:28
>>68
削除すべきデータが少なくてたまたま連続した部分がなければうまくいってしまう

>>61
正しくは2行目を
For i = F To 4 Step -1
としなきゃいけない

71:複乳
10/04/10 00:53:18
>>69
bこう・・どこかで見た気がする構文だ・・

72:名無しさん＠そうだ選挙にいこう
10/04/10 00:55:28
>>69
IF関数を20個並べる

質問が大雑把すぎるので回答も大雑把にしかできん

73:名無しさん＠そうだ選挙にいこう
10/04/10 03:15:53
CONVERT関数で時速を分速にしようとした時、
分速はどういうふうに表したらいいの？
m/mn m/min ではうまく動きませんでした。

74:名無しさん＠そうだ選挙にいこう
10/04/10 04:10:38
>>73
それCONVERT関数必要ないだろ
60で割るだけだぞ

75:73
10/04/10 06:15:27
まぁ　関数の勉強に付き合ってよ

60で割るだけだとkm/minだけどね
1000かけないと

76:名無しさん＠そうだ選挙にいこう
10/04/10 06:50:23
答えとしては =CONVERT(CONVERT(A1,"km","m"),"mn","hr") だけど =A1*1000/60 のが早いだろ

77:名無しさん＠そうだ選挙にいこう
10/04/10 08:31:28
【OS】 Windows**
【Ver】Excel2007
【VBA】はい
【VBAでの回答の可否】可
初心者の私に、VBAを教えて下さい。
例えば、SHEET1に、メインの表があって、SHEET2以降が
データー表。最後尾のシートは最新の情報で、
マクロを実行させたら、常に最後尾の情報を更新させる
というのを作ってて、　（´・ω・`）???　な状態です。
シート数をカウントした変数（例えばX）をsheets(x)にしたら
常に最後尾のシートをアクティブにさせるのは判ったの
ですが、そこで止まってます。
更新させるシートが決まっていたら判るのですが、常に最後尾
って所で困っています。
ご教授をお願いします。

78:複乳
10/04/10 09:44:11
>>77
コードは標準モジュールに書く
sheet1のボタンから始めたいなら
sheet1に
Private Sub CommandButton1_Click()
call k
End Sub
標準モジュールに
sub k()
End Sub
とする

79:名無しさん＠そうだ選挙にいこう
10/04/10 10:04:47
【OS】 WindowsXP
【Ver】Excel2007
【VBA】いいえ
【VBAでの回答の可否】可

あるデータにプラスとマイナスの数字が混ざっています。
プラスかマイナスの数字だけをセルで選択？するにはどうすればいいのでしょうか？
色をつけたり抽出したいんですが、色々試してみましたが分かりませんでした。
以上ですが宜しくお願いします。

80:名無しさん＠そうだ選挙にいこう
10/04/10 10:16:08
>>79
オートフィルタ

81:名無しさん＠そうだ選挙にいこう
10/04/10 10:34:36
>>78
スミマセン、全然言葉足らずでした。
SHEET１にマクロのボタンを設置して、ボタンを押したら
最後尾のシートの情報を、シート１に更新させると
いうマクロです。スミマセン（´・ω・`）

改めて…
【OS】 Windows**
【Ver】Excel2007
【VBA】はい
【VBAでの回答の可否】可

「一回動作を記憶させて、それを変数をいれた
シート名にすりゃ簡単」っと、思っていた時期がありました。

雰囲気的には、SHEET１の情報を最後尾シートでfind検索かけて
OFFSETでその情報をSHEE1に反映させるって感じです。

82:79
10/04/10 10:36:23
>>80
回答ありがとうございます。
シ－トのセルををそのまま残して虫食いみたいにしたいんです。
もう少し詳しく説明していただけるとありがたいんですが・・・。
ずうずうしくて申し訳ないです。

83:名無しさん＠そうだ選挙にいこう
10/04/10 11:09:18
>>82
色つけなら条件付き書式の方がいいだろう。
抽出はデータの詳細設定。

84:名無しさん＠そうだ選挙にいこう
10/04/10 11:25:33
>>81
最後尾のシートって事なら
Set s = Worksheets(Worksheets.Count)

でいいんじゃないかな
(非表示のシートを含んだ最後尾のシートって事になるけど)

んで(使い方の例ね)
Worksheets("Sheet1").Range("A1").Value = s.Range("A1").Value
とかやるとか

85:名無しさん＠そうだ選挙にいこう
10/04/10 11:34:09
>>83
なるほど、分かりました。
ありがとうございました。

86:名無しさん＠そうだ選挙にいこう
10/04/10 13:23:11
>>81
Sheet1のCommandButton1クリック時イベントに
Private Sub CommandButton1_Click()
Call a
End Sub

標準モジュールに
Sub a()
Dim WS As Worksheet
Set WS = Worksheets(Worksheets.Count)
Worksheets("sheet1").Cells(1, 1).Value = WS.Cells(1, 1).Value
Set WS = Nothing
End Sub

87:名無しさん＠そうだ選挙にいこう
10/04/10 16:22:49
2007のリボンメニューを2003のメニュー式に変更出来ないでしょうか？

88:複乳
10/04/10 17:48:47
2003 メニューアドイン
でぐぐれ

89:名無しさん＠そうだ選挙にいこう
10/04/10 20:20:38
Excel2000、OSはXPか2000です。

ハイパーリンクを挿入すると、リンクをシングルクリックするとブラウザが立ちあがります。

これを、シングルクリックではブラウザを起動しないようにして、
ダブルクリックでブラウザを起動させるようにするには、どうすればいいでしょうか？

90:名無しさん＠そうだ選挙にいこう
10/04/10 21:21:00
>>89
ハイパーリンクの動作を買えることはできないので、

91:名無しさん＠そうだ選挙にいこう
10/04/10 21:21:58
書き込み失敗↑

>>89
ハイパーリンクを使わずにVBAのWorksheet_BeforeDoubleClickイベントで処理する

92:あぼーん
あぼーん
あぼーん

93:名無しさん＠そうだ選挙にいこう
10/04/11 01:00:22
エクセル2003か2007で見栄えのいいグラフを作るコツとかが
詳しく載ってる本があったら教えてください。

94:名無しさん＠そうだ選挙にいこう
10/04/11 02:25:13
　　　　　　N列　　O列　　P列　　　　　　　　　　　AE列
2 　　　　　4月　　5月　　 6月　　　　　　　　　 2010年5月
3
4
5
6　　　　　700　　500
7

N2セルに「2010/4/1」、O2セルに「2010/5/1」と入力し、ユーザー定義で
「4月」、「5月」と表示させています。
AE2セルには「2010/5/1」を書いて「2010年5月」と表示させ、7行目に
次の式を入れました。

N7セル　=IF(AE2<N2,N6,IF(AE2=N2,N6,0))
O7セル　=IF(AE2<O2,O6,IF(AE2=O2,SUM(N6:O6),0))。

このとき、N2はAE2に対して過去なので0、O2は同じなのでN6から
O6までの累計を7行目に表示させます。

と、ここまでは良かったですが、AE2セルに「2010/5/5」と入れると
表示は「2010年5月」になるものの、O7が0になってしまいます。

そこで、「2010/5/15」と入れても「2010/5/1」となるような関数がありますか？

95:名無しさん＠そうだ選挙にいこう
10/04/11 04:12:12
作ればある

96:名無しさん＠そうだ選挙にいこう
10/04/11 04:20:14
>>94
A1セルに入った年月日の「日」を強制的に1にするには、=DATE(YEAR(A1),MONTH(A1),1)
つまり
=IF(AE2<N2 以下略
の部分を
=IF(DATE(YEAR(AE2),MONTH(AE2),1)<DATE(YEAR(N2),MONTH(N2),1) 以下略
のように置き換えればいい
他の式もすべて同様にＩＦの部分を直せばいいが、式がどんどん長くなってしまうので、
修正した日付かIFの判定結果だけをを空いたセルに入れておくといい

※アドインを入れてもいいのなら =EOMONTH(A1,-1)+1 という式でも月頭のシリアル値を求めることができる
少し数式が短くなる

97:複乳
10/04/11 09:13:51
>>93
見栄えの良いグラフ
でぐぐれ。

98:名無しさん＠そうだ選挙にいこう
10/04/11 10:20:41
>>97
答える気が無いなら黙ってろホームレス

99:複乳
10/04/11 10:50:14
>>98
では代わりにお答え下さい><;
この手の質問は誰も答えられないんだよなぁ

100:名無しさん＠そうだ選挙にいこう
10/04/11 11:08:44
見栄えの良いグラフとかになってくると「センス」の問題ｗ

101:単乳
10/04/11 11:20:37
まあ、ケンカはやめようじゃないかｗ

102:名無しさん＠そうだ選挙にいこう
10/04/11 12:00:47
>>86
遅くなりましたが、判りやすい回答ありがとうございました。
そういえば…最後のSET　の　NOTHING って試作のときに
入れてなかったです(^_^;　
まだまだ勉強しなきゃ駄目ですね…　ありがとうございます。

あと、もう少しやりたい事がありますが、頑張ってみて
どうしても駄目だったらまた質問させてもらいます。

103:あぼーん
あぼーん
あぼーん

104:名無しさん＠そうだ選挙にいこう
10/04/11 17:02:54
54：30

と入力して、54分30秒と表示させることって無理ですかな？

Excel2007です＞＜

105:複乳
10/04/11 17:30:44
>>104
時間計算に使うとおかしくなるから計算には使わないでね
ユーザー書式で
[h]"分"m"秒"

計算でも使えるようにするなら
A1に時刻
B1=TIME(0,DAY(A1)*24+HOUR(A1),MINUTE(A1))
B1の書式を
[m]:ss

106:名無しさん＠そうだ選挙にいこう
10/04/11 17:37:11
>>105
レスありがとです

時間を扱うときは最初からTIME関数を使ったほうが安全で早そうですね！＞＜
ありがとござました！

107:名無しさん＠そうだ選挙にいこう
10/04/11 17:51:37
>>105-106
計算で使うなら=A1/60じゃないのか？

108:複乳
10/04/11 18:07:54
>>107
gyaaaaaaaaaasoudesita

109:質問
10/04/11 20:27:34
2007を使っています。

色文字についてですが、
ある一定の数字を越えた整数を記入すると赤くなるとかできますか？

（例えば100と設定し101から赤文字になるとか）

分かりにくい文章ですみません

110:名無しさん＠そうだ選挙にいこう
10/04/11 20:28:50
>>109
条件付き書式で出来るよん

111:名無しさん＠そうだ選挙にいこう
10/04/11 21:14:17
>>109
色を付けたい範囲を選択して右クリック、「セルの書式設定」の「ユーザー定義」で
[赤][>100]0;0
と入れる

112:94
10/04/11 22:04:10
>>96
どうもありがとうございます。
思ってたより大変なのが分りました。
IFが長くて頭が痛くなりそうなので、
AE2に「=DATE(YEAR(AE4),MONTH(AE4),1)」と入れ、
AE4に年月日を入れることにしました。

113:名無しさん＠そうだ選挙にいこう
10/04/11 22:06:47
条件付き書式を設定しているセルがどれだか分からなくなりました。
こういうことは頻繁にあり、そのつど困っているのですがなにかいい方法があったりしますか？

114:名無しさん＠そうだ選挙にいこう
10/04/11 22:11:48
>>113
CTRL+Gでセル選択をクリック、「条件付き書式」をチェックしてＯＫでいけるよ～

115:名無しさん＠そうだ選挙にいこう
10/04/11 22:40:00
>>110-111
ありがとう☆

116:113
10/04/11 23:20:37
>>114
Oh, thank you very much.
I'm awed by such a magnificent, handy function equipped with Excel.

117:名無しさん＠そうだ選挙にいこう
10/04/12 00:29:50
「このブックには更新できないリンクが１つ以上含まれています」とメッセージが出たとき、
どこのセルが他のブックを参照してるのか探すにはどうすればいいですか？

118:名無しさん＠そうだ選挙にいこう
10/04/12 07:00:54
>>117
ここの下の方に書いてある
URLﾘﾝｸ(support.microsoft.com)

119:名無しさん＠そうだ選挙にいこう
10/04/12 09:54:57
あいまいで申し訳ないのですが、ググるためのキーワードを教えてください
たとえば全体で１万件データがあって、今２０００件（２０パーセント）処理してますよ！
というのがわかるような、バー（？）をユーザーフォーム上に表示させたいのです。
ソフトをインストールするときに出てくるようなものです。

（１）このバー（？）の名前を教えてください
（２）これを(標準の関数があるとして）使わずに、自分の書いた絵で表現することも
　　可能でしょうか？
　　（たとえばハチマキしたウサギがゴールに向かっていくような絵）
Excel2003です。

120:名無しさん＠そうだ選挙にいこう
10/04/12 10:17:33
>>119
1)プログレスバー
2)Yes. VBA or ...

121:119
10/04/12 10:31:08
>>120
ありがとうございました。
プログレスバーって初めて聞いた言葉でした！
これで前に進めそうです。

122:117
10/04/12 19:43:30
>>118
リンクを解除したいのではなく、どこのセルが他のブックを参照してるのか
そのセルを知りたいんです。

123:複乳
10/04/12 19:48:27
>>122
"["って記号を検索
数式にこれが入ってれば他のブックを検索してるはずだからね

124:名無しさん＠そうだ選挙にいこう
10/04/12 19:54:14
おい、復乳！
参考になったぞ！

125:117
10/04/12 22:26:25
>>123
おい、復乳さん！
参考になりますた。

126:名無しさん＠そうだ選挙にいこう
10/04/12 23:37:16
【1 OSの種類】 Windows XP
【2 Excelのバージョン】 Excel2003
【3 VBAが使えるか】いいえ
【4 VBAでの回答の可否】否
【5 検索キーワード】エクセル　アポストロフィひげ　消

助けて下さい。
例えば、'568'とセルに入力するのですが、
表示は先頭の'が抜けて、568'となってしまいます。
どうすれば、両方の''が表示されるようになりますでしょうか。

参考キャプ
URLﾘﾝｸ(beebee2see.appspot.com)

よろしくお願いします。

127:名無しさん＠そうだ選挙にいこう
10/04/12 23:59:01
釣れますか？

128:126
10/04/13 00:03:19
すいません、とても初歩的な質問だから釣りに見えるのでしょうか。
本当に困ってます。助けて下さい。

129:名無しさん＠そうだ選挙にいこう
10/04/13 00:12:39
''568'くらいなんで考え付かないの？
馬鹿なの？

130:名無しさん＠そうだ選挙にいこう
10/04/13 00:13:53
あるいは表示形式が@で'568'とかね

131:複乳
10/04/13 00:16:28
>>126
頭に'(クォーテーション)がつくと文字列を表す。つまり>>129
>>127
たまに見るけどこういう場合の釣りってどういう意味なんだ？
>>130
それ試したけど無理だったわ

132:名無しさん＠そうだ選挙にいこう
10/04/13 00:26:38
>>131
この場合の「釣り」ってのは、あまりにも簡単すぎて人に聞くまでもないことを
わざわざ質問して、スレの流れを妨げたり回答者をバカにすること。

でも、本当に初心者で記号の正確な意味や用法を知らない場合も多い。
他人を疑ってばかりいる賢い人間と、バカでも誰にでも親切な人と、どっちがいいだろうね。

133:126
10/04/13 00:44:49
みなさん、ありがとうございました！
''568'で無事に表示されました。
お騒がせしてすみませんでした。

134:名無しさん＠そうだ選挙にいこう
10/04/13 06:52:29
まぁ、春です。
新社会人が新しい職場で奮闘しているものと思って温かく見守ってあげましょう。

135:複乳
10/04/13 11:25:19
>>132
ありがとうございます。このタイプの釣り、少ない気はするんだけどなぁ

136:複乳
10/04/13 11:26:51
あー、言い忘れてたな
そもそも'や"で囲む事自体やめたほうがいいよ、と
EXCELは元々それを省くような挙動だから、別の手を考えたほうがいい

137:名無しさん＠そうだ選挙にいこう
10/04/13 12:21:45
' のことで質問です
セルでは先頭の ' は表示はされないけど上の欄ではちゃんと入力されてる
なんでこんな変なの？

こんなのが他のソフトでインポートとかしたときにバグとなってでてくる
極論すると例えば宇宙飛行ロケットのプログラミングならこういうのが設計ミスでロケット爆発の原因にもなりかねん
なぜシンプルに ' をそのまま表示させないんだ？

' の先頭が表示されないようになっている理由とそのれ経緯について教えてくれないか？

138:名無しさん＠そうだ選挙にいこう
10/04/13 13:36:55
Excel2003なら「読み上げ」ツールバーで数字を英語で読み上げてくれる機能があることはみなさん周知してますね。
私はこれで英語の数字のリスニング力を鍛えようと思ってます。
=int(RAND()*1000)+1
で1から1000までの乱数を出しておき、「読み上げ」ツールバーのボタンを押すだけで、書き出してたすべての数字を読み上げてくれる便利な機能です。

そこで質問。

「1つのセルの読み上げを聞いたあと、すばやく自分でのその数字を入力」　←　これを繰り返しやる方法はありませんか？
なぜなら、ユーザが入力の操作をした時点で読み上げが終了してしまうんです(つまり読み上げ機能は全セルを読み上げるが、なにか作業すると終了してしまう)。

139:名無しさん＠そうだ選挙にいこう
10/04/13 13:53:20
>>137
' の記号を使うのはLotus1-2-3から引き継いだ機能。
セルの内容を文字列として左寄せする、という指示をソフトに与えるための記号で「接頭辞」と呼ばれる。
知らずに予想外の動作をしたとしても、それは単なる勉強不足。

140:複乳
10/04/13 13:53:38
>>137
マイクロソフトのアホが設計した仕様。経緯なんて知らんし
知ってもどうにもならん
>>138
そんな機能は知らんが、メモ帳でも開いて横で入力作業するのはどう？
それでも止まるのかな
後はVBAで出来るかもしれんがあまり自信が無い

141:名無しさん＠そうだ選挙にいこう
10/04/13 13:57:22
>>138
「Enterキーを押した時に読み上げる」というオプションがあるので、それを使えばうまくできるかも

142:名無しさん＠そうだ選挙にいこう
10/04/13 14:01:08
よろしくお願いします。

他ブックにデーターを１行づつコピーするときなんですが
３０列のうち５列だけは「形式を指定して」する必要があり１列はコピー不要。

この場合、行を一括でコピーした後、５列分だけセルのコピーをやり直し１列は削除するのと
最初からセル単位で２９回コピーするのでは、どちらが正しい(早い）やり方なんでしょうか。

143:142
10/04/13 14:05:35
すいません、書き忘れました
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可
【5 検索キーワード　　】処理速度　ベンチマーク　など

VBAで大量データを扱う場合についての質問です。

144:名無しさん＠そうだ選挙にいこう
10/04/13 14:28:16
>>143
経験則と想像で書くけど、全体をまとめてコピーしたあと、
あらためてコピー先で不要データの削除や書式の解除をした方が早いと思う。
そういうベンチマークは見たことがないので、厳密な結果が欲しいんなら
自分で実験するしかないと思う。

145:名無しさん＠そうだ選挙にいこう
10/04/13 16:56:57
>>144　さん　ありがとうございます。
行コピーは機械語になるときセルのコピーの繰り返しと一緒なのでは？などと
頓珍漢な妄想をあれこれ膨らませ、手が止まってました。
一括コピーして修正という方法でいこうと思います。

146:名無しさん＠そうだ選挙にいこう
10/04/13 18:01:27
【1 OSの種類　　　　 .】 Windows7
【2 Excelのバージョン　】 Excel2007
【3 VBAが使えるか　　 .】 7いいえ
【4 VBAでの回答の可否】可7
【5 検索キーワード　　】エクセル　関数　文字　行　検索

質問です
関数で文字を検索してその文字があったら、その文字が入っているセルの行番号を取得したいのですが
やり方がわかりません

例えば
検索文字→リンゴ
の場合A10にリンゴという文字が入っていると、行番号10を返してくれる

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

147:名無しさん＠そうだ選挙にいこう
10/04/13 18:16:23
>>146
探したい場所がA列なら
=MATCH("りんご",A:A,0)

148:名無しさん＠そうだ選挙にいこう
10/04/13 22:29:38
【1 OSの種類　　　　 .】 Windows xp
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否

EXACTを使ったのですが、式をそのまま表示されてしまいます。。
他の関数は問題なかったのですが、何か別設定が必要なのでしょうか？

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

149:名無しさん＠そうだ選挙にいこう
10/04/13 22:32:31
>>148
セルの書式設定が文字列になってないですか？
その場合は標準にしてみてください。

150:名無しさん＠そうだ選挙にいこう
10/04/14 08:06:15
>>149
標準になってました、ありがとうございます。
なんでだろう、、

151:名無しさん＠そうだ選挙にいこう
10/04/14 09:52:37
>>147
無事できました

別シートを参照する形にしたかったのでこうなりました
=MATCH("りんご",INDIRECT(A15&"!A:A"),0)

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

152:名無しさん＠そうだ選挙にいこう
10/04/14 22:06:07
ファイルを開いく直前、「○○を入力してください」というメッセージを出して、
開いた時点でその入力したものがA1(例)の特定のセルに入ってるように、
VBAかなにかでどうやったら出来ますか？

153:複乳
10/04/14 22:33:18
>>152
Thisworkbookはこうやって使うのか・・

sheet1でも標準モジュールでもなく、
Thisworkbookに以下を記述

Private Sub Workbook_Open()
Dim a As String
MsgBox "死にたい。"
a = InputBox("何かを入力してください・・")
ActiveSheet.Cells(1, 1) = a
End Sub

154:152
10/04/14 22:40:25
>>153
Thanks so much.
でもMsgBoxの内容が怖い・・・

155:100年カレンダー
10/04/14 22:43:39
以前話題になった「100年カレンダー」ができました。
A4二枚の紙に100年分の日々がプリントアウトされます。
1日といえどもこのカレンダー上で1日分のマス目がはっきり見えます。
よって、人生で一日も無駄にはできないと自分をひきしめる効果があります。

しかしネガティブな人は使用はご注意を。

URLﾘﾝｸ(www1.axfc.net)

156:名無しさん＠そうだ選挙にいこう
10/04/14 22:45:53
じつは>>155で「B367のセルに最初の年を入力してください。」というメッセージを出して、
それをB367に入れるようにしようと思ったけど、コメントの挿入機能ですっきりできた。

157:名無しさん＠そうだ選挙にいこう
10/04/14 23:12:32
こんばんわ。
質問があります、よろしくお願いします。
【1 OSの種類　　　　 .】 Windows XP Professinal SP3 32bit
【2 Excelのバージョン　】 Excel 2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否
【5 検索キーワード　　】エクセル常に別ウインドウ設定ファイル default

【質問】　エクセルのファイルを開いた際に、常に別ウインドウで開きたいです。
　　　　　※エクセル自体の×ボタンを押しても、他のエクセルファイルを開いて
　　　　　　いるものは閉じないようにしたいのです。

今は↓のサイトにある方法でできるようにしているのですが、以前はエクセルの
設定ファイルのようなものを開いて、基本の動作を色々設定したような記憶が
あるのですが忘れてしまったので、その方法を知りたいです。
URLﾘﾝｸ(www.trickpalace.net)

ご存知の方いましたら、どうかよろしくお願いします。

158:複乳
10/04/14 23:36:00
>>157
ツール　オプション　全般　ほかのあっぷりけーしょんを無視する

159:157
10/04/14 23:54:25
>>158
れす、ありがとうございます。
その設定にしてみましたが、ファイルをクリックしても
エクセルが立ち上がるだけで、ファイルが開きませんでした。

160:名無しさん＠そうだ選挙にいこう
10/04/14 23:57:38
設定ファイルを書き換えたのって、もっと古いバージョンの話じゃなくて？
フォルダの中をざっと検索してみたけど、2003にはそういうのは見当たらないっぽいんだけど

次ページ