Excel VBA 質問スレ Part56

**デフォルトの名無しさん** · 2018/08/23(木) 07:25:24.98

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

※前スレ
Excel VBA 質問スレ Part55
http://mevius.5ch.net/test/read.cgi/tech/1532236398/l50

**デフォルトの名無しさん** · 2018/09/03(月) 00:08:34.33

>>579
「散らかってるもの」じゃさっぱりわからんだろ
Function csvを整理して並べ直す(ファイル名 As String, n番目の要素 As Long, orderby As Boolean) As Variant
みたいな感じか？

**デフォルトの名無しさん** · 2018/09/03(月) 00:30:50.65

>>579
俺のところにあるとっちらかってるtxtファイルをソートするマクロを作ってくれれば
おまえのマクロつくってやるよ

っていわれてできるか？ｗ

>>572
ﾜｯﾁｮｲってそんな簡単にいれらるのか？
いれられるなら入れた方がいいだろうけど
スレ住民的にはない方がいいってやつの方が多そうだなｗ

**デフォルトの名無しさん** · 2018/09/03(月) 00:35:56.95

>>582
ただのぼやきなんだよ
お願いしたわけではなくって
lookupで頑張った結果大変なことになったからVBAで頑張ろうとしている次第
csv開くだけでも一苦労だよ

**デフォルトの名無しさん** · 2018/09/03(月) 06:32:56.73

csvの検索や管理はPowershellでやりなさい。Excelでやろうとするのがおかしい

**デフォルトの名無しさん** · 2018/09/03(月) 07:15:27.07

>>584
その程度のことはやったらやっただけのリターンは得られるからやればいいよ

**デフォルトの名無しさん** · 2018/09/03(月) 09:06:27.80

>>585
csvデータはエクセルで使うから、それつかう理由は特にないよ
プログラミングの仕事ではないし

**デフォルトの名無しさん** · 2018/09/03(月) 09:27:27.57

> csv開くだけでも一苦労
なのはVBAでやろうとしてるからなんやで…

**デフォルトの名無しさん** · 2018/09/03(月) 09:43:49.67

じゃあどうすればいいのさ？

**デフォルトの名無しさん** · 2018/09/03(月) 09:52:24.30

PowerShell, JScript, Python, Ruby…
単にファイル結合するだけならbatとかでもいい
wslでbashシェルコマンド使うのもアリだ

**デフォルトの名無しさん** · 2018/09/03(月) 09:58:17.85

Powershellに標準で用意されているcsv用コマンドレットの豊富さや
whereオブジェクトで簡単に値を検索-参照-変更できるメリットは代えがたい。
キー列を使っての結合も自在、いちいちテーブルに読み込む必要もない。

**デフォルトの名無しさん** · 2018/09/03(月) 10:14:51.34

何をやりたいのさ？

**デフォルトの名無しさん** · 2018/09/03(月) 10:15:05.31

結合したいの？

**デフォルトの名無しさん** · 2018/09/03(月) 10:15:30.91

目的もデータ量もわからん

**デフォルトの名無しさん** · 2018/09/03(月) 10:23:14.56

>>579
要件定義がきちんと書けない人には答えようがないの典型w

**デフォルトの名無しさん** · 2018/09/03(月) 10:25:31.11

答えてるじゃん

**デフォルトの名無しさん** · 2018/09/03(月) 10:25:55.31

パワーシェルや言うてるやんけ

**デフォルトの名無しさん** · 2018/09/03(月) 10:27:17.10

一句できました
要件もわからないけどパワーシェル

**デフォルトの名無しさん** · 2018/09/03(月) 10:28:39.28

一句できました
スレ違いそれがどうしたパワーシェル

**デフォルトの名無しさん** · 2018/09/03(月) 10:31:32.09

連投楽しそうだね

**デフォルトの名無しさん** · 2018/09/03(月) 10:34:50.52

>>600
パワーシェルを詠うんだよ

**デフォルトの名無しさん** · 2018/09/03(月) 10:38:30.67

パワーシェル処理が激遅のパワーシェル

**デフォルトの名無しさん** · 2018/09/03(月) 11:00:43.63

パワーシェル良いよね

**デフォルトの名無しさん** · 2018/09/03(月) 11:40:10.45

>>588
あ、いや、それは私がよくわかってなかったからで、開くコード自体は簡単極まりなかった

**デフォルトの名無しさん** · 2018/09/03(月) 12:20:35.49

うちじゃPowershellが使えないのが残念なところだ。
まだVIsualStudio(Express)のインストール申請の方が通りやすい

**デフォルトの名無しさん** · 2018/09/03(月) 12:33:12.21

パワーシェル好き
いちいちFileSystemObjectのインスタンスを作って再帰処理とかしなくてもフォルダ関連の処理は組み込みのコマンドレットで大抵何でも出来るし、概してVBAで処理するより高速で軽い
参照カウンタ方式でメモリ管理をしてるVBAで巨大フォルダの処理をやるとうっかりスタックオーバーフローさせちゃうリスクが高いし

**デフォルトの名無しさん** · 2018/09/03(月) 13:01:35.09

PowerShell大嫌い
C#のつもりで書くとドツボにはまる
.NETのコレクション使うような込み入った処理に使うには最悪

**デフォルトの名無しさん** · 2018/09/03(月) 14:12:36.64

>>606
スタックオーバーフロー？
フォルダ階層に対する再帰処理で？
マジか. ..

**デフォルトの名無しさん** · 2018/09/03(月) 18:52:48.79

PowerShell自体は悪くない。
けど、使ってる奴が根本的に能力が低い。
それとも、ここに来てるPowerShellユ―ザーがかな。

処理を作れるかどうかというレベルじゃ無くて要件に合ってるかどうかというレベルで能力が低い。

**デフォルトの名無しさん** · 2018/09/03(月) 18:54:07.67

>>606
?
そんなこと1度も無いが?

**デフォルトの名無しさん** · 2018/09/03(月) 18:55:18.64

パワーシェル自体絶望的にセンスが悪いからバカがあんだけ食いつくんやでw

**デフォルトの名無しさん** · 2018/09/03(月) 19:08:57.81

やっぱりRubyがナンバーワン

**デフォルトの名無しさん** · 2018/09/03(月) 19:14:51.58

RubyもPowerShellも同レベル。
要件を分かってない。

**デフォルトの名無しさん** · 2018/09/03(月) 19:15:48.40

常に、シェルスクリプト・バッチ・VBA のスレでは、

PowerShell, Ruby を使えっていう結論になるw

**デフォルトの名無しさん** · 2018/09/03(月) 19:26:39.86

ならねえな。
VBAとバッチ処理は対極にあるといっていい。

**デフォルトの名無しさん** · 2018/09/03(月) 19:35:16.04

>>579みたいなふわっとした要件を勝手に有利なように解釈しないとマウント取れない言語
それがVBA

**デフォルトの名無しさん** · 2018/09/03(月) 19:39:35.25

>>616
そもそも何からマウント奪いたいんやおまえは？w

**デフォルトの名無しさん** · 2018/09/03(月) 19:49:57.51

>>579 から要件を把握できるエスパーは凄いね、心から尊敬するよ

**デフォルトの名無しさん** · 2018/09/03(月) 19:57:29.57

>>614
じゃあさパワーシェルやルビーは専用スレに行ってもらうことにしようか

**デフォルトの名無しさん** · 2018/09/03(月) 20:00:12.28

エスパーばかりで草

**デフォルトの名無しさん** · 2018/09/03(月) 20:00:29.82

>>619
パワーシェルやルビーはどこにも行けんやろw行くならおまえやw
天然なん？w

**デフォルトの名無しさん** · 2018/09/03(月) 20:02:40.83

>>621
パワーシェルのスレに行けば良いじゃん
行くとこなければ死ねばいいと思うし

**デフォルトの名無しさん** · 2018/09/03(月) 20:03:02.47

そうだパワーシェル死ねば良くない？

**デフォルトの名無しさん** · 2018/09/03(月) 20:10:33.85

パワーシェルに親を殺された奴いて草生える
何がそんなに気に入らんのや

**デフォルトの名無しさん** · 2018/09/03(月) 20:13:30.99

モスバーガーでマクドナルドハンバーガー美味しいと言ってる人居たらマクドナルドハンバーガーに行ってマクドナルドハンバーガーを美味しく召し上がれよと思うじゃんそんなにマクドナルドハンバーガーが好きならさ

**デフォルトの名無しさん** · 2018/09/03(月) 20:23:44.18

何かの事情があってモスに来てる奴が本当はマックの方がいいのに、、、とかぼやくくらいのシチュエーションなんて普通にあり得るんだよなぁw

**デフォルトの名無しさん** · 2018/09/03(月) 20:32:46.67

本当はマクドナルドハンバーガーに行きたいのか？どうしてマクドナルドハンバーガーに行かないよね？

**デフォルトの名無しさん** · 2018/09/03(月) 20:33:39.78

ﾊﾟﾜｰ系池沼には近寄りたくない

**デフォルトの名無しさん** · 2018/09/03(月) 20:52:04.26

大概ひきこもりやから遭遇する心配はいらんけどなw

**デフォルトの名無しさん** · 2018/09/03(月) 20:54:46.57

>>629
ははーんさてはおめーガチガイジやな

**デフォルトの名無しさん** · 2018/09/03(月) 21:02:29.71

わざと頭悪そうな書き込みしてる？w

**デフォルトの名無しさん** · 2018/09/03(月) 21:12:34.90

テキストファイル(XMLファイルやJSONファイル)を1つのブックに詰め込んで出荷したいのですがどうすればいいですか?
データ用のシート・セルを用意してText属性に書き込む方式は自分でも考えましたが「それテキストファイルじゃなくてシートじゃん？」ってなるのでNGです
C#やVB.NETでいうところの埋め込みリソースが理想形です

**デフォルトの名無しさん** · 2018/09/03(月) 21:19:34.10

ファイルは無理だがコードでいいなららテキストボックスに書けばよかろうよ

**デフォルトの名無しさん** · 2018/09/03(月) 21:22:30.37

>>630
なんでいきなりガイジ扱いやねんw失礼やわーコイツwwww

**デフォルトの名無しさん** · 2018/09/03(月) 21:28:07.74

>>626
ここにきてる奴らはぼやくレベルじゃないぞ。
持ち込んで食べて、ゴミそのままで帰るレベル。

**デフォルトの名無しさん** · 2018/09/04(火) 00:04:56.04

>>633
もっとマシな方法はありませんか？

**デフォルトの名無しさん** · 2018/09/04(火) 00:08:24.86

ヒント：インポート

**デフォルトの名無しさん** · 2018/09/04(火) 01:44:13.91

>>632
エクセルは表計算ソフトだよ
データはシートに入れなさい

**デフォルトの名無しさん** · 2018/09/04(火) 02:05:52.33

>>632
出荷とか養豚場でもやってんのか

**デフォルトの名無しさん** · 2018/09/04(火) 06:54:40.55

開いた状態の読み取り専用のエクセルをVBAで解除ってできますか？

**デフォルトの名無しさん** · 2018/09/04(火) 08:40:32.27

>>637
シートにデータを置いた状態でセーブするんじゃダメそうだけどシートを使わずにできるの？

**デフォルトの名無しさん** · 2018/09/04(火) 09:25:36.35

>>616
ビックリ。
>>579のような要件じゃアドバイスなんてできんだろと思ってたら勝手にPowerShellでアドバイスしといて、条件でてきたらその言い草かよ。

PowerShellが良いと言いたいだけで、要件なんて何も考えてなかっただけだろ。

**デフォルトの名無しさん** · 2018/09/04(火) 11:12:24.59

Powershellってどこかにプロモーション部でもあるの？

**デフォルトの名無しさん** · 2018/09/04(火) 11:18:09.61

仕事だと担当即外されるレベルだろうけどここは自由な場所だからね

**デフォルトの名無しさん** · 2018/09/04(火) 11:31:41.08

>>632
そんなフザケた要件、zipファイルに同梱で諦めろよ
バカバカしい

**デフォルトの名無しさん** · 2018/09/04(火) 12:41:59.08

VBAでは変なハックしないとリソースファイルを簡単には纏められないんですか
残念です

**デフォルトの名無しさん** · 2018/09/04(火) 17:28:35.50

pdfから特定のデータだけ欲しいんだけど基本機能じゃ出来ない？
acrobat?買え言われた
とりあえず全選択貼り付けで正規表現で必要な値取るようにしたけどもっと手軽な方法あったら教えて

**デフォルトの名無しさん** · 2018/09/04(火) 17:36:19.80

デコードしてファイル読み込んで情報を探すだけでは？

**デフォルトの名無しさん** · 2018/09/04(火) 19:01:02.67

PDFのファイルフォーマットみて自分でなんとかできるならVBAの基本機能でできるかもしれんが

手軽な方法はそれ用のライブラリ探すことからだな

**デフォルトの名無しさん** · 2018/09/04(火) 19:06:17.28

あまりに冗長なCOBOLコード（負の遺産）に嫌気がさし、ソース解析マクロの作成を決意。

作りたいものがあるとモチベ上がるよね

**デフォルトの名無しさん** · 2018/09/04(火) 19:11:22.13

コボルで書けや

**デフォルトの名無しさん** · 2018/09/04(火) 19:17:05.03

そのマクロも負の遺産になる

**デフォルトの名無しさん** · 2018/09/04(火) 19:38:58.88

それなぜVBA？

**デフォルトの名無しさん** · 2018/09/04(火) 19:44:23.68

ソース解析ツールなんてそれこそ金出してでもコーディングの手間を惜しむべきコモディティじゃん
VBAでやる必要あるのか？

**デフォルトの名無しさん** · 2018/09/04(火) 20:01:06.73

ホストにある資源を自分のローカルに持ってくにはテキストファイル化せなあかんのや。
メソッド同士をハイパーリンクで紐づけたり、使ってるサブルーチンを表にしたり。なんやかんやでVBA様便利やでー

**デフォルトの名無しさん** · 2018/09/04(火) 20:04:26.22

>>655
それってVBAとなんか関係あんの？

**デフォルトの名無しさん** · 2018/09/04(火) 20:04:52.77

幸い、COBOLはクラスとかアクセス修飾子って概念がないので他言語に比べたら解析ツールは楽に作れそう…って見立てや

**デフォルトの名無しさん** · 2018/09/04(火) 20:10:57.08

>>655
ホストにある資源って言ったら普通データのことだろう。
COBOLプログラムが資源なのか？？

**デフォルトの名無しさん** · 2018/09/04(火) 20:12:10.66

>>656
VBAを選んだ理由を示しただけや。
やっぱりエクセルの機能を生かせるのがVBAの強みよ

**デフォルトの名無しさん** · 2018/09/04(火) 20:12:57.29

VBAでCOBOLの構文解析とかそんな苦行に苦行を重ねなくてもまともなツールぐらい腐る程あるだろ…
と思って検索したらIBMのプログラムの次にVBAのツールが出てきて変な声出た

**デフォルトの名無しさん** · 2018/09/04(火) 20:14:11.68

タンスの奥を探してたらゴキブリの死骸を見つけた気分だ…

**デフォルトの名無しさん** · 2018/09/04(火) 20:14:17.39

>>659
理由になってなくない？

**デフォルトの名無しさん** · 2018/09/04(火) 20:16:25.24

>>659
認識の違いかな。すまん
俺はソースコードもホストの資源だと思ってるよ
データもソースも結局はデータセットに入っているわけだし

**デフォルトの名無しさん** · 2018/09/04(火) 20:17:48.78

安価ミスごめん。658に返答してる

**デフォルトの名無しさん** · 2018/09/04(火) 20:18:56.94

つーかCOBOLに限らず古い言語って解析機の設定難しいよ
古いものは文法が洗練されてないので当然っちゃ当然だけど

**デフォルトの名無しさん** · 2018/09/04(火) 20:23:31.43

なんや急にこの賑いwプロさんてみんなコボラーくずれなんかw

**デフォルトの名無しさん** · 2018/09/04(火) 20:23:44.65

>>660
そもそも、レガシーなモノを解析するツールを、わざわざ新しい言語で開発するなんてあまりないんだろうな…

**デフォルトの名無しさん** · 2018/09/04(火) 20:26:20.57

>>665
そうね。大昔のソースは見ていて頭痛がするわ
谷のように深いネストやGO TOの嵐…
だからこそ何かツールを作ってみたくなった

**デフォルトの名無しさん** · 2018/09/04(火) 21:00:05.70

>>663
COBOLソース解析してどう再利用するのさ？
そこがわからん

**デフォルトの名無しさん** · 2018/09/04(火) 21:02:18.90

流れ関係ないけどVBAってやっぱりネット上に良質の情報が少ないんだよ。
今のqiitaとかなんだありゃ。いったい誰に語りかけてるんだかわからん記事が多すぎだ。

**デフォルトの名無しさん** · 2018/09/04(火) 21:17:41.07

良質な情報は良質なプログラマから発信される
アマチュア主体のVBAじゃ限度がある

**デフォルトの名無しさん** · 2018/09/04(火) 21:24:54.44

でもプロが作ったシステムより社内で作ったものの方が完成度高いんだよね

**デフォルトの名無しさん** · 2018/09/04(火) 21:29:32.62

わざわざVBAのノウハウをqiitaに投稿してくれる熟練者がいないのかもな。
VBAはあくまで仕事のためのちょっとしたツール作成のための手段というイメージ。
いわゆるガチな人の大半は、もっと違う言語に目を向けているのだろうな

**デフォルトの名無しさん** · 2018/09/04(火) 21:31:59.83

かなり以前にシステム移行で既存のCOBOLソースのチェック用にVBAでソース解析のツールを利用したことはある。
解析とは言ってもホストのコンパイル済みソースをPCに落としてその後どうしたか…もう昔のことで覚えていないw

**デフォルトの名無しさん** · 2018/09/04(火) 22:45:37.57

棒グラフの作り方で質問です。
バーの色を、データ元のcellや文字色に対応させて一括変更することは出来ますか？

**デフォルトの名無しさん** · 2018/09/04(火) 23:36:54.27

>>675
できます

**デフォルトの名無しさん** · 2018/09/04(火) 23:41:04.59

>>675
できません
>>676は貴方を騙そうとしています
彼には十分気をつけてください

**デフォルトの名無しさん** · 2018/09/04(火) 23:51:20.39

真実は自分の眼で確かめるんだ

**デフォルトの名無しさん** · 2018/09/05(水) 00:05:21.43

>>675
VBAなら簡単に色の変更ができる
https://i.imgur.com/VP1W4uD.jpg

**デフォルトの名無しさん** · 2018/09/05(水) 00:06:51.88

行の値を順番に見て見入って
別のシートのB列に存在していればA列に●ってのを入れたいのですが

For i = 1 To Range("B2").End(xlDown).Row
If WorksheetFunction.CountIf(Worksheets(Sheet1).Range("B1:B1000"), Range("B" & i).Value) = 0 Then
Range("A" & i) = "●"
End If
Next

5000行でもかなり時間がかかります。もっと時間がかからないやり方があれば教えて下さい

**デフォルトの名無しさん** · 2018/09/05(水) 00:08:23.39

>>679のプログラム
Sub Macro1()
　　ActiveSheet.ChartObjects("グラフ 1").Activate
　　With ActiveChart
　　For k = 1 To 2
　　　　With .FullSeriesCollection(k)
　　　　For p = 1 To 10
　　　　　　.Points(p).Format.Fill.ForeColor.RGB = Cells(p + 1, k).Interior.Color
　　　　Next
　　　　End With
　　Next
　　End With
End Sub

**デフォルトの名無しさん** · 2018/09/05(水) 01:00:37.13

>>680
作業列作るなりしてワークシート関数でやった方が早いよこんなことは
あと、この条件だとSheet1に値が存在しない場合にA列に●がつくことになると思うよ