[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 2chのread.cgiへ]
Update time : 03/27 15:24 / Filesize : 253 KB / Number-of Response : 882
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Excel VBA 質問スレ Part14



1 名前:デフォルトの名無しさん mailto:sage [2010/01/06(水) 12:34:58 ]
過去スレ
01 pc11.2ch.net/test/read.cgi/tech/1054356121/
02 pc11.2ch.net/test/read.cgi/tech/1168308855/
03 pc11.2ch.net/test/read.cgi/tech/1180192018/
04 pc11.2ch.net/test/read.cgi/tech/1189814602/
05 pc11.2ch.net/test/read.cgi/tech/1197448064/
06 pc11.2ch.net/test/read.cgi/tech/1205231499/
07 pc11.2ch.net/test/read.cgi/tech/1212587819/
08 pc11.2ch.net/test/read.cgi/tech/1219673793/
09 pc11.2ch.net/test/read.cgi/tech/1228372971/
10 pc12.2ch.net/test/read.cgi/tech/1235332603/
11 pc12.2ch.net/test/read.cgi/tech/1241885130/
12 pc12.2ch.net/test/read.cgi/tech/1247566074/
13 pc12.2ch.net/test/read.cgi/tech/1254281104/

552 名前:デフォルトの名無しさん [2010/03/13(土) 22:07:45 ]
すみません質問です

以下のような数字の置き換えをしたいのですがどのようにすればいいでしょうか?

<a name="1">  →  <a href="hoge">
<a name="2">  →  <a href="hoge">
<a name="3">  →  <a href="hoge">

<a name="9999">  →  <a href="hoge">

553 名前:デフォルトの名無しさん mailto:sage [2010/03/13(土) 22:21:59 ]
>>550
全角文字をループで扱うのはけっこう難しい。
文字コードを数値として扱う手もあるが、可読性が悪くなる。
プログラムの見栄えをすっきりさせたいなら、
配列に入れるか、置換のための関数を作るという手がある。
aryWhat = Array("0", "1", "2", ……

554 名前:デフォルトの名無しさん mailto:sage [2010/03/13(土) 22:30:04 ]
>>552
そういう場合は正規表現を使います。桁数の決まっていない数字は[0-9]+と書きます。
<a name=""[0-9]+"">
とすれば、これ1行で1から9999までのすべてが検索の対象になるので、これをhogeに置換します。

555 名前:デフォルトの名無しさん mailto:sage [2010/03/13(土) 22:33:35 ]
>>550
ヒント

Sub d()
  For i = 0 To 9
    Debug.Print i, StrConv(i, vbWide)
  Next
End Sub

556 名前:デフォルトの名無しさん mailto:sage [2010/03/13(土) 23:34:43 ]
>>554

ありがとうございます
すごく助かりました

557 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 11:41:57 ]
別のエクセルファイルの標準モジュールに書いてある定数を読み込むには、
どうしたらいいでしょうか?

558 名前:557 mailto:sage [2010/03/14(日) 12:23:52 ]
自己解決しました

559 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 16:11:54 ]
NO 品名  価格 数量 金額
1  りんご 100  3  300
・・・

という連続したデータを

NO  1 ・・・
品名 りんご
産地 
数量 3 ・・・・

というふうに転記させる方法を教えてください。
転記先のフィールドは、元のフィールド名のものがない場合もあり、
逆に元のフィールドに無いものが転記先にあったりします。
また、転記元や転記先のフィールドの順番は、入れ替わる場合があります。
うまいやり方がありましたら教えてください。

560 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 17:34:39 ]
>>559
どうかな。

1行目に作業用の空白行を追加する。

転記元の左端から1セルずつ値を読み、右に移動するループ(セルが空白になるまで)
 転記先の上端から1セルずつ値を読み、下に移動するループ
  if転記元の値と転記先の値が同じならば
   作業用の行に転記先のセル位置を記入

(ここまでで転記先のセル位置を取得)
A1 A2       A4
NO 品名  価格 数量 金額
1  りんご 100  3  300

あとは転記元のデータを1行ずつ処理。



561 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 17:39:05 ]
>>559
新しいほうのデータの1レコード分の配列を用意する
古いほうのデーターから該当する配列の位置に読み込む
新しいデータへ配列から書き出す
以後レコード分繰り返し

562 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 18:22:14 ]
別のシートにセルを一個ずつコピーしていけばいいのでは

563 名前:デフォルトの名無しさん mailto:sage [2010/03/14(日) 18:48:01 ]
おれだったらVLOOKUPでぱぱっと片付ける

564 名前:480 mailto:sage [2010/03/14(日) 22:45:10 ]
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True

565 名前:デフォルトの名無しさん mailto:sage [2010/03/15(月) 14:15:40 ]
Excel2007
Workbooks.Add
で新規にワークブックを作成する際に
オプション→数式で自動になるように作成することってできませんか?
今の状態は手動になっています。


566 名前:565 mailto:sage [2010/03/15(月) 18:09:02 ]
自己解決?
元のプログラムが入っているブックのオプションが手動になっていたので自動に変えたら
新しくできたブックも自動になってました。

なんか、自分自身をコピーして作ってるみたいな?(よく判りませんが w

567 名前:デフォルトの名無しさん [2010/03/16(火) 11:39:35 ]
WinXP Excel2003

Sub Input_Date(ByVal iDay As String)
ActiveCell.Value = CStr(iYear) _
& "/" & CStr(SpinButton1.Value) & "/" + iDay
ActiveCell.NumberFormatLocal = ComboBox1.Value
End Sub

いまのままだと何処のセルにも入力するようになっています。
指定したセルにのみ入力するよう変更したいのですが、どこを直せば良いでしょうか?


568 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 12:59:16 ]
>>567
ActiveCell

569 名前:デフォルトの名無しさん [2010/03/16(火) 16:40:50 ]
VBAで、「どこぞのプロシージャ内で」、「別のプロシージャやイベントを設定・修正」するって出来る?
例えばBook/Formのロード時のイベントプロシージャで、
 btn_test_1
 btn_test_2
   …
 btn_test_10
…って感じのボタン10個について、forで回してそれぞれのClickイベントに同一の処理を上書きさせる、とか。
それともクラスモジュール作って〜な やり方しか無いのだろうか?
わかり辛い書き方でごめん。

570 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 17:54:28 ]
2003、XPです。
株のシストレの計算をやらせるのに、ブック2枚を頻繁に行ったり来たりさせるようなモジュールはやはり相当遅くなるのでしょうか?

A:計算する元の四本値データだけ入ったブック。(シートが35枚あって、それだけで既に80MBのサイズ)
B:Aから計算結果だけを出力させるブック。

一枚に詰め込むべきか、複数枚に分けて管理すべきか・・・



571 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 18:11:19 ]
>>570
単にデータを読み書きするだけなら大して遅くはならない。
いちいちSelectとかActivateとかやっちゃうと遅くなるんで、そうしないように注意してプログラムを作ればいい。
あとは、オブジェクト型変数とかWith句をできるだけ活用すること。
計算中は余分なイベントを止めるのもそこそこ効果がある。

572 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 18:14:14 ]
>>569
質問の1行目だけ見ると答えはNO。
だけどたぶん、別の方法でできることをわかってないだけの気がする。

573 名前:デフォルトの名無しさん [2010/03/16(火) 18:38:49 ]
VBAでFX自動売買ソフトを作る事って可能でしょうか?

やりたい事

・業者orヤフー等からのレート取得
・発注機能

こんな感じです

574 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 18:42:34 ]
可能です

575 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 18:46:01 ]
是非作ってみたい
もしくはどなたかに作成していただきたいです

MT4だと業者に対応していないので・・


576 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 19:00:54 ]
プログラムもわからんのにそんな事言っててもどうしようもないと思うが
んで、誰がただでやるわけww?

577 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 20:13:48 ]
>>570
株価データの保存はDBに任せて、Excelは計算に専念させた方がスッキリすると思うけどね

578 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 20:17:59 ]
Cells(1, 2) = Cells(1, 1)
というマクロを作ったのですが、Cells(1,1)の文字数が多すぎると
#VALUE!
というエラーが出てしまいます。
Cells(1, 1)の値を他のセルにコピーするにはどうすればいいのでしょうか。

579 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 20:27:13 ]
まずは仕様書を書いてね
そしたら見積もり出すから

580 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 20:28:36 ]
>>578
そのエラーは文字列の長さとは直接は関係ありません。
まずB列の幅を広げて、セルB1の書式を確認してください。



581 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 20:58:02 ]
>>578
当方の環境下では
Cells(1, 2) = Cells(1, 1)
だと 半角256文字以上で#VALUE! になるね

Cells(1, 2).Value = Cells(1, 1).Value
だと大丈夫みたい なぜかしらんけど

つか.Valueを付けるのが本来の使い方なんだけどね

582 名前:デフォルトの名無しさん [2010/03/16(火) 21:29:59 ]
>>570
ADOつかてSQL書けよ

583 名前:デフォルトの名無しさん mailto:sage [2010/03/16(火) 22:30:23 ]
>>581
XP、2003だけど下記コードでエラー出ない。
なんでだろ?

Sub test()
Cells(1, 1) = String(257, "あ")
Cells(1, 2) = Cells(1, 1)
End Sub

↑どっかおかしい?

584 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 01:39:38 ]
>>583
これでやったら912文字のところでエラーになった
Sub test()
  For r = 1 To 1000
    Cells(r, 1) = String(r, "あ")
    Cells(r, 2) = Cells(r, 1)
  Next
End Sub

585 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 01:51:17 ]
>>575
50万くらい出す気あるなら話聞いても良いよ。

586 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 02:10:47 ]
>>584
Sub celltest()
Cells(1, 1) = String(910, "あ")
Cells(1, 2) = Cells(1, 1)
End Sub

910文字まではOKってことだな。
>>578>>581はどういう現象なんだろ?バージョンの問題かな?

587 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 03:01:12 ]
いや、911文字までOK。
ていうか、みんなOSとExcelのバージョンぐらい書こうよ。
うちはXPと2003。

ちなみにVBAを使わずにセルに直接入力した場合は1セル32767文字まで入る。
ttp://office.microsoft.com/ja-jp/excel/HP051992911041.aspx

588 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 03:15:21 ]
>>587
ん?
>>584だと911行目でエラーが発生してるから
911文字はエラー、910文字まではOKってことじゃないの?
OSとバージョンが同じだから、やっぱりバージョンの問題なんだろうな。

589 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 03:22:49 ]
doudemoii

590 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 12:25:45 ]
どうでもよくない。
>>578>>581の状況が再現できないと回答もできないし、
自分が同じトラブルに遭う可能性だってあるわけだから解決できないと気持ちが悪い。



591 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 12:47:26 ]
>>589
だんだん話しについていけなくなっちゃったんだろうなw

592 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 14:51:07 ]
気持ち悪いから>>578早く戻って来い!

593 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 16:29:57 ]
>>581で再現できてんじゃん

594 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 17:26:31 ]
で、解決方法は?

595 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 17:31:37 ]
再現できないとか言ってるから、再現できてると言ったまで。
>>581によれば、Value付ければいいんじゃないの?

596 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 17:47:44 ]
>>594
Cells(1, 2) = Cells(1, 1).Valueにすればいい。
Cells(1, 2) = Cells(1, 1)と何が違うのかは知らん。

597 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 17:53:15 ]
解決できないから気持ちが悪いんじゃなくて、解決できてるけど仕組みがわからなくて
気持ちが悪いんじゃないの?

598 名前:デフォルトの名無しさん [2010/03/17(水) 18:11:26 ]
初歩的な質問ですんません

セルに直接入力せずに三角形みたいなのをクリック(セルをクリックすると現れる三角形)すると
あらかじめ設定してた項目を取り出せるあの機能はなんて名前でしったけ?
またその設定はどこでやればいいですか?
お願いします。vista使いです

599 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 18:16:36 ]
>>598
ひょっとして、これのことか?

Excel講座 > セルをコンボボックスにする
www.serpress.co.jp/excel/no004.html

600 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 18:35:25 ]
うちだと910文字超えないとエラーにならないのに、
どうして>>581は256文字でエラーになるの?
もうちょっと再現の条件とか手順をkwsk



601 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 18:45:27 ]
>>599
そうそうそれそれ
どうもすんません

602 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 19:41:37 ]
>>598
セルにコンボボックスを仕込むより入力フォームを作って
ボタンぼんでシートに値がコピーされるように作った方がいいと思うが。

603 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 20:40:45 ]
テスト

604 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:04:36 ]
Excel2007
ブックを新たに作成するときにシートの枚数を3枚とか指定することは出来ないのでしょうか?

605 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:19:57 ]
テンプレートで

606 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:20:48 ]
>>604
Application.SheetsInNewWorkbook = 3
こういうこと?

607 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:23:33 ]
あ?テンプレの話?
2003だと
ツール→オプション→全般→新しいブックのシート数
で設定できる。2007はわからん。


608 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:28:37 ]
>>606
それです。ありがとう
テンプレートは?状態ですけどw

609 名前:デフォルトの名無しさん mailto:sage [2010/03/17(水) 22:30:49 ]
>>608
とりあえずググれよ。(もう見てないだろうが・・・)

610 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 06:32:14 ]
>>600
どうしてExcelのバージョンすら明記しないのか不思議。馬鹿?



611 名前:デフォルトの名無しさん [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

612 名前:611 [2010/03/18(木) 13:44:40 ]
おっと、>>611はXPで2003だ。
ちなみに、Win7の2007でも検証してみた。
 ・Valueあり→10000行までいけた
 ・Valueなし→8203行目でエラー
という結果。2007だとValueなしでもこんなにいけるんだなw
ってことは、質問者のバージョンは2002以前とエスパーしてみる。
それにしても、2007のVBEどっから起動するのかわからなくてビビったw

613 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 15:21:35 ]
>>611-612
>>600の「うち」の環境を書けと言ってるんだ、馬鹿。
じゃなければ、第三者が全体を把握できないだろ。

614 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 15:41:08 ]
>>611-612
Value付ければいいって結論が出てるのに、いつまで何やってんの?

615 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:06:15 ]
>>613
>>600は、910文字超えないとエラーにならないって書いてあるから
流れから2003だってわかると思うが?
流れを読まなくてもわかるように、レス内に明記するのがネチケット(笑)ということなら、
まぁ、そういうことなんだろうw

>>614
Valueは単純に“省略可能なもの”と認識してたんだが、
今回のケースで言うと、場合によっては省略してはいけないってことか?
すまん、素人にもわかるように説明してくれ。

616 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:13:20 ]
>>615
とことんアホだな。

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

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

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

知るかアホ。
このスレは素人の好奇心を満足させるスレじゃねーよ。

617 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:19:38 ]
>>611
ド素人はこれだから困る。
セルに設定出来る最大文字数はヘルプにちゃんと書かれてる。
ヘルプ見ろ。

618 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:24:40 ]
エクセルVBAに詳しい人教えてください!
yutori.2ch.net/test/read.cgi/morningcoffee/1268888151/

619 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:32:09 ]
いつまでやってんだよ……

620 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:32:10 ]
>>616-617
論点がずれてますよ。
人のことを馬鹿とかアホとか高卒文系とかド素人とか言ってるけど、
話の内容を理解できていないのは、あなたの方ですね。
何かを明らかにしたくないなら、あなたはこの話題に参加しなくてもいいと思います。



621 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:37:10 ]
ずらしてんのはお前の方だ馬鹿。

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

622 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:38:03 ]
>>618
ソース見てボタンの名前調べればいいんじゃないの?
そんな単純なことじゃなくて?

623 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:38:50 ]
・Valueを付ければ問題ない
・Excelの仕様上、何文字まで設定出来るかはヘルプに書かれている

これ以上、何を知りたいの?

624 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:41:05 ]
話の流れからするとw、>>600=>>611じゃねーの?
馬鹿と言われて悔しかったのかな?

625 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:41:30 ]
>>621
hideyoshi.2ch.net/test/read.cgi/mental/1266008088/l50
とりあえず筋トレでもしてみたら?

626 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:45:40 ]
おまいらいつまでやってんだwwwwwwwwwwww

627 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:50:36 ]
>>625
反論不能か、高卒文系のド素人が。
もう黙っとけ。

628 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:57:30 ]
VBAからGroovyのプログラムを呼びたいんですが、何か方法はありますか?
Groovyに限らず、VBAから他の言語のプログラムを呼んで、返り値を使用する
ことってできるんですかね?

629 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 16:58:28 ]
一つのセルには200文字も必要ねーな。
50文字でも十分じゃね?
数式厨には足りないかも知らんけどw
超長ーい数式を得意としてるやつもいるからな。

630 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:05:02 ]
>>621
必死ですね。コメントを求められているのでレスしますね。
その事象が起きるからといって、Excel2003だという証明は私には出来ません。
学歴も聞かれてますね。おっしゃる通り文系ですが大卒です。
これでよろしいでしょうか?



631 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:06:40 ]
だよな。表計算ソフトなんだから50文字でも多いぐらいだ。

632 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:09:01 ]
超長〜い数式は勘弁してほしいw

633 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:18:44 ]
超長ーい数式とか配列数式とかSUMPRODUCTのフィルコピーが大好きなやつはほとんどアホばかり。
VBAで言えば変数使わないで何度も同じ値を取得してるようなもんだ罠。
数式でやるならVBAの変数に相当する作業セルを使えってこった。

634 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:22:44 ]
>>623
もういい加減アホとか言うのやめれ。

635 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:25:04 ]
ん?俺のことかな
すまん、今度からヴァカと書くことにするわ。

636 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:27:44 ]
>>630
証明できるかどうかなんて聞いてないんだよ。

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

横からノイズ増やしといて、俺の知りたいことだけお前ら教えろとかいう奴はいらないんだよ。
わかった?

637 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:31:39 ]
ふぁいと!
俺は50文字でも十分すぐるから興味ナス

638 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:32:35 ]
>>630
お前も必死だよwww

639 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:34:53 ]
大卒文系って、裏・逆・対偶レベルの論理学も理解できないの?
今はやりのゆとりって奴?

640 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:36:20 ]
まぁ餅つけ
50文字でも十分ということで糸冬了



641 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:39:24 ]
まぁ、セルに表示できないような文字数を設定するというのは、基本的な使い方では
ないわけだから、自分がそのような処理を実装しなければならなくなったときに、
ターゲットとなるExcelの仕様上の制限を調べ、テストを十分にやれば良い。

642 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:41:21 ]
必要条件と十分条件を良くわかってない馬鹿SEのことを思い出した。

643 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:43:09 ]
CellsのデフォルトプロパティがValueじゃないってことじゃないかと思うけど、
調べるつもり無し。

644 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:51:55 ]
Cells(2, 1) = Cells(1, 1)
でエラーが発生するとき、
Range("B1") = Range("A1")
でもエラーが発生するね。
何故なのかはそれほど知りたくないけど、RangeのデフォルトプロパティはValueだって
思ってたので、ちょっとキモチワルイ。

やっぱり
Range("B1") = Range("A1").Value
と書くと動く。
まぁ、デフォルトプロパティは使うなってことかな。

645 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:52:57 ]
スレが伸びてると思ったら一人で暴れてるようだな。
文体でバレバレだw

646 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 17:57:50 ]
>>644
セルの文字数についてはバージョンによる違いだってわかるけど、
Valueの省略については色々調べてもわからなくて、昨日からずっと気持ち悪い。
納得できる答えをくれる神は降臨しないかと待ってるんだけど
スレ覗く度に荒れる一方で(ry

647 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 18:22:47 ]
>>646
納得できる答えが見つかっても、安全側に倒してデフォルトプロパティに頼らない
コードを書くしかないという状況は変わらないよ。

648 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 18:24:50 ]
>>645
バレバレw

649 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 18:29:42 ]
まぁどっちもひといが、この板的にはこれが一番ひどい。

>>611
>それはそうと、これだと10000行までいけるなw

650 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 18:38:10 ]
例えば

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

とやると
Empty
Range
となる



651 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 19:46:05 ]
>>650
だから?

652 名前:デフォルトの名無しさん mailto:sage [2010/03/18(木) 19:54:40 ]
>>611にガン擁護された>>600は、どのような登場の仕方をするのであろうか。






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<253KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef