Excel VBA 質問スレ Part37 [転載禁止]©5ch.io
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2015/06/10(水) 16:18:49.84ID:T4wZlTyk★1 質問テンプレ(雛形)は用意しませんが､OSとExcelのバージョンは必ず書きましょう。
★2 ExcelのVBA以外の部分に関する質問はNGです。
但し､VBA無しでも出来ることだが､あえてVBAでやりたいって物に関してはOK。
★3 ExcelのVBE(Visual Basic Editor)を使うとしても､VBAの分野以外に関してはスレ違いです。
VBAとは､『Visual Basic for Applications』の略で
Application
├Workbooks
｜└Workbook
｜ ├Worksheets
｜ ｜└Worksheet
というApplication以下のオブジェクトを､VB言語で操作するものを指します。
例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､
セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。
★4 とりあえず､Excelのインスタンスを作らずにVB6で出来ることは全てスレ違いだと思ってください。
★5 レベルはどうあれ､ここはプログラマ用の板スレです。プログラマとは､自分でプログラムを組み、
コードを書く人の事なので､自分でやるきは全く無く､丸投げしようって人はお断りです。
ヒントを貰えばあとは自力でなんとかしますって人のみどうぞ。
★6 わからなければとりあえず「マクロの記録」（Alt, T, M, R）
前スレ:Excel VBA 質問スレ Part36
http://peace.2ch.net/test/read.cgi/tech/1420790342/
関連スレ：VBAなんでも質問スレ
http://toro.2ch.net/test/read.cgi/tech/1342087380/
0488デフォルトの名無しさん
2016/03/09(水) 12:38:01.11ID:mKSHkmJs第三者に説明するのが下手すぎる
だから検索キーワードも適切じゃないから、やりたいことがヒットしないんだと
0489デフォルトの名無しさん
2016/03/09(水) 14:39:51.50ID:cAaPuGj+ごめん、まだわからん
>>482 が書いている方法（チェックボックス or リストボックス）でファイル選択して
選択されたファイルの個別VBAを順次実行するVBAを「実行」ボタンか何かに割り当てる、
じゃだめなの？
0490デフォルトの名無しさん
2016/03/09(水) 14:52:53.10ID:uBQgd+CUフォームを立ち上げたらaからeまでの
値を任意選択ができるようにして実行ボタン押させる
実行ボタンにプロシージャを割り当てて
そこで選択肢に応じて開くファイル、実行するマクロを決める処理をかけばいいやん。
0491デフォルトの名無しさん
2016/03/09(水) 15:10:13.47ID:7xGDnHuU複数の選択されたBookに組んであるマクロを動かすフォームが作りたいってだけじゃないのか
0492デフォルトの名無しさん
2016/03/09(水) 16:34:28.81ID:e2Rh/cBQチェックボックス とか リストボックス 複数選択 とかでどうだって言ってんだが
チェックボックスとかリストボックスとかがどういう物かわからんのか？
まあそれでもググればだいたいわかりそうだが
他人の話をちゃんと聞かない人なのか
0493デフォルトの名無しさん
2016/03/09(水) 20:28:21.36ID:fhz9XN7USub test()
c = test1
If Not IsEmpty(c) Then
For Each x In c
Debug.Print x
Next
End If
End Sub
Function test1()
With Application.FileDialog(msoFileDialogFolderPicker)
If .Show Then test1 = test2(.SelectedItems(1))
End With
End Function
Function test2(x)
Dim c As New Collection
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.folderexists(x) Then
For Each x In fso.getfolder(x).Files
c.Add x
Next
End If
If c.Count Then
ReDim t(1 To c.Count)
For i = 1 To c.Count
t(i) = c(i)
Next
End If
test2 = t
End Function
0494デフォルトの名無しさん
2016/03/09(水) 21:02:11.93ID:qng6hFpE0495デフォルトの名無しさん
2016/03/09(水) 21:06:27.41ID:fhz9XN7UFunction test1()
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = True
If .Show Then
ReDim c(1 To .SelectedItems.Count)
For i = 1 To .SelectedItems.Count
c(i) = .SelectedItems(i)
Next
End If
End With
test1 = c
End Function
これで良かったわとちょっと後悔。
0496デフォルトの名無しさん
2016/03/09(水) 23:02:30.94ID:aaVDZq0Jリアルでも誰かと専門的な話をする時は図を描く用のノートが手放せないダメな奴です。
見た感じ>>495さんの言っている事が、私が言いたい事と概ね同じです。
（コードの内容はまだ理解できていませんが）
>>492
わかりづらくて申し訳ありません。
■一括で選択ってのが何をどうしたいのかわからん
>>487の内容になりますが
>>480様が言うようなGetOpenの方法ではなく、入力フォームのような物(GUI)で使用者にファイルを選択させる方法が無いかどうかを聞きたかったのです。。。
■GUIの話で、そのa-eまでのファイルが固定なら
まあ俺ならa-eまでチェックボックス並べるか、複数選択可能にしたリストボックス使うかだな
フォーム使っても良いし、シートに直接でもまあ良いけど
>>487での内容になりますが
〉〉a〜eのファイルについて
・ファイル形式は全て.xlsb
・不定期で第三者により更新され、ファイル名が20160301_a.xlsb→20160309_a.xlsbと日付部分が変更される(中身も変わりますがその辺はマクロ作成済みです)
↑a-eまでのファイルが固定ではなく、ファイル名に変更のかかるものだと言いたくてこういう書き方をしました
というか私がこの板で質問するレベルに到底達していないということも良くわかりました。
まだフォームの作成自体よく分かってなくて四苦八苦している状態ですので、
マクロ作成は一旦止めて、そもそもであるフォームの勉強をやってある程度の知識を付けてから
また出直してきます。
皆様のお時間を割いてしまい大変申し訳ありませんでした。
0497デフォルトの名無しさん
2016/03/09(水) 23:16:42.62ID:fhz9XN7U相手の時間を割く事は出来ないから「お時間を割かせてしまい」だけど、これはちょっとおかしい。
今回の流れの場合は、
解決したなら「お手間を取らせてしまい大変申し訳ございません」
解決していないなら「ご尽力いただきありがとうございます」
辺りが適切かな。
煽りじゃなく、本当に日本語の勉強すると色々と良くなると思うよ。
あとはPREP法やSDS法を覚えてみると質問の整理に役立つんじゃないかな。
0498デフォルトの名無しさん
2016/03/09(水) 23:57:04.42ID:e2Rh/cBQまあ答える方も別に強制されてるわけではなく趣味で答えてるだけだから
スレの趣旨にそう内容なら気にする事はないんじゃね
0499デフォルトの名無しさん
2016/03/10(木) 00:04:03.03ID:oSAQRbc8普段敬語を全く使わないので変な日本語になっていると思われますので、その辺も含めて、ちゃんとした敬語で意思疎通できるように日本語を勉強します。
マジで手間取らせてスマンカッタ！
もう少し勉強してからまた質問するからその時はまたよろしくな！
って言ってたつもりでした。
皆さんご親切にありがとうございました。
0500デフォルトの名無しさん
2016/03/10(木) 00:09:13.88ID:g9IYMMnQうーん、、専門的な話でもなく、VBAのスキルや知識の話でもなく、それ以前の話をしてるんだけどなあ
要件が全くわからない
0501デフォルトの名無しさん
2016/03/10(木) 00:16:56.97ID:n+nn3+Tv>>495で良いなら、>>480で話が出てるが>>487で否定してるのはなんだったんだと
0502デフォルトの名無しさん
2016/03/10(木) 00:26:55.07ID:b4xwXnri１、シート上のボタンを押すとフォームを起動する
２、フォーム上の実行ボタンを押す
とリストボックスで選んだファイル名のファイルをopenする
とか
0503デフォルトの名無しさん
2016/03/10(木) 01:02:21.84ID:uekE/fXp0504デフォルトの名無しさん
2016/03/10(木) 01:52:05.62ID:n+nn3+Tvググればいくらでも解説でてくると思うんだが、なぜここで聞いてるの？
まあVBAに限るなら、論理演算子を使った演算の事だろうな
ImpとかEqvとか使ったことないけどｗ
ちなみにVBAの変数はNullを取り得るので、油断すると思わぬ結果になる事がある
0505デフォルトの名無しさん
2016/03/10(木) 05:39:29.64ID:uekE/fXpぐぐってウィキペディアを見ましたがちんぷんかんぷんだったのでダメ元でここで聞いてみた次第です。
少しわかったような気になれました。ありがとうございました。
0506デフォルトの名無しさん
2016/03/10(木) 06:18:03.43ID:6K4R3xGyVBAは独自仕様すぎるのと掘り下げた情報が手に入り難いから益々混乱するよ
Cとかやった後VBAで同じことやろうとしてあれ？って絶対なるから
0507デフォルトの名無しさん
2016/03/10(木) 06:25:42.65ID:YNiJ5d84クラスがしんどい。
0508デフォルトの名無しさん
2016/03/10(木) 06:36:55.93ID:YDCDLTcE「Cなんてやる必要あるの？」なんて言ってJSやらPHPやらから始めちゃうヤツが問題で、
普段は低レベルな問題に触れないし考えもしないから、いざという時のアクシデントにめっちゃ弱い。
0509デフォルトの名無しさん
2016/03/10(木) 07:16:55.50ID:oi9Gk0D0> Cとかやった後VBAで同じことやろうとしてあれ？って絶対なるから
ないのは短絡評価位だろ
モダンではないとは思うけど、別に独自と言うほどのものでもない
0510デフォルトの名無しさん
2016/03/10(木) 08:00:38.69ID:qo9r6ONf0511デフォルトの名無しさん
2016/03/10(木) 09:21:37.13ID:9Fgdi1o80512デフォルトの名無しさん
2016/03/10(木) 17:56:01.09ID:n+nn3+TvVBAの独自仕様って何で、cとどう違うか教えてくれ
ショートサーキット見たいな過程の違いとか
ビットシフト見たいな論理演算じゃない奴の話ならいらんぞ
0513デフォルトの名無しさん
2016/03/10(木) 22:07:00.76ID:6K4R3xGyああ俺の言いたいのは論理演算を含むビット演算全般ね
でも論理演算が出てくる場面ってシフトローテートも込みだと思うけど気にならんのかなあ
独自仕様は自分でNull怖い(>>504)とか書いてるじゃん
そういうやつよ
0514デフォルトの名無しさん
2016/03/10(木) 22:25:10.11ID:6K4R3xGyVBAだけやるってほんとやばいんじゃないかこれ
0515デフォルトの名無しさん
2016/03/11(金) 03:12:24.51ID:hoUEJahGビット操作に論理演算を含むのは確かだけど
少なくとも論理演算にシフトやローテートを含むのは話がおかしい
そもそもVBAに論理演算はあってもビットシフトする命令とか無いしな
Nullの話は、２値論理ではなく３値論理だって話で、独自でも何でもないわけだが
まあ、SQL以外で３値論理な言語ってあんまり見ないけど
>>514
VBAしかやらないなら、仕様を正しく理解してさえいれば、その仕様が独自だろうがなんだろうがどうでもいいだろ
VBAでは他の言語での経験から想像した動作しなかったり、VBAの経験が他の言語で通用しないのは困るかもしれんが
0516デフォルトの名無しさん
2016/03/11(金) 06:38:14.90ID:5X9ZM+KD意味わからん
0517デフォルトの名無しさん
2016/03/11(金) 07:48:35.96ID:xzuNkEdQほかにも使える処理系はいくつかあって構造は完全に同じだから、いろいろな型のデータを相互にやりとりできる
0518デフォルトの名無しさん
2016/03/12(土) 02:24:37.78ID:4xL8NTYB今はシフトローテートと言うのか。
俺らの時代はローテートシフトと言ってたな。
あんなキャリーフラグ絡みの命令、
アセンブラにしかないと思ってたが
今調べてみたらC++にもあるんだな。
びっくりしたわ。
0519デフォルトの名無しさん
2016/03/12(土) 03:42:54.08ID:L1DCwZtHキャリーってか、符号ビットの取り扱いとかね
VBAにビットシフトが無いのはつまり
メモリレイアウトを意識しない（させない）言語で考えるような事じゃないって話だろ
Cはアセンブラ替わりに使う想定の言語だからなぁ
C++はCの上位互換目指してるんじゃないの？よくわからんが
0520デフォルトの名無しさん
2016/03/12(土) 10:16:25.43ID:ZuDRYyOfCがOSとその周辺の構築を主眼にしていたのに対してC++はOSが存在することを前提にしているのが違いかな
0521デフォルトの名無しさん
2016/03/12(土) 13:14:04.33ID:2d1xhU2z> 今調べてみたらC++にもあるんだな。
はあ？
キャリーを扱える高級言語って TL/1 しか見たことないが
0522デフォルトの名無しさん
2016/03/12(土) 13:21:18.17ID:4xL8NTYBはぁ？
じゃなくて、ローテートシフトの話。
誰がキャリーフラグ直接扱えると言ったよ。
よく読め。
0523デフォルトの名無しさん
2016/03/12(土) 13:42:30.89ID:2d1xhU2z> あんなキャリーフラグ絡みの命令、
> アセンブラにしかないと思ってたが
> 今調べてみたらC++にもあるんだな。
で、C++ に何があるって？
0524デフォルトの名無しさん
2016/03/12(土) 13:50:16.58ID:4xL8NTYB文盲かw
ローテートシフトって何べん言えば分かるんだ？
ひょっとして日本人じゃないのか？
0525デフォルトの名無しさん
2016/03/12(土) 14:12:27.70ID:2d1xhU2zで、調べたら C++ にあったんだろ？ w
それ書いてくれよ
0526デフォルトの名無しさん
2016/03/12(土) 14:30:59.02ID:4xL8NTYBhttps://msdn.microsoft.com/ja-jp/library/a0w705h5(VS.80).aspx
0527デフォルトの名無しさん
2016/03/12(土) 16:24:58.95ID:Xp/JGjcGベンダー固有のライブラリー w
そりゃなんでもありありだわな
0528デフォルトの名無しさん
2016/03/12(土) 17:14:49.50ID:YrRAz0CDまあCだけでもローテートはこんな感じで書けるし
i = (i << 1) | ((i & (1<<31)) != 0); // ROL
i = ((unsigned)i >> 1) | ((i<<31) & (1<<31)); // ROR
0529デフォルトの名無しさん
2016/03/12(土) 17:29:54.28ID:YrRAz0CDi = (i << 1) | (((unsigned)i>>31)&1); // ROL
0530デフォルトの名無しさん
2016/03/12(土) 18:12:02.13ID:2d1xhU2z0531デフォルトの名無しさん
2016/03/12(土) 18:31:38.66ID:YrRAz0CDじゃあついでに上をそのまま使うんじゃあんまりだしマクロで隠蔽して
おまけにシフト量も右辺で指定できるようにしとくか
#define ROL(i, m) (i << m) | (((unsigned)i>>(32-m))&((1<<m)-1))
#define ROR(i, m) ((unsigned)i >> m) | ((i<<(32-m))&(((1<<m)-1)<<(32-m)))
あとはアーキテクチャ毎にこっそり淫乱仕込めばもうこれ区別付かないわ
これがC/C++作法だよ
VBAとはできる事の次元が違うのが少しは判ってもらえるかなあ
0532デフォルトの名無しさん
2016/03/12(土) 18:35:23.36ID:oKco5pfl0533デフォルトの名無しさん
2016/03/12(土) 18:38:20.17ID:YrRAz0CDぜひ書いてみてね
0534デフォルトの名無しさん
2016/03/12(土) 18:43:04.68ID:2d1xhU2z一体 ID:YrRAz0CD は何を調べたんだろう...
バカにしか見えない
0535デフォルトの名無しさん
2016/03/12(土) 18:44:03.28ID:2d1xhU2z0536デフォルトの名無しさん
2016/03/12(土) 18:46:18.96ID:YrRAz0CDそいつとは別人だよ
IDなんか気にしちゃダメよ？
0537デフォルトの名無しさん
2016/03/12(土) 19:52:14.26ID:yPhuk7hZ0538デフォルトの名無しさん
2016/03/12(土) 20:04:13.36ID:L1DCwZtHイミディエイトはすぐにとか即時とかいうニュアンスだが
単語だけ出して訳を聞いてもあまり意味がありません
どういう文脈や使われ方したかで、使うべき訳は変わるから
0539デフォルトの名無しさん
2016/03/12(土) 20:23:00.79ID:L1DCwZtHキャリーを扱うとか言っちゃうと、オーバーフローエラーのハンドリングはキャリーを扱ってると言えるわけで
まあ、キャリーした値の情報は捨てられてるけどｗ
>>522
キャリー=キャリーフラグの話ではないと言うのはその通りなんだが
そもそもお前がキャリーフラグうんぬんって言い出した話
ビット演算でキャリーしたビットの扱いと、キャリーフラグの扱いと、ちゃんと区別しろや
CPUがローテートにキャリーフラグ使うとしてもそれはコンパイル後のアセンブラでの話
0540デフォルトの名無しさん
2016/03/12(土) 20:28:45.91ID:2d1xhU2z0541デフォルトの名無しさん
2016/03/13(日) 00:06:53.99ID:1q/Jd+xj0542デフォルトの名無しさん
2016/03/13(日) 06:54:59.87ID:lSMOH+xf0543デフォルトの名無しさん
2016/03/13(日) 11:08:11.87ID:0Q357Me9でも僕たちは理解できないから来なくていいよ
0544デフォルトの名無しさん
2016/03/13(日) 18:23:28.87ID:ufPFt9Kdたかがローテートだと思ってやってみたけど途中で諦めた
書けない事はないんだろうが、VBAだとかなり面倒なのは判った
0545デフォルトの名無しさん
2016/03/13(日) 18:43:32.64ID:Wv1UMaca0546デフォルトの名無しさん
2016/03/13(日) 20:45:45.82ID:E6ThwxxZ0547デフォルトの名無しさん
2016/03/13(日) 21:17:49.68ID:59SmyVWrスルースキルを身につける
0548デフォルトの名無しさん
2016/03/13(日) 22:19:19.26ID:5uscjK7Fよき師に巡り会う 巡り会えるまでは流浪に流浪を重ねる 放浪することで見る目は鍛えられる
考える力も養える よき師かくだらない師かどうでもいい師かを見極められるようになる
トライ＆エラー スクラップ＆ビルド 椅子に腰掛けてお利口さんで待ってても向こうからは決して来てはくれない
0549デフォルトの名無しさん
2016/03/14(月) 00:31:53.69ID:vT6mz4Mt数値のままだと符号ビットが邪魔するんだよな
文字列に変換すれば簡単なんだけど、数学的に解決できないと負けた気がする
0550デフォルトの名無しさん
2016/03/14(月) 05:40:06.04ID:813TYYJmビット演算とかVBAでやるような処理じゃない
Dec2Binとかいう便利なワークシート関数あるなと思ったけど
10ビットって何その中途半端な桁数ｗ
Hex2Binは40ビット符号だが指定できる数値は1FFまでとかもう何考えて作ってるんだよこれ
Dec2Hexで16進にしてバイトかニブル単位に切ってHex2Bin...
VBAなしでもできる気がしてきたなｗ
0551デフォルトの名無しさん
2016/03/14(月) 05:51:57.54ID:vvpf8bCNプログラムはどこで見れますか?
0552デフォルトの名無しさん
2016/03/14(月) 05:53:21.76ID:vvpf8bCNみなさんはどこ移転してますか?
0553デフォルトの名無しさん
2016/03/14(月) 05:54:57.02ID:huhKpIQ6>>551
Alt+F11
0554デフォルトの名無しさん
2016/03/14(月) 08:23:20.24ID:DzDVqAybCにも同じ命令が無いってことは元々需要が低いんだろう
0555デフォルトの名無しさん
2016/03/14(月) 10:32:55.61ID:813TYYJm算術シフトか論理シフトかはしらんが
Cは低レベルな処理ができるように設計された言語だから
VBAのような高級言語と用途や重要を一緒にはできんだろ
0556デフォルトの名無しさん
2016/03/14(月) 11:19:20.46ID:vT6mz4Mt算術シフトやローテートもできない
みんなライブラリで対応
VBAでシフトやローテートするライブラリ、軽くぐぐってみたけど意外と見つからないもんだな
0557デフォルトの名無しさん
2016/03/14(月) 20:14:39.14ID:iw5fwB6n> VBAでシフト
符号考慮しなくていい範囲なら * 2 とか \ 2 でいい
> ローテート
需要がない
0558デフォルトの名無しさん
2016/04/03(日) 10:00:14.45ID:qNxnHYw6共有ドライブにソースコードを置くだけで、アナウンスすれば誰でもコミットできる自由な運用になってます。
ただ新規ファイルがあると管理者がコメントするみたいな文化があって、今はやれオブジェクト指向設計がどうだの
アクセス指定が甘いだの言ってます。
自分は細かいこと言うつもりないんだけど、「VBAだったらこのくらいで十分」みたいな理論武装をしておきたいです。
そのネタになるような情報どこかにありませんか？
0559デフォルトの名無しさん
2016/04/03(日) 10:08:02.19ID:1rNeZKaA日本語で頼む
0560デフォルトの名無しさん
2016/04/03(日) 10:13:35.08ID:jNg4z56fとりあえずMS社が「VBAマクロは個人使用の範囲でしか許可してねぇぞ」って言っているので、
そもそもパブリッシング自体がおかしいという点から構築してみてはどうか。
0561デフォルトの名無しさん
2016/04/03(日) 10:21:42.32ID:0ShRbLeIShell ("C:\Windows\System32\rundll32.exe powrprof.dll,SetSuspendState")
最後にこの一文をいれました。朝起きたらシャットダウンされていて電源を入れたら
windowsエラー回復処理の画面が出ました。正しく終了できなかったようです。
一度テストで使ってみたときは問題なくスリープ状態になりました。
考えられる原因を教えてください。使っているのは2003です。
0562デフォルトの名無しさん
2016/04/03(日) 10:50:03.47ID:qNxnHYw6？
>>560
パブリッシングってオープンソース公開とかのことでしょうか？
それなりにあるようだけど、厳密にはNGなんですかね？
社内の共有ライブラリ使用はそれに当たらないと思います。
0563デフォルトの名無しさん
2016/04/03(日) 11:33:56.24ID:NYnYDVIp再現性はあるの？
0564デフォルトの名無しさん
2016/04/03(日) 12:02:51.71ID:azZmmaKg0565デフォルトの名無しさん
2016/04/03(日) 13:58:56.46ID:QeeH4oPEちょっと気になるのが
SetSuspendStateって引数が3つあるんだけどそれ指定してないとどうなるんだろうか?って事かな
(影響あるか 無いかは 知らないんけども)
rundll32.exe使わないで 直接API 呼んでみるとか?
0566デフォルトの名無しさん
2016/04/03(日) 14:09:55.83ID:7GEw8bGoまずはイベントログぐらい見ろよ
0567デフォルトの名無しさん
2016/04/03(日) 14:45:21.61ID:0ShRbLeI再現性あるかないかわかりませんが、またへんな終了するのはちょっと・・・
>>561
調べたらrundll32.exeは使わないほうがいいみたいなこと言ってる記事があったので
他の方法でやったほうがいいかもしれませんね
0568デフォルトの名無しさん
2016/04/03(日) 16:20:41.86ID:0WIWLEdK0570デフォルトの名無しさん
2016/04/03(日) 16:33:07.62ID:NYnYDVIphttps://ja.m.wikipedia.org/wiki/エラトステネスの篩
0571デフォルトの名無しさん
2016/04/03(日) 16:51:01.23ID:0WIWLEdKDim i As Long
Dim j As Long
Dim m As Long
Dim p As Long
Dim flg As Boolean
i = 1
j = 1
p = 2
Do
flg = False
For m = 2 To Int(Sqr(p))
If p Mod m = 0 Then
flg = True
Exit For
End If
Next
If flg = False Then
Cells(i, j) = p
i = i + 1
If i > Rows.Count Then
i = 1
j = j + 1
End If
End If
p = p + 1
Loop
End Sub
なんだあるじゃないか
0572デフォルトの名無しさん
2016/04/03(日) 16:51:38.48ID:CCNxKegs>MS社が「VBAマクロは個人使用の範囲でしか許可してねぇぞ」って言っている
ソース教えてくれ
0573デフォルトの名無しさん
2016/04/03(日) 16:55:26.57ID:7aucCkXx31 37 41 43 47 53 59 61 67 71
73 79 83 89 97 101 103 107 109 113
127 131 137 139 149 151 157 163 167 173
179 181 191 193 197 199 211 223 227 229
233 239 241 251 257 263 269 271 277 281
283 293 307 311 313 317 331 337 347 349
353 359 367 373 379 383 389 397 401 409
419 421 431 433 439 443 449 457 461 463
467 479 487 491 499 503 509 521 523 541
0574デフォルトの名無しさん
2016/04/03(日) 16:58:31.62ID:cnsiNkL/37558837 38702747 39844621 40992893 42145489 43297907 44451137 45602383 46759487
37558849 38702749 39844627 40992911 42145507 43297909 44451151 45602387 46759507
37558861 38702759 39844633 40992947 42145513 43297949 44451161 45602429 46759511
37558867 38702779 39844643 40992949 42145541 43297973 44451193 45602477 46759519
37558883 38702789 39844667 40993063 42145549 43298023 44451221 45602497 46759523
37558889 38702801 39844723 40993081 42145561 43298027 44451269 45602507 46759541
37558897 38702803 39844733 40993087 42145573 43298051 44451289 45602533 46759549
37558903 38702809 39844747 40993093 42145577 43298053 44451299 45602561 46759553
37558907 38702827 39844757 40993109 42145619 43298063 44451307 45602567 46759567
37558919 38702831 39844759 40993111 42145639 43298069 44451349 45602573 46759579
37558921 38702891 39844769 40993157 42145651 43298077 44451359 45602597 46759591
37558943 38702929 39844793 40993163 42145679 43298089 44451361 45602617 46759597
37558951 38702941 39844813 40993181 42145711 43298111 44451373 45602633 46759649
37558957 38702947 39844867 40993207 42145717 43298113 44451377 45602677 46759681
37558999 38702959 39844877 40993219 42145751 43298117 44451383 45602699 46759693
37559009 38702987 39844891 40993243 42145757 43298149 44451389 45602719 46759729
37559017 38703011 39844913 40993247 42145777 43298159 44451437 45602723 46759747
37559021 38703013 39844921 40993261 42145783 43298161 44451457 45602729 46759751
37559047 38703029 39844939 40993283 42145799 43298183 44451487 45602731 46759753
37559059 38703031 39844963 40993289 42145801 43298197 44451499 45602741 46759787
37559083 38703037 39844997 40993313 42145837 43298209 44451521 45602771 46759789
37559087 38703059 39844999 40993339 42145841 43298219 44451553 45602839 46759813
0575デフォルトの名無しさん
2016/04/03(日) 17:00:22.22ID:wlVdQdZF37558429 38702341 39844241 40992403 42145003 43297357 44450741 45601811 46758979
37558447 38702347 39844247 40992437 42145009 43297361 44450753 45601813 46758989
37558481 38702351 39844249 40992451 42145063 43297379 44450759 45601817 46759003
37558483 38702359 39844253 40992473 42145073 43297391 44450773 45601841 46759007
37558511 38702369 39844261 40992487 42145099 43297393 44450803 45601877 46759051
37558513 38702381 39844267 40992517 42145127 43297417 44450827 45601901 46759079
37558523 38702383 39844291 40992521 42145133 43297439 44450831 45601903 46759081
37558529 38702393 39844307 40992527 42145141 43297469 44450839 45601937 46759117
37558531 38702413 39844309 40992533 42145153 43297537 44450873 45601967 46759121
37558553 38702429 39844313 40992541 42145241 43297543 44450897 45601979 46759127
37558561 38702437 39844327 40992569 42145247 43297571 44450909 45601981 46759151
37558571 38702497 39844351 40992577 42145277 43297591 44450911 45601987 46759187
37558607 38702513 39844367 40992583 42145291 43297613 44450921 45601991 46759199
37558613 38702519 39844369 40992587 42145297 43297643 44450933 45601999 46759213
37558621 38702527 39844373 40992617 42145319 43297663 44450951 45602047 46759217
37558637 38702581 39844381 40992659 42145321 43297673 44450957 45602057 46759261
37558643 38702593 39844423 40992667 42145333 43297679 44450969 45602069 46759301
37558657 38702621 39844433 40992683 42145343 43297693 44450981 45602099 46759319
37558699 38702627 39844439 40992697 42145379 43297703 44450999 45602131 46759327
37558709 38702641 39844451 40992713 42145403 43297711 44451007 45602159 46759373
37558711 38702669 39844477 40992733 42145421 43297741 44451031 45602191 46759387
37558721 38702683 39844513 40992761 42145423 43297747 44451037 45602213 46759411
0576デフォルトの名無しさん
2016/04/03(日) 17:01:29.60ID:wlVdQdZF36415531 37557937 38701937 39843689 40992023 42144611 43296931 44450317 45601483 46758557
36415541 37557941 38701961 39843701 40992031 42144623 43296937 44450333 45601487 46758583
36415543 37557967 38701969 39843707 40992047 42144629 43296949 44450339 45601519 46758589
36415549 37557979 38702017 39843719 40992059 42144631 43296961 44450369 45601537 46758623
36415573 37558013 38702023 39843731 40992071 42144647 43296997 44450383 45601541 46758637
36415583 37558033 38702033 39843737 40992089 42144667 43297003 44450387 45601559 46758661
36415657 37558039 38702057 39843823 40992113 42144701 43297043 44450389 45601561 46758703
36415663 37558051 38702063 39843871 40992157 42144721 43297061 44450479 45601573 46758707
36415699 37558069 38702071 39843877 40992173 42144731 43297081 44450491 45601579 46758709
36415781 37558121 38702087 39843907 40992179 42144737 43297099 44450501 45601583 46758743
36415789 37558159 38702099 39843953 40992191 42144749 43297123 44450509 45601597 46758779
36415811 37558189 38702101 39843983 40992227 42144757 43297127 44450537 45601603 46758799
36415817 37558201 38702119 39843997 40992241 42144769 43297151 44450543 45601613 46758809
36415843 37558207 38702129 39844001 40992257 42144797 43297153 44450573 45601627 46758827
36415849 37558271 38702141 39844003 40992269 42144803 43297157 44450599 45601639 46758841
36415859 37558289 38702159 39844061 40992277 42144829 43297159 44450603 45601643 46758847
36415861 37558309 38702173 39844097 40992293 42144847 43297169 44450617 45601657 46758871
36415867 37558319 38702189 39844127 40992313 42144857 43297171 44450647 45601681 46758889
36415879 37558327 38702203 39844157 40992317 42144863 43297187 44450657 45601693 46758911
36415903 37558331 38702207 39844177 40992331 42144877 43297213 44450669 45601697 46758913
0577デフォルトの名無しさん
2016/04/03(日) 17:25:42.30ID:ht5JUiv7何で計算したの？
0578デフォルトの名無しさん
2016/04/03(日) 17:28:54.85ID:aDYdS24I0579デフォルトの名無しさん
2016/04/03(日) 18:34:34.79ID:CS1Ci7Ubエクセルは関数多少理解できるレベルです。
VBAで
所定の時間でPC起動
エクセルソフト起動
通信障害、PCエラーによるフリーズからの
再起動
所定の時間にPCシャットアウト
ここまでVBAで作成できるものなのでしょうか？
自分で作る場合はどんな本やサイトを参考にした方が
よいでしょうか？
VBA入門の本を買っても意味なかったです。
0580デフォルトの名無しさん
2016/04/03(日) 18:51:28.81ID:PF4kDmab君ならVBAでOSを作ることもキットできるよ。
0581デフォルトの名無しさん
2016/04/03(日) 19:03:46.02ID:yFGhuIVe0582デフォルトの名無しさん
2016/04/03(日) 19:05:28.17ID:SmJSd+/B0583デフォルトの名無しさん
2016/04/03(日) 19:09:30.45ID:JMP9uArP0584デフォルトの名無しさん
2016/04/03(日) 19:30:26.52ID:Xtf6UcRuInputBoxで答えを入れられるようにして
0585デフォルトの名無しさん
2016/04/03(日) 19:52:09.45ID:wTx+0/AQVB.NET for Applicationとか？
0586デフォルトの名無しさん
2016/04/03(日) 19:52:35.70ID:wTx+0/AQww
0587デフォルトの名無しさん
2016/04/03(日) 22:52:23.14ID:kgPLuv2V入れ子にすると実現できるというのはわかるのですが
1つのif で記述する事は可能でしょうか？
（例）
a
1 100
2 500
3 1000
if a1~3が上記の数値なら
処理実行！
end if
といった感じです。
■ このスレッドは過去ログ倉庫に格納されています