トップページtech
1001コメント371KB

Excel VBA 質問スレ Part14

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん2010/01/06(水) 12:34:58
過去スレ
01 http://pc11.2ch.net/test/read.cgi/tech/1054356121/
02 http://pc11.2ch.net/test/read.cgi/tech/1168308855/
03 http://pc11.2ch.net/test/read.cgi/tech/1180192018/
04 http://pc11.2ch.net/test/read.cgi/tech/1189814602/
05 http://pc11.2ch.net/test/read.cgi/tech/1197448064/
06 http://pc11.2ch.net/test/read.cgi/tech/1205231499/
07 http://pc11.2ch.net/test/read.cgi/tech/1212587819/
08 http://pc11.2ch.net/test/read.cgi/tech/1219673793/
09 http://pc11.2ch.net/test/read.cgi/tech/1228372971/
10 http://pc12.2ch.net/test/read.cgi/tech/1235332603/
11 http://pc12.2ch.net/test/read.cgi/tech/1241885130/
12 http://pc12.2ch.net/test/read.cgi/tech/1247566074/
13 http://pc12.2ch.net/test/read.cgi/tech/1254281104/
0587デフォルトの名無しさん2010/03/17(水) 03:01:12
いや、911文字までOK。
ていうか、みんなOSとExcelのバージョンぐらい書こうよ。
うちはXPと2003。

ちなみにVBAを使わずにセルに直接入力した場合は1セル32767文字まで入る。
ttp://office.microsoft.com/ja-jp/excel/HP051992911041.aspx
0588デフォルトの名無しさん2010/03/17(水) 03:15:21
>>587
ん?
>>584だと911行目でエラーが発生してるから
911文字はエラー、910文字まではOKってことじゃないの?
OSとバージョンが同じだから、やっぱりバージョンの問題なんだろうな。
0589デフォルトの名無しさん2010/03/17(水) 03:22:49
doudemoii
0590デフォルトの名無しさん2010/03/17(水) 12:25:45
どうでもよくない。
>>578>>581の状況が再現できないと回答もできないし、
自分が同じトラブルに遭う可能性だってあるわけだから解決できないと気持ちが悪い。
0591デフォルトの名無しさん2010/03/17(水) 12:47:26
>>589
だんだん話しについていけなくなっちゃったんだろうなw
0592デフォルトの名無しさん2010/03/17(水) 14:51:07
気持ち悪いから>>578早く戻って来い!
0593デフォルトの名無しさん2010/03/17(水) 16:29:57
>>581で再現できてんじゃん
0594デフォルトの名無しさん2010/03/17(水) 17:26:31
で、解決方法は?
0595デフォルトの名無しさん2010/03/17(水) 17:31:37
再現できないとか言ってるから、再現できてると言ったまで。
>>581によれば、Value付ければいいんじゃないの?
0596デフォルトの名無しさん2010/03/17(水) 17:47:44
>>594
Cells(1, 2) = Cells(1, 1).Valueにすればいい。
Cells(1, 2) = Cells(1, 1)と何が違うのかは知らん。
0597デフォルトの名無しさん2010/03/17(水) 17:53:15
解決できないから気持ちが悪いんじゃなくて、解決できてるけど仕組みがわからなくて
気持ちが悪いんじゃないの?
0598デフォルトの名無しさん2010/03/17(水) 18:11:26
初歩的な質問ですんません

セルに直接入力せずに三角形みたいなのをクリック(セルをクリックすると現れる三角形)すると
あらかじめ設定してた項目を取り出せるあの機能はなんて名前でしったけ?
またその設定はどこでやればいいですか?
お願いします。vista使いです
0599デフォルトの名無しさん2010/03/17(水) 18:16:36
>>598
ひょっとして、これのことか?

Excel講座 > セルをコンボボックスにする
http://www.serpress.co.jp/excel/no004.html
0600デフォルトの名無しさん2010/03/17(水) 18:35:25
うちだと910文字超えないとエラーにならないのに、
どうして>>581は256文字でエラーになるの?
もうちょっと再現の条件とか手順をkwsk
0601デフォルトの名無しさん2010/03/17(水) 18:45:27
>>599
そうそうそれそれ
どうもすんません
0602デフォルトの名無しさん2010/03/17(水) 19:41:37
>>598
セルにコンボボックスを仕込むより入力フォームを作って
ボタンぼんでシートに値がコピーされるように作った方がいいと思うが。
0603デフォルトの名無しさん2010/03/17(水) 20:40:45
テスト
0604デフォルトの名無しさん2010/03/17(水) 22:04:36
Excel2007
ブックを新たに作成するときにシートの枚数を3枚とか指定することは出来ないのでしょうか?
0605デフォルトの名無しさん2010/03/17(水) 22:19:57
テンプレートで
0606デフォルトの名無しさん2010/03/17(水) 22:20:48
>>604
Application.SheetsInNewWorkbook = 3
こういうこと?
0607デフォルトの名無しさん2010/03/17(水) 22:23:33
あ?テンプレの話?
2003だと
ツール→オプション→全般→新しいブックのシート数
で設定できる。2007はわからん。
0608デフォルトの名無しさん2010/03/17(水) 22:28:37
>>606
それです。ありがとう
テンプレートは?状態ですけどw
0609デフォルトの名無しさん2010/03/17(水) 22:30:49
>>608
とりあえずググれよ。(もう見てないだろうが・・・)
0610デフォルトの名無しさん2010/03/18(木) 06:32:14
>>600
どうしてExcelのバージョンすら明記しないのか不思議。馬鹿?
0611デフォルトの名無しさん2010/03/18(木) 13:18:25
>>610
話の流れからすると910文字までいけるのは、XPで2003だって二人が書いてるぞ。
バージョン明記してないのは質問者と>>581の解答者だ。

それはそうと、これだと10000行までいけるなw
Sub test()
 For r = 1 To 10000
  Cells(r, 1).Value = String(r, "あ")
  Cells(r, 2).Value = Cells(r, 1).Value
 Next
End Sub
06126112010/03/18(木) 13:44:40
おっと、>>611はXPで2003だ。
ちなみに、Win7の2007でも検証してみた。
 ・Valueあり→10000行までいけた
 ・Valueなし→8203行目でエラー
という結果。2007だとValueなしでもこんなにいけるんだなw
ってことは、質問者のバージョンは2002以前とエスパーしてみる。
それにしても、2007のVBEどっから起動するのかわからなくてビビったw
0613デフォルトの名無しさん2010/03/18(木) 15:21:35
>>611-612
>>600の「うち」の環境を書けと言ってるんだ、馬鹿。
じゃなければ、第三者が全体を把握できないだろ。
0614デフォルトの名無しさん2010/03/18(木) 15:41:08
>>611-612
Value付ければいいって結論が出てるのに、いつまで何やってんの?
0615デフォルトの名無しさん2010/03/18(木) 16:06:15
>>613
>>600は、910文字超えないとエラーにならないって書いてあるから
流れから2003だってわかると思うが?
流れを読まなくてもわかるように、レス内に明記するのがネチケット(笑)ということなら、
まぁ、そういうことなんだろうw

>>614
Valueは単純に“省略可能なもの”と認識してたんだが、
今回のケースで言うと、場合によっては省略してはいけないってことか?
すまん、素人にもわかるように説明してくれ。
0616デフォルトの名無しさん2010/03/18(木) 16:13:20
>>615
とことんアホだな。

仮にExcel 2003が911文字目からエラーになるということだとしても、
911文字からエラーになるからといってそれがExcel 2003とは限らないだろ。
高卒文系なのか?

何かを明らかにしたくてその話題に参加し、なおかつ相手に再現の手順を求めるのなら、
まず自分の情報を出せっつーこった。

> すまん、素人にもわかるように説明してくれ。

知るかアホ。
このスレは素人の好奇心を満足させるスレじゃねーよ。
0617デフォルトの名無しさん2010/03/18(木) 16:19:38
>>611
ド素人はこれだから困る。
セルに設定出来る最大文字数はヘルプにちゃんと書かれてる。
ヘルプ見ろ。
0618デフォルトの名無しさん2010/03/18(木) 16:24:40
エクセルVBAに詳しい人教えてください!
http://yutori.2ch.net/test/read.cgi/morningcoffee/1268888151/
0619デフォルトの名無しさん2010/03/18(木) 16:32:09
いつまでやってんだよ……
0620デフォルトの名無しさん2010/03/18(木) 16:32:10
>>616-617
論点がずれてますよ。
人のことを馬鹿とかアホとか高卒文系とかド素人とか言ってるけど、
話の内容を理解できていないのは、あなたの方ですね。
何かを明らかにしたくないなら、あなたはこの話題に参加しなくてもいいと思います。
0621デフォルトの名無しさん2010/03/18(木) 16:37:10
ずらしてんのはお前の方だ馬鹿。

これになんかコメントしてみろ、アホ。
> 仮にExcel 2003が911文字目からエラーになるということだとしても、
> 911文字からエラーになるからといってそれがExcel 2003とは限らないだろ。
> 高卒文系なのか?
0622デフォルトの名無しさん2010/03/18(木) 16:38:03
>>618
ソース見てボタンの名前調べればいいんじゃないの?
そんな単純なことじゃなくて?
0623デフォルトの名無しさん2010/03/18(木) 16:38:50
・Valueを付ければ問題ない
・Excelの仕様上、何文字まで設定出来るかはヘルプに書かれている

これ以上、何を知りたいの?
0624デフォルトの名無しさん2010/03/18(木) 16:41:05
話の流れからするとw、>>600=>>611じゃねーの?
馬鹿と言われて悔しかったのかな?
0625デフォルトの名無しさん2010/03/18(木) 16:41:30
>>621
http://hideyoshi.2ch.net/test/read.cgi/mental/1266008088/l50
とりあえず筋トレでもしてみたら?
0626デフォルトの名無しさん2010/03/18(木) 16:45:40
おまいらいつまでやってんだwwwwwwwwwwww
0627デフォルトの名無しさん2010/03/18(木) 16:50:36
>>625
反論不能か、高卒文系のド素人が。
もう黙っとけ。
0628デフォルトの名無しさん2010/03/18(木) 16:57:30
VBAからGroovyのプログラムを呼びたいんですが、何か方法はありますか?
Groovyに限らず、VBAから他の言語のプログラムを呼んで、返り値を使用する
ことってできるんですかね?
0629デフォルトの名無しさん2010/03/18(木) 16:58:28
一つのセルには200文字も必要ねーな。
50文字でも十分じゃね?
数式厨には足りないかも知らんけどw
超長ーい数式を得意としてるやつもいるからな。
0630デフォルトの名無しさん2010/03/18(木) 17:05:02
>>621
必死ですね。コメントを求められているのでレスしますね。
その事象が起きるからといって、Excel2003だという証明は私には出来ません。
学歴も聞かれてますね。おっしゃる通り文系ですが大卒です。
これでよろしいでしょうか?
0631デフォルトの名無しさん2010/03/18(木) 17:06:40
だよな。表計算ソフトなんだから50文字でも多いぐらいだ。
0632デフォルトの名無しさん2010/03/18(木) 17:09:01
超長〜い数式は勘弁してほしいw
0633デフォルトの名無しさん2010/03/18(木) 17:18:44
超長ーい数式とか配列数式とかSUMPRODUCTのフィルコピーが大好きなやつはほとんどアホばかり。
VBAで言えば変数使わないで何度も同じ値を取得してるようなもんだ罠。
数式でやるならVBAの変数に相当する作業セルを使えってこった。
0634デフォルトの名無しさん2010/03/18(木) 17:22:44
>>623
もういい加減アホとか言うのやめれ。
0635デフォルトの名無しさん2010/03/18(木) 17:25:04
ん?俺のことかな
すまん、今度からヴァカと書くことにするわ。
0636デフォルトの名無しさん2010/03/18(木) 17:27:44
>>630
証明できるかどうかなんて聞いてないんだよ。

>>615
> 流れから2003だってわかると思うが?
わかると思ってるなら、それは馬鹿ゆえだってことだ。

横からノイズ増やしといて、俺の知りたいことだけお前ら教えろとかいう奴はいらないんだよ。
わかった?
0637デフォルトの名無しさん2010/03/18(木) 17:31:39
ふぁいと!
俺は50文字でも十分すぐるから興味ナス
0638デフォルトの名無しさん2010/03/18(木) 17:32:35
>>630
お前も必死だよwww
0639デフォルトの名無しさん2010/03/18(木) 17:34:53
大卒文系って、裏・逆・対偶レベルの論理学も理解できないの?
今はやりのゆとりって奴?
0640デフォルトの名無しさん2010/03/18(木) 17:36:20
まぁ餅つけ
50文字でも十分ということで糸冬了
0641デフォルトの名無しさん2010/03/18(木) 17:39:24
まぁ、セルに表示できないような文字数を設定するというのは、基本的な使い方では
ないわけだから、自分がそのような処理を実装しなければならなくなったときに、
ターゲットとなるExcelの仕様上の制限を調べ、テストを十分にやれば良い。
0642デフォルトの名無しさん2010/03/18(木) 17:41:21
必要条件と十分条件を良くわかってない馬鹿SEのことを思い出した。
0643デフォルトの名無しさん2010/03/18(木) 17:43:09
CellsのデフォルトプロパティがValueじゃないってことじゃないかと思うけど、
調べるつもり無し。
0644デフォルトの名無しさん2010/03/18(木) 17:51:55
Cells(2, 1) = Cells(1, 1)
でエラーが発生するとき、
Range("B1") = Range("A1")
でもエラーが発生するね。
何故なのかはそれほど知りたくないけど、RangeのデフォルトプロパティはValueだって
思ってたので、ちょっとキモチワルイ。

やっぱり
Range("B1") = Range("A1").Value
と書くと動く。
まぁ、デフォルトプロパティは使うなってことかな。
0645デフォルトの名無しさん2010/03/18(木) 17:52:57
スレが伸びてると思ったら一人で暴れてるようだな。
文体でバレバレだw
0646デフォルトの名無しさん2010/03/18(木) 17:57:50
>>644
セルの文字数についてはバージョンによる違いだってわかるけど、
Valueの省略については色々調べてもわからなくて、昨日からずっと気持ち悪い。
納得できる答えをくれる神は降臨しないかと待ってるんだけど
スレ覗く度に荒れる一方で(ry
0647デフォルトの名無しさん2010/03/18(木) 18:22:47
>>646
納得できる答えが見つかっても、安全側に倒してデフォルトプロパティに頼らない
コードを書くしかないという状況は変わらないよ。
0648デフォルトの名無しさん2010/03/18(木) 18:24:50
>>645
バレバレw
0649デフォルトの名無しさん2010/03/18(木) 18:29:42
まぁどっちもひといが、この板的にはこれが一番ひどい。

>>611
>それはそうと、これだと10000行までいけるなw
0650デフォルトの名無しさん2010/03/18(木) 18:38:10
例えば

Sub test()
MsgBox TypeName(Range("A1").Value)
MsgBox TypeName(Range("A1"))
End Sub

とやると
Empty
Range
となる
0651デフォルトの名無しさん2010/03/18(木) 19:46:05
>>650
だから?
0652デフォルトの名無しさん2010/03/18(木) 19:54:40
>>611にガン擁護された>>600は、どのような登場の仕方をするのであろうか。
0653デフォルトの名無しさん2010/03/18(木) 20:44:22
>>623
256文字でエラーになるExcelのバージョン
0654デフォルトの名無しさん2010/03/18(木) 23:07:40
>>653
え!?それかよっ!!www
0655デフォルトの名無しさん2010/03/18(木) 23:27:05
>>653
うち Excel2003(XP) と Excel97(Win98)あるんだけど
Excel97(Win98) だと256文字でエラーになる
0656デフォルトの名無しさん2010/03/18(木) 23:48:24
哲也君がVBAマクロを2昼夜かけて作ったんですよ。



これが本当の「マクロ 2夜連続」なんつって。
0657デフォルトの名無しさん2010/03/19(金) 02:04:41
>>653
だったら、初めから自分の環境の結果を書いとこうね。
俺は何もしないけど、お前ら俺の知りたいことを教えろパターンですな。
ちなみに俺は、これまで出ていないExcel 2000を持っていて実験もし結果もわかったが教えない。
0658デフォルトの名無しさん2010/03/19(金) 06:32:11
俺はウチとまったく同じ環境の結果がガイシュツだから書かなかっただけなんだけど、
同じことを何度も書かなきゃいけないの?
役所に出す書類だな、まるで。
0659デフォルトの名無しさん2010/03/19(金) 06:38:42
それが知りたいんだったら、既出の情報をまとめるなりなんなりしろよ。
餓鬼かよ。
0660デフォルトの名無しさん2010/03/19(金) 07:31:23
私女だけど、たった1行の実験結果を書かずに言い訳を何行も書く男の人って
0661デフォルトの名無しさん2010/03/19(金) 08:40:37
まとめなきゃ把握できないほどの情報量か?
数えてないけど3例ぐらいしか出てなかっただろ。
0662デフォルトの名無しさん2010/03/19(金) 08:55:26
XP 2003です

ググっても中々みつからないんだけど、
手動で選択したセル範囲の数字を一気に計算(仮に10倍)とかするのってVBAで出来るの?

あとついでに、セル範囲の一番右下の座標も取りたいんだけどやり方教えてください。
0663デフォルトの名無しさん2010/03/19(金) 09:11:53
>>661
いつまでやってんだ
0664デフォルトの名無しさん2010/03/19(金) 09:13:07
>>662
前半:できる。rangeを関数の引数に取りfor each
後半:一発でできるかどうかは知らん
0665デフォルトの名無しさん2010/03/19(金) 09:15:03
>>682
VBAでもちろん出来るが手操作でも出来る。
どっかのセルに10と書いて、コピー、形式を選択して貼り付け、乗算

一個の選択した矩形範囲の右下隅のセルを操作したければ
Selection(Selection.Count).****
Excel2003はこれで大丈夫だが、Excel2007は全セルを選択したとき
CountプロパティがLong型なので入りきれなくてエラーになる。
そこまで考慮するなら
With Selection
 .Item(.Rows.Count*.Columns.Count).****
End With
座標って行番号とか列番号とかアドレスが必要なケースは滅多にないだろう。
全くないというわけではないが。
0666デフォルトの名無しさん2010/03/19(金) 09:15:04
>>661
ほら、お前もスレを確認しないと状況がわからないだろ。
>>653の知りたかったことなんて誰も知らないんだから、状況をまとめて
あとこのバージョンの動作を教えてくれってやるのが筋。
0667デフォルトの名無しさん2010/03/19(金) 09:59:47
>>653
Excel 2000では256文字目でエラーになる。

これで全部揃った?揃ったならまとめくらいしてもバチはあたらないよ。
0668デフォルトの名無しさん2010/03/19(金) 10:08:55
Excel95がまだ出てなーなw
0669デフォルトの名無しさん2010/03/19(金) 10:26:54
だれか知ってる人がいたら教えてくれ。
A1の表示形式がG/標準のとき
Debug.Print Format(Range("a1"), Range("a1").NumberFormat)
とやると"M32032ral"が返るんだが、これって何?
0670デフォルトの名無しさん2010/03/19(金) 10:28:49
いかん、Valueつけるの忘れたわ
0671デフォルトの名無しさん2010/03/19(金) 10:31:38
A1の値を書くのも忘れたわ
1の場合ね
0672デフォルトの名無しさん2010/03/19(金) 10:38:56
>>669
知ってるのか知らないのかわからないが、それ、Formatの第二引数の指定方法が間違ってる。
0673デフォルトの名無しさん2010/03/19(金) 11:18:49
競艇のネット自動投票プログラム作っています。自動ログインは完成しましたけど、
次の画面の投票する競艇場選択のボタンを押す方法が分かりません。

押したいボタンのHTMLソースは以下
<input value="福  岡" onclick="jyocd(22)" tabindex="2" type="BUTTON">

ボタンの名前(name)が無いから通常のやり方ではできません。

また、
SendKeys "{TAB 5}"
SendKeys "{ENTER}"

で5番目の競艇場をクリックではできましたが、最終レースが終わると
その競艇場選択ボタンが消えますので、必ずしも××競艇場が5番目とは限らないのです。

検索等で昨日1日中調べてみましたが解決しません。。。助けてください。
0674デフォルトの名無しさん2010/03/19(金) 12:08:09
データについているハイパーリンクの中の数字を取り出して(〜info.php?chr=25121とあったら568311)、もしAという数字だったら、その列の情報を全て、シートAにコピー
という仕組みを作りたいと思っております。
ハイパーリンクの中の数字を参照するには、どうしたらよろしいのでしょうか?助けていただけると助かります。
0675デフォルトの名無しさん2010/03/19(金) 12:57:29
>>672
どこが?
まさかNumberFormatLocalってんじゃないだろうね。
もしそう思ってるならそっちが間違ってる。
そんなことはないとは思うけど。
0676デフォルトの名無しさん2010/03/19(金) 12:58:20
まとめました。扱える文字数はバージョンの違いってわかるんですけど、
何故Valueを省略するとエラーが出るのか、どなたか教えて頂けませんか?

【バージョン不明】
256文字以上でエラー
>>578(質問者)、>>581>>596

911文字以上でエラー
>>600


【バージョン記述あり】
Win98&97(256文字以上でエラー)
>>655

OS不明&2000(256文字以上でエラー)
>>655

XP&2003(911文字以上でエラー)
>>583>>588?)、>>584>>587?)、>>586

Win7&2007(8203文字以上でエラー)
>>612
06776762010/03/19(金) 13:01:21
訂正ですorz
OS不明&2000(256文字以上でエラー)は>>667でした。
0678デフォルトの名無しさん2010/03/19(金) 13:14:44
あぁ分ったわ。
NumberFormatは"General"だから
Gは元号のGで明治だからM
eは和暦の年
nは分
eは和暦の年
ralはGeneralの右3文字だな。
結局Formatじゃ駄目でWorksheetFunction.Textってことか。
俺の間違いだったわ。
0679デフォルトの名無しさん2010/03/19(金) 14:42:54
>>678
いやいや、ヘルプ見ろよ
0680デフォルトの名無しさん2010/03/19(金) 14:46:07
>>676
それ多分OS関係ない。

> 何故Valueを省略するとエラーが出るのか、どなたか教えて頂けませんか?
多分、今ここにいる奴は答えられないから、これまでに回答がないんだよ。
モーグにでも行けば?
0681デフォルトの名無しさん2010/03/19(金) 17:50:13
>>674
> chr=25121とあったら568311

の法則がよくわからない。
Aは数字じゃない。
16進?でもなそさうだし。
0682デフォルトの名無しさん2010/03/19(金) 17:53:43
>>679
FormatもWorksheetFunction.Textも似たようなもんだろうと思ってた俺が
馬鹿だったが、Formatのヘルプの表示書式指定文字なんて一部しか載ってないね。
とりあえず"s","h","n","g","aaa"などが抜けてる。
"General"はWorksheetFunction.TextにはあるがFormatにはないということだな。
0683デフォルトの名無しさん2010/03/19(金) 18:01:50
範囲指定していっぺんに10倍はVBAでもできる。
「形式を選択して貼り付け、乗算」をマクロの記録してみ。
0684デフォルトの名無しさん2010/03/19(金) 18:12:10
Formatのヘルプの最後にある表示書式指定文字だが、あれは一覧じゃなかったか。
0685デフォルトの名無しさん2010/03/19(金) 18:14:19
>>682
ホントだ。ローカルのヘルプは抜けてるのがある。
オンラインヘルプなら全部出るみたいだけど。
0686デフォルトの名無しさん2010/03/19(金) 18:26:38
>>682
あと"p"とか"ccc"とか"ooo"とか"ww"とかもあるみたいね。
Format(1,"ww")が53、Format(1,"www")が531になるがなんのこっちゃ。
■ このスレッドは過去ログ倉庫に格納されています