- 1 名前：デフォルトの名無しさん [2007/12/12(水) 17:27:44 ]
- ExcelのVBAに関する質問スレです
質問前に 【 >>2-3 】 あたりを良く読むこと
前スレ
pc11.2ch.net/test/read.cgi/tech/1189814602/
- 756 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 12:21:30 ]
- アドバイス多謝。
>>753
>行が挿入されたものか、一部改変されたものかの判断って、どうやるつもり？
一部改変については、次の行を比較して、一致なら改変、そうじゃなければ挿入と考えるつもり。
（二行改変は考慮しない）
問題は、挿入か削除か。
そのセルを上方検索し、見つかれば削除、でなければ挿入って判断かな。
ロジックってこの板？
- 757 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 12:47:07 ]
- 他人を巻き込んでダラダラやらずに、diffのソース読んだほうが早いって
- 758 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 13:14:21 ]
- shell c:\windows\windiff.exe
- 759 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 16:50:59 ]
- つfc.exe
- 760 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 16:52:35 ]
- "c:\program files\support tools\windiff.exe" /?
- 761 名前：デフォルトの名無しさん mailto:sage [2008/02/13(水) 23:07:24 ]
- 良回答認定>>760
だがスレ違い
- 762 名前：デフォルトの名無しさん mailto:sage [2008/02/14(木) 09:57:51 ]
- >>758-760
神認定
と思って報告したら、
「入ってるＰＣと入ってないＰＣがある」と言われたorz
- 763 名前：デフォルトの名無しさん mailto:sage [2008/02/14(木) 23:26:24 ]
- winmerge
- 764 名前：デフォルトの名無しさん mailto:sage [2008/02/15(金) 23:36:29 ]
- cdiff.vbs
- 765 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 12:41:39 ]
- ２つのExcelファイルをdiffするのをVBAでやりたいのですが？
- 766 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 12:47:32 ]
- やればぁ？
- 767 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 13:34:31 ]
- やってくださいよ
- 768 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 17:25:09 ]
- つc:\program files\support tools\bdiff.exe
- 769 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 18:52:16 ]
- エクセルの機能にある、「Webページとして保存」ではなく
1.htmlを記述してあるシートをコピー
2.メモ帳に貼り付け、test.txtとして保存。
3.2のtest.txtをtext.htmlに名前を変更。
というような動作をVBAで自動化できるでしょうか。
もし、似たようなことが可能であれば教えてください。
- 770 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 18:58:33 ]
- できるけどエクセルでやるようなこと？
- 771 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 19:05:58 ]
- メモ帳を自動化するのはむずかしい
- 772 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 19:12:24 ]
- セルの内容をそのままファイルに出力すればいいんじゃ？
- 773 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 19:16:09 ]
- >>769
シートの内容をプレーンテキストに出力して拡張子を.htmlにしたいなら
メモ帳なんて使うまでもないが､770も言ってるとおりExcelの仕事じゃない
>>2★3,4
>>771
vbsとかで自動化するのは難しいけど
VBAというかVB言語ではSendMessage使えるから簡単だよ
- 774 名前：769 mailto:sage [2008/02/16(土) 19:51:14 ]
- ありがとうございます。
具体的な目的を言うと、複数の条件でhtml記述を変化させている
シートがありまして、そのhtmlをブラウザでプレビューするのを
先ほどの手順でやっていたのですが、それを簡素ができないものか
と思っていたのです。
もう少し考えて見ます。
- 775 名前：デフォルトの名無しさん mailto:sage [2008/02/16(土) 23:19:25 ]
- >>772じゃ駄目な理由をまず聞こうか。
- 776 名前：デフォルトの名無しさん mailto:sage [2008/02/17(日) 00:02:38 ]
- 簡単なSendMessageを使ってもらおうか
- 777 名前：デフォルトの名無しさん mailto:sage [2008/02/17(日) 13:24:27 ]
- 教えてください！
Excel2007のOfficeボタンを非表示にする方法ってあるのでしょうか？
マイクロソフトのライブラリを見てもまだ情報がなくて……。どなたかご存知の方ご教授いただけませんでしょうか。
- 778 名前：デフォルトの名無しさん mailto:sage [2008/02/17(日) 15:37:44 ]
- Officeボタンとは何かというところから解説してください
- 779 名前：デフォルトの名無しさん [2008/02/17(日) 15:39:09 ]
- OS:XP、Excel2000でワークシート関数を使用したいと思います。
引数にシート範囲ではなくVBAの配列を指定したいのですが
そのままでは出来ません。
引数に配列を指定する方法があれば、ご教授願います。
dim a(10) as long
dim b as long
b = WorksheetFunction.Max(a)
- 780 名前：デフォルトの名無しさん mailto:sage [2008/02/17(日) 16:09:12 ]
- >>778様
「Officeボタン」とはExcel2007から追加された、いままでで言う「ファイル」メニューのようなGUIになります。
新しく追加されたGUIのため、Officeボタンのオブジェクトライブラリを操作すれば非表示にすれば良いのか、xmlを編集すれば操作できるのかどうしても判らないんです。
ご存知でしたらご教授戴けると幸いです。
>>779様
動的配列のサマリを計算するメソッドのようなものがあればそれを代用すれば良いのかもしれませんが、
自分には以下のような方法でいつも計算させてしまっています。
Sub subTEST()
Dim a(10) As Long
Dim b As Long
For inCnt = LBound(a) To UBound(a)
b = WorksheetFunction.Max(a(inCnt))
Next a
End Sub
- 781 名前：デフォルトの名無しさん [2008/02/17(日) 19:13:16 ]
- >>780
ご回答ありがとう御座います。
ただ、そのコードだとa(10)の値がbに入るだけではないでしょうか？
- 782 名前：デフォルトの名無しさん mailto:sage [2008/02/17(日) 20:41:33 ]
- >>780
なるほど
あいにく2003なので力にはなれません
でもApplicationクラスのどっかにCommandBarsみたいにあると思うから、
地道に探してみるしかないんじゃ
- 783 名前：デフォルトの名無しさん mailto:sage [2008/02/18(月) 14:43:42 ]
- ｚｚって何者？
ヴァッカじゃねーのwww
氏ねよwww
チラシの裏でｽﾏｿ
- 784 名前：デフォルトの名無しさん mailto:sage [2008/02/18(月) 15:39:11 ]
- >>781
たまたま>780がmax()の仕様を知らなかっただけだろ。
どうしてもワークシート関数を使いたいなら配列を1要素ずつ処理すればいいと言う点では同意。
max()の場合なら、b = worksheetFunction.max(a(inCnt), b)とでもすれば使える。
# average()なんかはそうはいかないけど。
- 785 名前：デフォルトの名無しさん mailto:sage [2008/02/20(水) 07:04:05 ]
- 関数の引数にセル位置を「A1」の形式で入れたいとき、
行を変数にはできないんでしょうか？
たとえば変数xをSUM関数につかう場合、=SUM(A1:Ax)としてもエラーになりますよね・・
- 786 名前：デフォルトの名無しさん mailto:sage [2008/02/20(水) 08:08:49 ]
- このすれ頭から読み直せ
- 787 名前：デフォルトの名無しさん mailto:sage [2008/02/20(水) 11:53:43 ]
- HYPERLINK関数で質問です。
HYPERLINK関数では、特定の文字を含むリンクは張れないのでしょうか？
現在、HYPERLINK関数を用いたシートの目次を、
マクロで作成しております。
ですが、シート名に記号を含むと参照できないようです。
（＠や＃などほとんどの記号は駄目ですが、
アンダーバーだけは大丈夫なようです･･･。）
しかし、マクロではなく、編集メニューの
[挿入]→[ハイパーリンク]から同じシートを指定した場合は、
参照できるようですorz
これら２つの操作は全く別物なのかもしれませんが･･･orz
---------------------------------------------
＜参照できる例＞
=HYPERLINK("#シート名!A1", "シート名")
＜参照できない例＞
=HYPERLINK("#＠シート名!A1", "＠シート名")
Excelのバージョン：2002(10.2614.3311)
---------------------------------------------
参照できない例のようなシート名で、
HYPERLINK関数で参照する方法はありますでしょうか？
何かわかる方がおられましたら、ご助言ください。
よろしくお願いします。
- 788 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 12:29:39 ]
- Officeボタンも知らないヤツが、質問スレで回答側に回ろうとするなよｗ
- 789 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 13:27:23 ]
- 目先の問題の回答は出来なくても質問の仕方を教えるのはできるだろ
- 790 名前：デフォルトの名無しさん [2008/02/21(木) 19:44:50 ]
- エクセルで計算した数値は少数桁何桁精度なのでしょうか？
- 791 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 19:59:12 ]
- 3桁
- 792 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 20:11:40 ]
- >>790
IEEE 754倍精度はある。
- 793 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 23:07:20 ]
- Perlについての質問箱スレから誘導されて来ました。
Excel VBAからDOSコマンドを実行することはできますか？
具体的にはPerlスクリプトを実行させて、結果をExcelで受け取って
表示するまでを１クリックで行いたいと思っています。
環境はWindowsXP Home Edition、Excel 2003 です。
よろしくお願いします。
- 794 名前：デフォルトの名無しさん mailto:sage [2008/02/21(木) 23:51:57 ]
- >>793
＞Excel VBAからDOSコマンドを実行することはできますか？
ちょいと命令忘れたができる。
VBAからPing送ったりbatを呼び出したりしたりもできるから間違いない。
＞具体的にはPerlスクリプトを実行させて、結果をExcelで受け取って
＞表示するまでを１クリックで行いたいと思っています。
上の内容を具体的にしたつもりだろうが、上ができたとしてもこちらは関係ないだろ？
PerlからExcelにイベントでも起こさせられれば可能。
- 795 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 00:06:30 ]
- XPにDOSは載ってません
- 796 名前：793 mailto:sage [2008/02/22(金) 01:09:30 ]
- >>794
ありがとうございます。では情報があることを信じて
再びgoogleの海へと漕ぎ出すことにします。
>上ができたとしてもこちらは関係ない
言われてみたらその通りでした。
いつPerlの処理が終わったかExcel側で知る必要がありますもんね。
>>795
すみません、XPではコマンドプロンプトでしたか。
- 797 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 01:46:04 ]
- >>793
>>728-731
- 798 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 02:00:35 ]
- active perlはどう？
- 799 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 12:22:22 ]
- >>792
つまり何桁ですか？
- 800 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 20:07:05 ]
- >>792
倍精度の前のIEEE 754って、何を規定した規格の番号ですか？
- 801 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 21:39:25 ]
- >>800
ググれ
浮動小数点数の規格だ
- 802 名前：デフォルトの名無しさん mailto:sage [2008/02/22(金) 23:55:17 ]
- >>800
Excel2000辺りは倍精度だけど、2003辺りからは拡張倍精度になっているから要注意。
前者は10進数で概ね15桁、後者は10進数で概ね19桁の精度があることになる。
- 803 名前：693 mailto:sage [2008/02/23(土) 16:40:39 ]
- 解決したよ。
Origin句を定数xlWindowsから、
Shift-Jisのコードページである"932"へ変更してみたところ
文字化けなく開くことができたのでご報告。
その辺の細かな挙動の違いにだいぶ時間使いました・・・。
今後の何かの参考になれば、ということで、ひとつ。
- 804 名前：デフォルトの名無しさん [2008/02/23(土) 16:45:14 ]
- VBAやEWCELのlog関数で計算して、その答えから逆算してもとに戻してみたら3桁精度しかなかったのです。
精度をあげる方法がありましたら教えてください。
- 805 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 18:30:23 ]
- 寡聞にしてEWCELなるものは存じ上げませんが、VBAでやってみたということでしたら
ソースをご提示願えませんでしょうか。
- 806 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 18:44:19 ]
- EXCELの前身のアプリじゃね
- 807 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 20:11:53 ]
- WinXP+Office 2k7です。
ワークシート上部のいくつかのセルに任意の数値を入力するとそれに基づいて全体が計算されるシートを作りました。
B8というセル(自分で数値を入力する)の値がいくつならセルI818が0になるか、というのを探すためにLoopを使ったのですが、
Dim x As Integer
x=0.1
Do
x=x+0.0001
Range("B8").Value=x
Loop Until Range("I818").Value=0
とやってもI818が0になっても普通に通り過ぎてしまいますorz
ひょっとしてワークシート上でI818が計算されるのを待たずにLoopが続いてしまうんでしょうか。。？
お知恵をお貸しください
- 808 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 20:23:28 ]
- お前、小卒か？
整数って意味を知ってるか？
- 809 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 20:28:32 ]
- あ、integerじゃなくてdoubleでした。
こっちに書くとき間違えた＼(^o^)／
- 810 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 20:33:09 ]
- > B8というセル(自分で数値を入力する)の値がいくつならセルI818が0になるか
自分でマクロ書かなくても、それはExcelのゴールシークを使えばいいのではないかと思う。
- 811 名前：デフォルトの名無しさん mailto:sage [2008/02/23(土) 20:36:45 ]
- >>810
うは・・・全然知りませんでした('A`)
お手数おかけしました。ありがとうございます
- 812 名前：デフォルトの名無しさん mailto:sage [2008/02/24(日) 11:00:13 ]
- すれ違いでしたら誘導お願いします。
「マクロを有効化する」を出さずfor文相当の機能を実現しようと思ってます。
直接forは使えないので、富豪的にセルのマスを記憶装置にする方針です。
やりたいことは、以下の状況で
「列Bが「新」の行の数値を抜き出して
それをコンマで連結して指定のセル(例えばD100)に入れる」です。
列A 数値(1ずつ増えていく)
列B 「新」「旧」のどちらかの文字
一旦、以下の式をC列に入れて、ドラッグでオートフィルします。
=if(B1="新",A1,"")
これはうまく行き、C列には「新規」の行のみに数値が表示されます。
次に、D列の先頭にC1の値を入れます(forの初期条件)
次に「同じ行のC列に値があれば、一つ上のD列の値をコンマで連結」
「同じ行のC列に値がなければ、一つ上のD列の値をそのまま表示」
をforのステップ条件としてD2にかき、D100へオートフィルしようとしたのですが
=CStr(D1) & "," & CStr(C2)やCStr(val(D1)) & ..といった式ではうまくいきません。
アドバイス頂けないでしょうか
以上長文失礼しました。
- 813 名前：812 mailto:sage [2008/02/24(日) 11:03:55 ]
- ↑訂正「新規」ではなく「新」ですね
- 814 名前：デフォルトの名無しさん mailto:sage [2008/02/24(日) 11:37:49 ]
- Vlookupじゃね？
- 815 名前：デフォルトの名無しさん [2008/02/24(日) 12:12:23 ]
- >>804
＞ VBAやEWCELのlog関数で計算して、その答えから逆算してもとに戻してみたら3桁精度しかなかったのです。
log関数は数値が小さいと精度は悪くなる。
少し値が変わると急激に値がかわるからな。
自分で精度のよい関数を作るのがよい。
級数展開とかやれば作れる。
>>805-806
おまえら厨房だな。
- 816 名前：デフォルトの名無しさん [2008/02/24(日) 13:44:03 ]
- 質問なのですが適当な大きさのユーザーフォームを作成してフォームの中にラベルや
ボタンを設置します。設置したラベルやボタンが常にフォーム幅の真ん中に設置
させる方法はありますでしょうか？フォームの大きさを後で変更しても真中に自動で
なるようにしたいです。
- 817 名前：812 mailto:sage [2008/02/24(日) 15:25:46 ]
- >>814
それだとコンマをくっつけることができませんでした。
しかし、結局、こんな感じで解決しました
if(C2<>"",concatenate(D1,",",text(C2,"#")),D1)
- 818 名前：デフォルトの名無しさん mailto:sage [2008/02/24(日) 21:05:38 ]
- >>816
算数レベルで処理
- 819 名前：800 mailto:sage [2008/02/24(日) 22:00:00 ]
- >>802
Thanks。概ねという留保付けは、このせいですか？
Excel で浮動小数点演算の結果が正しくない場合がある 2007年3月19日
support.microsoft.com/kb/78113/ja
- 820 名前：デフォルトの名無しさん [2008/02/24(日) 22:38:32 ]
- 816さんどーゆうことですか？
- 821 名前：802 mailto:sage [2008/02/24(日) 22:49:22 ]
- あーそうそう、そこの精度の欄にある、暗黙と仮数を足した53ビットを10進で表わすと概ね15桁ってこと。
つまり、log2(2^53)≒15.95=15~16桁。
- 822 名前：デフォルトの名無しさん [2008/02/25(月) 10:04:55 ]
- 教えていただきたいのですが、エクセルで、Ａの列に任意のセルのカーソルが
ある場合のみ（Ｂ列やＣ列ではプログラム自体が稼動しなくしたいのですが）
FANCTIONを実行したいのですが、うまくいきません。
どうしたらうまくうごくのでしょか？
- 823 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 11:18:34 ]
- >>822
もうちょっと分かるように説明しる。あと、どんなFUNCTIONよ？
ボタン押したときに、カーソルが特定の列にある場合にのみ処理を有効にしたいってことか？
- 824 名前：デフォルトの名無しさん [2008/02/25(月) 11:38:48 ]
- 822です。
＞カーソルが特定の列にある場合にのみ処理
まさにこの事です。エクセルの行列のデーター
をＶＢで計算させてるのですが、キーの列をＡ列にして
そこからActiveCell.Offset(0, ｘ)とActiveCell.Offset(0, ｘ+1)
を足してActiveCell.Offset(0, ｘ+2)へ答えを出しなさいとしてるのですが、
いかんせん、キーにしているＡ列以外にセルがある場合も実行していまうので
ActiveCell.Offset(0, ｘ+2)の書き込みたいところデーターのあるActiveCell.Offset(0, ｘ+3)
とかに上書きしていまうので、何とかしたいのです。ＦＡＮＣＴＩＯＮは
ActiveCell.Offset(0, ｘ+3)＝ActiveCell.Offset(0, ｘ)+ActiveCell.Offset(0, ｘ+2)
を変数にしたものです。
- 825 名前：デフォルトの名無しさん [2008/02/25(月) 11:42:10 ]
- すいません。間違いました。ＦＡＮＣＴＩＯＮは
ActiveCell.Offset(0, ｘ+2)＝ActiveCell.Offset(0, ｘ)+ActiveCell.Offset(0, ｘ+1)
を変数にしたものです。
です。
- 826 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 12:17:05 ]
- >>825
単にFANCTIONとやらの先頭で、ActiveCellがA列じゃなければ終わればいいだけじゃね?
- 827 名前：825 [2008/02/25(月) 12:58:53 ]
- ActiveCellがA列じゃなければが、
書けないのです・・・
- 828 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 13:12:22 ]
- そもそも>824のxはどこから出てきたのか知らんが、
offsetプロパティに辿り着けるくらいならcolumnプロパティくらい見つけられるだろ。
試しにmsgbox activecell.columnして味噌。
- 829 名前：825 [2008/02/25(月) 14:11:10 ]
- If ActiveCell.Column = 1 Then で出来ました！
828さん ありがとうございます。
感謝 感謝！
- 830 名前：デフォルトの名無しさん [2008/02/25(月) 15:57:11 ]
- 基本的な質問でスミマセン！
ワークシートに新しい埋め込みグラフを作成（Addメソッドによる）したいのですが
Dim co As ChartObject
Set co = Worksheets("sheet1").ChartObjects.Add(50, 40, 200, 100)
は正常に動くんですが
Worksheets("sheet1").ChartObjects.Add(50, 40, 200, 100)
は、構文エラーになります。なんで？
わざわざ変数に格納しないと、機能しないのはなぜなのでしょうか？
詳しい人おられましたらご教授いただけないでしょうか？
- 831 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 16:00:26 ]
- そういう構文だからだろ。疑問を持つところじゃない。
- 832 名前：デフォルトの名無しさん [2008/02/25(月) 17:16:37 ]
- Rng AS Range
Rng1 AS Range
Rng2 AS Range
Rng=Range("A1:G10")
このRngから一番右の範囲をRng1に入れたい。
またRngから一番右の列を除いた範囲をRng2に入れたい。
どのようにすればよいでしょうか？
- 833 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 18:32:27 ]
- union
- 834 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 18:45:36 ]
- >>830
Callステートメント
- 835 名前：デフォルトの名無しさん [2008/02/25(月) 18:49:27 ]
- >>832
Rng1=Rng.Resize(Rng.Row.Count-1,Rng.Columns.Count).offset(1,0)
Rng2=Rng.Resize(1,Rng.Columns.Count).offset(1,0)
- 836 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 22:51:26 ]
- >>830
Worksheets("sheet1").ChartObjects.Add 50, 40, 200, 100
- 837 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 23:07:06 ]
- ところで君たちは未だにVB独特のハンガリアン記法を守っているのかい？
今度VBAをメンテすることになって読みにくいなあと思ってるんだが・・・。
- 838 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 23:21:31 ]
- なんでExcelでシステムハンガリアン使うん？
- 839 名前：デフォルトの名無しさん mailto:sage [2008/02/25(月) 23:40:24 ]
- >>835
はぁ？
>>832
Set Rng1 = Rng.Columns(Rng.Columns.Count)
Set Rng2 = Rng.Resize(, Rng.Columns.Count - 1)
- 840 名前：デフォルトの名無しさん [2008/02/25(月) 23:55:21 ]
- 質問です、デスクトップでユーザーフォームだけ残してエクセルは最小化する方法はありますでしょうか？
- 841 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:00:18 ]
- 任意のｘｉｓファイルを2個各シートに読み込みたいのですが
どうやってもできません・・・
ファイルの読み込みってどうやればいいのでしょうか？
- 842 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:17:49 ]
- >>841
ブックを開いておいて、シートを移動すれば医院で内科医。
- 843 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:27:13 ]
- vbaを使用してRS232cで計測するはめになったんですが、エクセルのvbaはvb6のようなタイマがないので、
擬似的なタイマを作成するときに、何か注意点とか欠点教えてください
- 844 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:28:18 ]
- ご愁傷様。
- 845 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:30:47 ]
- >>842
ＶＢＡでボタンでファイルを選択って出したいのです！
でも参照とか選択ってＢＯＸの出し方すら分かりません・・・
- 846 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 00:56:58 ]
- >>845
ファイルを開くダイアログ
ttp://www.serpress.co.jp/excel/vba030.html
- 847 名前：デフォルトの名無しさん [2008/02/26(火) 01:14:15 ]
- 質問です、デスクトップでユーザーフォームだけ残してエクセルは最小化する方法はありますでしょうか？
- 848 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 01:15:58 ]
- >>846
おお、これでＢＯＸ造れるんですね！どうも！
またちょっと頑張ってみます
- 849 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 07:10:38 ]
- >>847
こういう事？
Private Sub UserForm_Initialize()
Application.Visible = False
UserForm1.Show
End Sub
- 850 名前：デフォルトの名無しさん [2008/02/26(火) 08:29:10 ]
- Dim a As Integer
a = Count("a1:a4")
For i = 1 To a
Beep
Next i
ｼｰﾄのデーター数だけ繰り返し処理したいのですが
a = Count("a1:a4")ここんとこがエラーになってしまいます。
どう処理したらいいのでしょう？
- 851 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 12:43:24 ]
- a = WorksheetFunction.Count(Range("a1:a4"))
でどう？
試してないけど。
- 852 名前：デフォルトの名無しさん [2008/02/26(火) 16:50:49 ]
- 851さん 850です。動きましたありがとうございました。
- 853 名前：デフォルトの名無しさん [2008/02/26(火) 19:00:35 ]
- Renge(RefEdit1.Value)と使いたいのですが
RefEdit1.Valueを『セル範囲』かどうか調べる方法はありますでしょうか？
よろしくお願いします。
- 854 名前：デフォルトの名無しさん [2008/02/26(火) 20:10:29 ]
- フォームから入力するVBAを作成しました。
プログラムを走らせ、フォームがでますが、
何も入力せずに放置するとFrame内だけが白くなります。
改善する方法はありますでしょうか？
- 855 名前：デフォルトの名無しさん [2008/02/26(火) 21:57:03 ]
- 830です。
>>834 さん
なるほど！。値を渡す構文になってしまっていたのですね！
>>836 さん
本当だ！動きました。ありがとうございました。
834さん。836さん。お陰様で疑問が解決しました。感謝！感謝！
- 856 名前：デフォルトの名無しさん mailto:sage [2008/02/26(火) 22:29:04 ]
- >>854
気にすると体に毒だぞ
|
 |
