Excel VBA 質問スレ Part50 [無断転載禁止]©2ch.net

2017/08/27(日) 12:40:17.57

!extend:checked:vvvvv:1000:512

スレ立ての際は一行目に
!extend:checked:vvvvv:1000:512
と入れてスレ立てして下さい

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

※関連スレ
VBAなんでも質問スレ Part2
http://mevius.2ch.net/test/read.cgi/tech/1432173164/
Access VBA 質問スレ Part1
http://mevius.2ch.net/test/read.cgi/tech/1328536426/
Excel総合相談所 126
https://mevius.2ch.net/test/read.cgi/bsoft/1496487719/

※前スレ
Excel VBA 質問スレ Part49©2ch.net
http://mevius.2ch.net/test/read.cgi/tech/1498410914/

VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured

2017/10/07(土) 21:24:36.96

鮪うまいにゃー

2017/10/10(火) 03:19:47.77

とあるcsvファイル（測定器の出力でかなり細かい数値データ）があるのですが
この数値をExcelで一部変更して保存すると全体的に数値が勝手に丸まったりしてしまいます…
（変更していない数値も全て）
色々調べたのですがこのあたりは仕様？みたいなのですがなんとかならないものなのでしょうか

2017/10/10(火) 08:13:32.86

>>589
vbaと関係なくね？
仕様ならどうしようもないじゃん
csvの中身読んでExcelに書き込んでいけばなんとかなるかもしれんけどそういうこと？

2017/10/10(火) 08:32:44.79

>>589
お前のやり方が間違ってるだけ。
開くんじゃなくてインポートしろ。
そしてそもそもVBA関係無い。

2017/10/10(火) 11:08:33.85

>>589
Excelの表示（見え方）の話であって実データは変わったないのではないか？
Excelpで表示時の桁数を指定すれば正しい数値が表示されるんじゃないの

2017/10/10(火) 12:05:43.76

>>590-592
どうもありがとう、なんとか自己解決しました
ここで聞いたのは、一応一連の処理をVBAでやっていたので…

Excelでは仕様としてcsv保存するにしても細かい数値は勝手に丸めてしまうようでした
1.00001、1.00002…と並んでいる数字もExcel上から上書き保存するとただの1になってしまいます
これはインポートしても同じ事でした
結果として修正するときは数字として扱い、保存する前に全て文字列とすることで解決しました
しかしこれでも数字の丸めを止めさせられるだけで、各所それなりに変更されてしまいます
例えば、1.00000はどうやっても1になってしまいます
あるときには便利な仕様なのかもしれませんが、やっぱり余計と思える方が大きいですね…
どうもお邪魔しました

2017/10/10(火) 12:13:17.55

全然解ってなくて草

2017/10/10(火) 12:41:07.46

>>593
Excel 2013 の話だが

> 1.00001、1.00002…と並んでいる数字もExcel上から上書き保存するとただの1になってしまいます
再現しない

> 例えば、1.00000はどうやっても1になってしまいます
Excelで書式を設定して上書きすればいいだけ
当然csvには書式は格納されないので書式の設定は毎回必要

2017/10/10(火) 14:46:41.79

>>593
＜ｃｓｖをExcelで開き、1.00001 と表示されていた場合＞
　　　　　　　ｃｓｖ　　　Excelで開く　　ｃｓｖ保存
実データ： 1.00001 → 1.00001 → 1.00001　←丸められていない
見え方１： 1.00001 → 1.00001 → 1.00001
（Excel2007で開いたときはこのパターンで全桁表示され、丸められることはなかった）

＜ｃｓｖをExcelで開き、1 と表示されていた場合＞
　　　　　　　ｃｓｖ　　　Excelで開く　　ｃｓｖ保存
実データ： 1.00001 → 1.00001 → 1　←丸められた
見え方２： 1.00001 → 1　　　　 → 1
（Excel上では正確な値を保持していたが、ｃｓｖ保存時に丸められた）

Excelでｃｓｖ保存する場合、見えている通りにｃｓｖに書き出されるから
正しい桁数に書式設定（桁数指定）する必要がある
（Excelのbook形式で保存するなら、丸められることなく正確な値を保存できる）

2017/10/10(火) 15:46:51.35

>>595-596
どうもありがとう
CSVを普通にExcelで開いた時点での表示形式は指数になってます
この時点ではある意味見た目上も全桁数表示されてるのですが
csv保存するときに自動的に普通の数値に変換して更に丸めてしまうみたいです
よくわからないのは0.00001は丸められないけど1.000001は1に丸められます
Excelのバージョンは2016です

いずれにしろ表示形式を変えることで対処するしかなさそうですね
とりあえず文字列にしてしまえば全て保存できるようで何よりです
確かにxlms形式なら全て保存できるみたいなのですが
測定器がcsvで吐き出すことを前提に色々と組んでしまっているので…

2017/10/10(火) 16:00:05.93

>>597
excelをcsvで保存するんじゃなくてtextstreamとかでcsvに吐き出すようにすれば？
意味わからん挙動をするものに関してはそこを介さないのが一番のような気がするんだが

2017/10/10(火) 16:00:40.01

>>597
保存じゃなくてエクスポートを試してみた?
自分の記憶では保存は駄目でエクスポートなら上手くいくと思うんだが。

2017/10/10(火) 16:05:11.32

あれ?
何か勘違いしてたみたいだ。
>>599は忘れてくれ。

2017/10/10(火) 16:10:44.15

Outlookで指定したメールのtoアドレスとccアドレスをエクセルに書き込みたいのですが、itam.TOとCCにすると名前が書き込まれてしまいました。そこでTOをやめてitam.SenderEmailAddressにしたらアドレスが入ったのですがCCは見つけられませんでした。
分かる方、お言えてもらえませんか？

2017/10/10(火) 18:21:14.88

>>601
outlook.RecipientsクラスのpropertyAccessorから、getproperty使って取り出してるけど、今はソースを提示できない。
どっかの日本語サイトから見つけたんで、頑張って探して‥

2017/10/10(火) 19:18:52.42

会社で「顧客名簿のDBから吐き出したCSVをエクセルで編集して又システムに
戻したいんだけど遅いくて困ってる」と言われて「エクセルじゃなく専用エディタでやれよ」
と言ったら「勝手にフリーソフトをインストールできない」と言う。つまり、泣き付けばマクロで作ってくれると思ったんだろうな。

冗談じゃねえと思ったが興味本位でネット漁って作ってやったよ。礼の一言もなんも無しだが、何も言ってこないから普通に使えてるんかな。
CSVをエクセルに食わせるのはQueryTableが一番？速いみたいね。データ型も指定できるし。保存は保存するディレクトリにブックをコピーして
書き出すとまあまあ速かった。と言ってもせいぜい30000件程度（会社規模が知れるｗ）だからあんま参考にならないかもだが。

2017/10/10(火) 19:25:55.56

>>603
すっげえええええええええええええ！！！！！！！！！！！！！１１１

2017/10/10(火) 19:45:55.99

>>597
> CSVを普通にExcelで開いた時点での表示形式は指数になってます
なら初めからそう書いてくれ

> この時点ではある意味見た目上も全桁数表示されてるのですが
本当になってる？
Excel 2013 だから動作が違うのかも知れんが 1.23456789E+00 を読み込むと 1.23E+00 になる

> csv保存するときに自動的に普通の数値に変換して更に丸めてしまうみたいです
指数表示は全桁読み込んでるけど表示上の有効桁を３桁に決め打ちしているように見える
なのでそのまま保存すると３桁分に丸められてしまう

> よくわからないのは0.00001は丸められないけど1.000001は1に丸められます
それ指数表示でどうなってるかを見ればわかると思うが...
って言うか指数表示の意味わかってないのか？

2017/10/10(火) 19:55:17.15

>>602
ありがとう！がんばってみる。

2017/10/10(火) 19:55:39.26

>>602
ありがとう！がんばってみる。

2017/10/10(火) 20:17:36.56

>>604
え？どの辺が？

2017/10/10(火) 21:23:16.18

>>603
自分の担当の仕事やんないでマクロせこせこ組んでるのってどうなのかな

2017/10/11(水) 00:24:10.90

>>603
まさに神

2017/10/11(水) 00:33:25.96

>>603
ブックに保存のあとDB更新はどうするの？

2017/10/11(水) 18:37:53.22

>>603
勝手にフリーソフトインストールできないのに、勝手に作ったマクロいれていいのか？

2017/10/11(水) 18:41:22.40

>>612
逆に金もらえばフリーソフトじゃないから入れてもいいのかな

2017/10/11(水) 20:42:55.70

>>612
上から見たら単なるExcelファイルだから

2017/10/11(水) 21:35:40.57

単なるexcelファイルに見えるフリーソフトならいれてもいいのか

2017/10/11(水) 21:40:05.73

上に聞けばいい

2017/10/11(水) 21:45:50.25

>>612
業務で作ったソフトは会社のもの

2017/10/11(水) 21:53:34.37

>>615
お前が決める事じゃないし、合理的な回答とか求めてないし

2017/10/12(木) 03:28:06.76

企業だと、Excelは書類扱いやな
マクロも同じ（Excelを加工するExcelファイルという扱い）
「Excelマクロ禁止」って書いてない企業ならまぁ合法かもな（VBSはええんやで）

2017/10/12(木) 08:00:49.64

Excelマクロ禁止ならWordマクロを使えばいいのに

2017/10/12(木) 08:08:08.79

マクロダメな企業って何ゆえなんだろ

2017/10/12(木) 08:09:22.27

下手に素人が自動化してデータを触るとデータが消えるかもしれない！
きちんと目視で確認すること！

2017/10/12(木) 08:36:02.53

電卓で計算した結果を入力するのが正しい、と思い込んでる老害が幅を効かせてるんでしょ

2017/10/12(木) 11:01:32.26

いやいや、誰もマクロ禁止とは言ってないから

フリーソフトNGでもマクロ禁止と明言されてなければOKでは？と言っているだけかと
そして答えは>>617

2017/10/12(木) 12:22:01.01

マクロを使うのはずるいんだもん！

2017/10/12(木) 12:44:11.82

作るのはずるくない

2017/10/12(木) 12:56:55.18

フリーソフトを禁止している理由として
著作権とかライセンス関係の理由なのか
ウイルスとかセキュリティ関係の理由なのか
それ以外か
複合的な理由かによるんじゃね

会社で作ったのなら著作権は問題ないだろう
ウイルスは問題無いけどセキュリティホール的な問題がある場合もありうるかなぁ

2017/10/12(木) 15:03:41.75

ソースコードそのものは外部のものを導入しても構わない、という会社が大多数だろうから、オープンソースを探せばよい

2017/10/12(木) 15:46:25.11

うちのお客の社員用PCでは拡張子exeのファイルは起動できない
そしてインストール権限を認めてないのでインストーラーを起動できない
この辺が必要な場合は上司を介して情報システム部に許可をとる必要がある

まぁOfficeと社内用ツール以外は使うなよって感じ
ちなみにVBAには特に制限とかかかってない様子

2017/10/12(木) 17:41:48.83

CSVの行頭と,の後に'を挿入してから開いたらいいのでは？
文字列化して良ければの話だけど

2017/10/12(木) 18:04:04.30

>>628
オープンソースでもライセンスはいろいろ

オープンソースなら商用利用も可能とは言い切れない

2017/10/12(木) 18:23:12.96

C++で自作したフリーソフトなら入れていいのか？
エクセルマクロで実行ファイルを書き換えるのはありなのか？

2017/10/12(木) 18:38:31.99

はいはい、おやつは３００円までね
バナナはお弁当箱に入っていたらお昼ご飯だけど
別に持ってたらおやつとみなすわよ

2017/10/12(木) 19:09:55.75

>>632
会社で作ったのなら言語に依らずフリーソフトにはならないんじゃね？

自宅とかで作ったのなら従業員かどうか関係なく一般のソフトと同じ扱いだと思う

実行ファイルを書き換えた結果
会社に損害を与えたら懲戒処分とか損害賠償とかの可能性もあるんじゃね？
悪意の程度とかいろいろ関係しそう

2017/10/12(木) 19:29:54.79

>>634
マクロでデータ書き換えるのがありで実行ファイル書き換えるのが駄目？
ｃｓｖだって帳簿の金額なら損害与えることもできるよ

2017/10/12(木) 19:52:02.88

そういう時に必要な要件は、責任の所在を明確に出来るかどうか
マクロでトラブルが起きると、作ったやつが悪いか使ったやつが悪いか、みたいな面倒な話になって、ヘタすると業務が止まって
マクロで得られた時間の短縮という恩恵以上の損失が出る可能性があるというか、禁止してる所は過去に苦い経験が
あることがほとんど

例外を認めるのもこれまた面倒だから一律禁止にしてる所も多い
会社がある程度の規模になると、本当に小回りがきかなくなるんだよ
Windowsの壁紙の変更すら認められない、みたいな職場も見てきたから

2017/10/12(木) 20:37:36.71

>>635
実行ファイルを書き換えてはダメとは書いてないんだが
結果とか必要性とかいろいろ関係しそうと言う意味

別の手段で実現できることをわざわざその手段を使う必要があるかとか、結果の程度とか

会社に損害を与えたら懲戒処分になる可能性があるのはどんな業務でも同じ

2017/10/12(木) 21:03:23.99

ウィルスも簡単に作れるけどね。
昔、客に納めた文書が誤検出されたことがあって、問題になりかけた。

今ならあんなマクロは納めないな。

2017/10/12(木) 21:09:46.58

そもそも、VBA込みの仕事が殆どじゃないの?
フリーソフトは許可が必要だろうけどVBAについては最初から込みの話であって、駄目なら最初からそういう指示がある筈だ。

フリーソフトは駄目だからVBAで同じ機能を実現すれば良い。
どうしても必要だけどVBAで作るのが難しいなら上司を説得するか有料のソフト買って貰うしかない。

2017/10/12(木) 21:24:11.45

HTMLやjavascriptをメモ帳で組むのは辛いからテキストエディターぐらい入れさせてほしいわねえ
ブラクラならHTAで簡単に作れるんじゃね

2017/10/13(金) 01:03:16.23

VBAでテトリスとかロックマンが作れるなんで知らなかったわ
というか感動した。

それを実装するのに特別な環境が必要だと思ってたけど、VBAだけで実現できるところがすごい

2017/10/13(金) 08:26:56.51

exeを起動できないPCって何ができるの？

2017/10/13(金) 08:51:28.87

>>642
コピペ

2017/10/13(金) 09:01:14.80

最大限好意的に解釈すれば、exeを直接起動するのは禁止って意味ではあるまいか
Excelを起動したい時はxlsファイルをダブルクリックするしかない、みたいな

2017/10/13(金) 10:43:30.84

>>643
つまりネット上のサンプルプログラムのコピペはOK、と

**デフォルトの名無しさん** (ｽﾌｯ Sd33-AvbY) · 2017/10/13(金) 11:27:19.75

ガチガチの環境だとネットも許可されたURLしかアクセスできないんだよな

2017/10/13(金) 11:44:54.65

開発環境の話かな？
通常のオフィス環境で特定サイトのみOKてことないよね
NGなサイトがあるのはわかるけど。

2017/10/13(金) 12:13:04.97

本来は未認可のプログラム関連全面禁止のところVBAが抜け道的に使われているだけって場合が多いだろうから、
他のプログラムを使ってはならないのは何故かっていう疑問に合理的な回答は無いだろうなぁ。

2017/10/13(金) 12:26:29.21

>>648
オフィスが許可されてるならvbaも許可されてるんじゃないの？

未許可プログラム禁止の理由はライセンスとかセキュリティとかが主な理由だと思うけど
ほかに何かある？

2017/10/13(金) 12:48:20.61

俺の知ってる会社でネット完全遮断のとこあるよ
とあるジャンルで世界トップのメーカーだからセキュリティがめっちゃ厳しい
建物に入る前に所持品チェックがあるしスマホやケータイは持ち込み禁止

ネット上のデータや情報が欲しい時は専門の部署に内容やURLを連絡して結果を知らせてもらうシステム
すごく効率が悪いと思うけど、それぐらいしないと機密が守れないそうだ

2017/10/13(金) 12:49:48.49

>>649
VBAはオフィス製品を拡張するのが本来の役割だから、その範囲なら認可されていると言える。

表計算ソフトで（標準的に備わっていない）データベース処理させたり、データベースソフトで波形分析させたりといった、
そういう用途は厳密にはアウトなはずなんだけどVBA使う人間のほとんどがそういう本来用途から逸脱した使い方をするので、
この辺りの線引きが他のプログラムと曖昧になるから混乱するのではないだろうか。

2017/10/13(金) 12:57:07.42

>>651
VBAを使う人の殆どがって
何か調査結果とかあるの？

2017/10/13(金) 13:05:46.99

>>652
本来用途的な使い方をする場合はVBA利用する必要が無いくらいには機能が揃ってるっていうのと、
このスレで他のプログラムが使えない事に対する明確な回答が出ない辺りからの推測だけど。

だいたいこのスレでも「お前が詳しいのはVBAであってエクセルではない」という戒めの言葉がたまに出るくらいだし。

2017/10/13(金) 14:31:58.61

このスレでもIE操作とか何故にVBA？ってのがあるしね

2017/10/13(金) 15:27:59.93

本来用途?
随分おかしなこというんだな。
何をやろうがそれが本来用途だろ。

アウトかどうかなんて結局は責任の問題だ。
セル操作でさえ会社に損害を与えることができるし、嫌だったらVBAを使うの辞めろ。

フリーソフトが問題なのは責任を問えないからだ。
VBAで問題が起きた時に、作った奴や部署が責任を取ることになるのはどんなVBAでも同じこと。
だから良く知りもせずに結果だけをコピペする奴は迷惑なんだ。
仕組みを理解すれば何をやっててもセルの操作と同じだ。
部署として作った奴を信用するかしないかの問題。
或いは部署として危険なコードか安全なコードかと判断できるかどうか。

2017/10/13(金) 15:39:50.72

>>654
おれもVBAでIE操作してクロールとかやってるけど、
趣味程度にプログラムをやってるだけなのでプログラム環境がVBAだけなんだよね
あと、取ってきたデータをそのままExcelに入れ、フィルタやソートを使ってデータ編集できる点も便利だよ

2017/10/13(金) 16:39:03.02

>>655
そうだよそうだよその通りだよ
フリーソフトやオプソは利用者責任として割り切る（／割り切らせる）しかない

2017/10/13(金) 16:53:46.60

ExelVBAで、テキストファイルの書き出しをスレッドで行いたいですが、どうにかすれば
可能なものでしょうか？
Yes/Noだけでもいいので教えてください。

2017/10/13(金) 17:41:44.34

Yes

2017/10/13(金) 17:44:35.45

>>659
Vielen Dank!!

2017/10/13(金) 17:47:28.70

VBAにスレッドを扱う機能そのものはないけどな

**デフォルトの名無しさん** (JP 0Hd3-cm6R) · 2017/10/13(金) 18:25:28.31

mainThreadだと思えば腹もたたぬわ！

2017/10/13(金) 18:58:06.78

>>654
ブラウザ操作だとどの言語が適してるんかね

2017/10/13(金) 19:23:32.28

ブラウザからデータを取ってきた後の処理がエクセルだと簡単だからVBA使うんじゃね

またはその逆

2017/10/13(金) 19:27:32.12

なんてわざわざブラウザ操作を挟むのかねえ

2017/10/13(金) 20:04:09.22

>>665
動的コンテンツとかもあるからとかかな

2017/10/13(金) 20:05:44.35

ブラウザからデータ抜き出すには何が一番適してるん？

2017/10/13(金) 20:11:42.14

>>667
適してるってどんな基準で比較するのかによるんじゃね

どれもDOM操作するとかだろうから大して変わらない
自分の得意な言語でやればいいと思う

2017/10/13(金) 20:24:56.96

>>665
ネット上に落ちてるデータの集計とか？
テーブルで組んであるようなのならエクセルに落とすのも楽だし

2017/10/13(金) 20:50:35.51

>>665
htnmという概念を知らないのかもしれない

2017/10/14(土) 01:01:33.45

>>667
インターネットエクスプローラーってやつ

2017/10/14(土) 15:22:42.26

>>661
スレッドを扱うことはできる。
不安定ですぐ落ちるだけ。
セルを触った途端に落ちると記憶している。
気をつければそこそこ安定してできることもあると思ってる。
Msgboxのボタンを押すようなことなら落ちないと思うけどプロセスでも同じことはできるからメリットを感じない。

>>667
InternetExplorer.Applicationは遅いと思う。
MSXML2.XMLhttpとかhtmlfileの方が速い。
ただし情報取得以外にクリックするとか操作するならInternetExplorer.Applicationを使うことになるかな。
Seleniumとか外部のオブジェクトは使わないんだよね。

2017/10/14(土) 16:29:13.95

>>672
selenium使うならvbaは選択しないと思う

データ処理し易いからエクセル→VBA
クリックしたり操作しながら動的データを取るからブラウザ操作

python sqliteとか使う手もあるけど
実現したい事はどの手段でも実現できる

2017/10/14(土) 21:22:12.43

ちょっと教えてください。ワークブックに含まれているマクロを起動時に実行する時
ThisWorkbookのWorkbook_Open()
あるいは標準モジュールでもauto_open
のどちらでも出来るような気がするんですけど、全く同じと考えていい？それとも何か違いがあるの？

2017/10/14(土) 21:23:25.61

>>674
知らなかった
http://excel-ubara.com/excelvba4/EXCEL239.html

2017/10/14(土) 21:30:06.90

auto_open知らんかったわ

2017/10/14(土) 21:30:35.09

>>675
なるほど～。Workbook_Openに統一しておきます。
リンク先教えてくれてthxです

2017/10/15(日) 21:08:10.21

ユーザーフォームに線を書く場合ってラベルを弄くる他にないですか？折れ線を書きたいのですが。

2017/10/15(日) 21:40:02.13

図の挿入は？
グラフなら以下の方法もあるみたい
http://www.max.hi-ho.ne.jp/happy/YNxv9d92.html

APIとかで頑張れば折れ線ぐらいなら掛けるけど、めんどくさそう

2017/10/15(日) 21:42:05.94

測量系のサイトで測量した数値をExcelで図化するような
ものがあるはず　そんなキーワードでググってみ
ものすんごいことしてるから　CADかよ　みたいな

2017/10/15(日) 22:13:27.13

>>678
デバイスコンテキスト弄る経験有るならめんどくさいけど色々できる。
LineToとか。
Win32APIに慣れてない人にはお勧めはしない。

2017/10/15(日) 22:24:31.38

書く線はこの程度のようなもので、表示して数値変更出来て、数値の合計算出するだけなんだけど
https://i.imgur.com/NxhLNnG.jpg

2017/10/15(日) 22:33:23.70

>>682
折れ線は固定じゃないんだよね？

2017/10/15(日) 22:41:19.36

EXCEL方眼紙に罫線で良い気がする

2017/10/15(日) 22:44:27.97

>>684
同意、フォームは使わない方が良いと思う
「この程度」と言ってるけどかなりめんどくさい作業

2017/10/15(日) 23:01:22.46

>>683
折れ線は固定です。

2017/10/15(日) 23:29:49.75

>>686
固定なら画像はって上にラベルでええやん