Excel VBA 質問スレ Part56 ->画像>3枚

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


※前スレ
Excel VBA 質問スレ Part55
http://2chb.net/r/tech/1532236398/l50

>>1
乙

昔、JAVAでレイアウトというのを初めて知った時、何でこんなゴミ屑な仕組みになってんのと思ったことが有った。
Web系なんかではサイズが変わることが多く、それでレイアウトが崩れることがあるからなんだろうなと思ったが、Excel上で必要になったことは一度も無いや。

エクセルでFormという時点で、あっこいつエクセルが何のツールかわかってないな、一緒に仕事したら大変そうだな、と思われそう

>>4
何の仕事かにもよるけど普通の人はそんなこと思わないよ

エクセルで仕事ですか？
エクセルってメモ帳みたいなですよね？
あんなオモチャで仕事させられたらバカだと思われますよ

バカじゃ無い方々は何を使ってお仕事されてるんですか？

ここに来てわざわざそんなこと言う人間はExcelに精神を削られた経験でもあるんだろうよ。

削られるも何もエクセルなんてインストールもしてない
必要ないじゃん
いつの時代に生きてるの？
googleスプレッドで問題なし

>>5
同レベル帯にいるってことかな

世界で一番仕事で使われているソフトウェアを使わない選択肢も有るよな。
そんな会社とは付き合いたくないが。

何のためにわざわざこのスレに来てそれを言わなければならないのか、
についての悲しい物語

世の中にはエクセルに異存せずにクリエイティブな仕事をしてる人はたくさんいるよ
毎日エクセル事務作業ばかりやってると想像できないかな？

>>13
> 世の中にはエクセルに異存せずにクリエイティブな仕事をしてる人はたくさんいるよ
そういう人たちはこんなスレを覗かないだろ w

マジでエクセルなんて必要ねー
つかエクセル形式でなんて言われたこともない
メモ帳だろ？

それは良かったね。
で、ここはExcelを便利に使おうとする人が集まるスレ。他ツールの話がしたい人は余所でやってね。

邪魔が入ったけど、、PSコードをExcelから呼ぶときはどうしてるの？
VBAから呼び出し？

>>11
そういうことを言う人とも付き合いたくないな

>>17
全然困らないから良いよ。
ごくごく稀な、PC使わないような会社とは業種がまるっきり違うんでね。

>>13
そういう人達はPC使って無いんだろ。

ビジネス界の常識って話ならそれで良いのに
技術的に比較しようとするから荒れる

で前提条件は変わったの？
エクセル以外は何もインストールも出来ない特殊な環境で働かされてる人向けってのVBAだったよね？
そんな人は極少数とか言ってたやつ
極少数の人しかVBAって使ってないの？

使ってないよ

世間にこれ程エクセルコンプレックスを持ったパソコン博士が居ったとは
正直驚いている

>>21
そういう極限状態ですらPowerShellという強力なライバルがいる
VBAはもはや本気でビジネスに活用するような言語じゃない
もちろんPowerShellがなかった、あるいは普及してなかったXP時代だったらVBAもビジネスで通用した
でも今はもう便利な道具が揃ってる

PSって簡単に1ファイルにできるんだな
1ファイルおじさん涙拭けよ

だが、伸びないPowershellスレw

うちの会社ではPowerShellがデフォルトでは使えないだけど、作ったものは動かせるのかな？

お前の会社のことをここで聞かれてもな

>>28
同じ会社かもしれないだろ、お前の会社のことを言えよ

で、とうやってExcelとPS連携するの？
PowerShell押しの人、ノウハウ教えて。
（普段はVBAだけど固執するつもりはないので）

>>29
ここはVBAのスレであってPowerShellのスレではない。
お前、字も読めないバカ？

>>31
だったら最初からPowerShellのことをここで言われてもなと言えよ
会社がどうとかふざけたこと抜かしやがって

PowerShellもここで良いだろ逆に

>>28
それって会社によるのか？
PowerShell自体が使えない環境でも作ったスクリプトが動くなら
どこか1箇所だけ使える環境を用意してやれば済むんだけど。

>>31
ちげーよ、VBAとPSをどう連携できるのか聞いてんのよ。どっちがいいとかの雑談にはウンザリだけと、出来る範囲を広げるのはいいだろ？
なのでPS押しの人たちが普段どうしているか知りたいわけ。

PSを煽る気満々のやつにわざわざ教えるわけねーだろ

Powershell利用のマルウェアが多いため、Powershellはセキュリティリスクという考えの社が多い。
やっと去年のWin10からかなり監査が出来るようになったので、今後は順次開放されるのではと思うが

PSめんどくさいんだよ
バッチファイルと同じで、なんか変なとこで管理者権限が必要だったりするから、
一般事務の子に「これダブルクリックしたらok～」とか気軽に言えない
https://ledsun.hatenablog.com/entry/20120325/1332642151

何だかんだで気軽に扱えるのはVBSとvba
特にエクセル＋vbaの相性が良すぎてサクッと使い捨てコード書くならこれ以外考えられない

PowerShell(PS) で、Excel を起動して読み書きするとか、

PSで、データベースからExcelへ、データを読み込むとか

＞PowerShell(PS) で、Excel を起動して読み書きするとか、
これは最悪
素直にvbaで良い

>>27
動く

>>30
好きにすればいい
https://github.com/dfinke/ImportExcel
ここ充実してるので参考にするといい

>>37
んなこと言ったらVBAもなにもかもリスク
メールで気軽に送受信してしまう1ファイルVBAは比較的リスクが高いと言える

>>38
管理者権限は不要

>>39
VBAはブックに埋め込んでブックを開かないと動かせないから面倒くさい

VBAの最大のデメリットは
自分: プログラム書けます！
他人: C#? Java?
自分: .........

恥ずかしくてVBAだって言えない事
今時VBAってwww

今時VBA「しか」使えないのは確かに恥ずかしいな

>>43
お前が言うな

>>41
なるほど基本、外部から起動して一処理完結型の目的に使うイメージですね。ボタンやイベント駆動に割り付けるのではなく。
リンクありがとう。ちょっと覗いていろいろ遊んでみます。

>>44
思わず反応しちゃうということはさてはお前VBAしか使えないな w

vbaって普通、事務用途なんだから他言語使える人は少ないよ

外部から起動するのがダメダメだろ。
それだったらどんな言語でもOK。
C#とかにするね。

昔、VBAからShellで別言語で作ったプログラムを呼び出して、そのプログラムが特定のテキストファイルを残して終了するまで待ってからVBAでテキストファイルを読み込むなんてかっこ悪いことしてたことが有るんだけどPowerShellも同じ匂いがするんだよな。
.netのフォームが使えるのは良いかもと思ったけど、ここでも同じ匂いがする。
VSTOの方がよっぽど良い。

こマ？

>>47
これマジ？

UI部品やイベントでゴテゴテに装飾したエクセルGUIを使う場面ってビジネス上そんなにないよね

>>48
発想がチープっすね
おじいちゃんPGが好きそうな構造

Powershell(またはバッチ),vbsは必須だろ...単なるファイル処理にVBA書く奴の気が知れん

>>51
そう。
だからVBA標準のフォームで十分。

>>53
そう。
Excelが絡まないなら他言語の方が良い。

でもここはExcelVBAのスレなのでExcelが絡むのが基本。
そうすると他言語はどれもダメダメ。

Excelから起動出来ないとか、かっこ悪い匂いしかしない。

>>54
?
.netあるのになぜエクセルでフォーム？ギャグなの？

>>57
バか?
Excel上で使うフォームのことを言ってるんだが。
そこに.netの高機能なフォームなんて必要無い。

>>47
俺はexcelでやる作業を楽したいからVBA覚えたけど(関数覚えるようなものだし)、他のプログラム言語なんて大学生のときに教養の授業で少しやっただけで、必要なかったし、今後も全く必要ないと思う

エクセルは多くの一般人に便利に使われている一方で、多くのプログラマに嫌われている言語ですね

>>60
嫌われているのじゃなくて碌にプログラムが組めない奴、もしくは他言語の初心者が自分能力の低さが悔しくて憂さを晴らしやすいのがVBAなんだろう。

PowerShellからインタラクティブにExcelいじるのが便利
VBAって対話的に実行できないんだよね

そりゃ、今でも何でもコマンドラインの方が良いという人はいる。

対話的インタフェースってあまりありがたくないけどな

俺はありがたいんだよ

みんな好きな方法でやれよ。
外からのコントロールも覚えれば幅も広がるかな？勉強しよっと。
でも、Excel介さずにファイル操作するほうが効率的ってならこのスレに関係ない話だな。
全く関係ないスレで暴れてる人たちって何がしたいんだろ。
好きな方法で好きなことさせればいいのに。

>>62
さすがにそれは・・・イミディエイトウィンドウ知らんの？

流れを読まずに、、皆さんListObjectって使ってます？　Oracleとかからクエリするとできあがるアレ。
2007あたりからの機能だと思うけど、慣れないから範囲に変換して独自のアクセス方法で使ってた。
もしかしてリストで表組みすればプログラムでスゲー便利だったりします？
ここが便利とか、こんな使い方があるよ、ってのがあったら教えてください。

>>67
自分は作業をイミディエイトウィンドウでこなすことが多いんだけど、
あれって対話的インタフェースっていうもんなの？

イミディエイトで日常作業とか苦行だろ
冗談キツイよ

みんなが作るvbaのUIってどんな感じなの？
俺はいつもこう。設定縦一列に並べてボタン押せばokって感じにしてる

イミディエイトウィンドウを対話的インタフェースってのは面白い言い方だな
ただ、あれは普通のコンソールとしか呼ばないと思う

>>68
知らなかった
テーブルをobjyect扱いにしているのか？
便利そうっちゃ便利そう

ここにいるVBAerってPSerよりVBA知識少ないみたいだな
ListObjectも知らないとかまじかー

>>74
そもそもテーブルをvbaで触ることがない
システムから吐き出されたデータをvbaで集計して、vbaで体裁整えて、vbaでファイル分割してコピーして、vbaで所定のフォルダに入るようにして終わり
ListObjectとか頑張って使う人は結構たいへんな環境だと思う

PSでの対話的処理って具体的にどんなするの？（定義に行き違いがありそう）

>>74
お？詳しそうだね。
便利な使い方があったら教えて！

>>70
なんで？
環境を整えればワンライナーでガシガシいけるyo！

>>78
指定フォルダを再帰的に検索してファイル名が*.csvにマッチするCSVファイルを列挙
各CSVからX列, Y列, Z列を読み取ってD := (X^2 + Y^2 + Z^2)^(1 / 2)を計算する
Dの大きい順に並び替えてX, Y, Z, Dを新規Excelブックに出力して
出力した全行をテーブルレイアウトに変更する

例えば↑のような処理があったとしてイミディエイトのワンライナーだとどういうコマンドになるの?

ぼくが考えた目一杯難しいプログラムみたいでワロタw平和やなあw

そんなもんワンライナーで書くわけ無いだろ・・・

>>80
え？ VBAユーザーの感覚だとこの程度の処理が難しいの?

>>81
ファイルの検索、解析、整形、出力なんて日常茶飯事だろう
こんな典型的な基本パターンすらワンライナーで書かないならなにをワンライナーで書くんだよ

マウンティングワナビー剥き出しのナイーブなレスでワロタw平和やのうw

やっぱりイミディエイトじゃ大したことできないじゃん

いやまあ向き不向きはあるでしょ
不向きなもの取り上げてダメだというのは自作自演ですよん

>>79
ごめんなさいごめんなさいそれはワンライナーでは無理でした
実力もないくせにワンライナーとか言ってごめんなさい

>>82

なんやワナビーwせっかくのマウンティングチャンス見送ってまうんかw

ごまんなさいオレには無理でした教えてください
そういう関数を作ってイミディエイトから呼び出せばそりゃできるけどそれじゃワンライナーとは言えないですよね...

gci . -Recurse -Filter *.csv | % { ipcsv $_ } | % { $_ | Add-Member -PassThru -MemberType NoteProperty D ([math]::sqrt([math]::pow($_.X, 2) + [math]::pow($_.Y, 2) + [math]::pow($_.Z, 2))) } | Sort-Object D -Descending | Export-Excel -Now

>>90
うおおおおおおｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ

って試してないけどそれっぽいから驚愕しとくぜ！
ってかvbaってそもそも
「提携業務の自動化」
がコンセプトだと思うんだけど、
そこにワンライナーを持ち出す意味がわからないぜ。やれるならすげー！って思うけど、エクセルのファミコンエミュみたいな大道芸と変わらん

>>79
冷静に考えたら「新規Excelブックに出力して～ 」の部分を除けば
イミディエイトウィンドウ上のワンライナーでもいける気がしてきた

>>90
ん？
X列, Y列, Z列ってなんの事だ？

>>91
自動化はプログラミング言語共通の目的なので、VBAのコンセプトと言うにはビミョー

というか大道芸に見えるか？
ファイル漁って解析して整形して出力ってごく日常的な作業だから、大道芸でも何でもないし、
息吸って吐くみたいな作業をいちいちスクリプトファイル化したくないので、ワンライナーで書くんだよ

>>93
X, Y, Z
1, 2, 3
1.5, 0, 100

こういう形式のCSVがあると思ってくれればいい

何かPowerShellユーザーが哀しくなるようなレベルの奴が来てるな。

そんな簡単なものを自慢して何になるんだ?
PowerShellってのはそんなに使えないもんじゃ無いだろうに。

見た瞬間に組めると思うかどうかだよ。
簡単かどうかってのは。
ワンライナーかどうかは関係ない。

まったくもってクダラナイ。

まだマウンティング終わっとらんのかよw
最近はダラダラ時間ばかりかけて主旨のようわからんアホが多すぎるわ

>>96
自慢に見えるならキミの潜在意識では、なんかすごいことやってるな、って感じてるってことだろうね
でもこの程度で自慢してるとか言われてもネ
呼吸することを自慢する人間はいない

ブルーボトル日本開店おめでとう。西海岸で飲む、いつもの味。僕にとって新鮮みがないことが、成功の証だと思う。

>>99
> 呼吸することを自慢する人間はいない
そうだな、呼吸することをいちいちこんなスレに書くやつもいないわな w

>>90
おお、便利そうですね。勉強になります。
Excel絡んでるの、最後のとこだけ？

PowerShellも腰据えて勉強しようかな？

でも、ここVBA質問スレなので、別スレに分かれてるとうれしいな。
Excel PowerShell 質問スレ　とか作ってそこでご指導いただけると
ありがたいです。

>>79
そういう複雑なものは、PowerShell では難しいから、Ruby を使う

Dir.glob('C:/Users/Owner/Documents/Ruby/test/**/*.csv') do |file| # 再帰的に
next if File.directory? file # ファイルだけを処理する

CSV.foreach( file ) do |row| # 各行
# row[0] ～ row[2] (列0～2)を使って計算する
end
end

>>104
> 新規Excelブックに出力して
> 出力した全行をテーブルレイアウトに変更する

要件満たしてなくない？

>>79
>>82
これVBAはおろか、そもそもエクセル案件ですら無い件。
せめてファイル形式くらいxlsxにしないと・・・

>>106
？
新規Excelブックに出力して出力した全行をテーブルレイアウトに変更する
て書いてあるじゃん

Excelから始まってExcelに終わる
Excel以外の外部環境とは隔離
これがエクセル案件
VBAはエクセル案件のためにある

>>107
何故か見落としてた。すまんな。

>>108
データ量を考えた場合、RDBとの連携は認めても良いとは思うのだけどね。いちいち>>104みたいにRubyを持ち出すバカは別にして

>>110
認めたら他の言語が優位になってしまう
エクセルでやるならエクセルだけで完結させる
これは絶対的なルールで例外は認められない

普通にdll作ってexcelからdllの関数読んで作るような案件ないくらでもあるかな
追うのが困難な知恵遅れ大量ｸｿVBAを知恵遅れが書くのを防止することもできる

excelでvbaを書くぐらいしかできない知恵遅れ無能に
できるだけ余計な事をさせない事前策にもなってる

RDBとの連携　←　必須
dll作って呼ぶ　←　普通にやる
テキストファイルの読み書きをする　←　あんまりやらない

>>99
呼吸することをわざわざ宣言するバカはいない。

なんでPowerShellバカばかり来るんだろう。

実際、VBAじゃどうにもならないこともある。
なんで他言語自慢はVBAでも出来ることばかりなんだ?
他言語でもレベルの低い奴ばかり来てるんだろうな。

>>115
呼吸みたいなこともできんので驚いたって話だよ

自分から驚きにいってあえて驚いたと言いたがるアホw

VBAの何が良いって、適当に書いたプログラムを他人に渡しても、受け取った人（IT系では無い一般事務員)がその場で治せることが一つのメリットだと思う。
Powershellみたいに一行に何でもかんでも押し込まれたら、読めるもんも読みたくないわ
ましてや電話越しにデバッグして貰うとかVBAか関数にしか無理

>>119
別にパワーシェルやから一行に何でもおしこめる訳ちゃうわw
ワンライナーに童貞を奪われた厨房ってのは何時の時代も一定数おんねんw

ワンライナーは人に渡すもんではなく、自分用だよ、きちんとps1ファイルに書くことも可能

>>119
かつて無いほどアホくさいレス

試しに同じ処理をVBAで書いてどっちがわかりやすいか、変更・拡張しやすいか、比べてみませんか
ハンデとしてワンライナーじゃなくても構いません
VBAユーザーの皆さんさあどうぞスマートなコードを書けるものならぜひ書いてみてください
もちろん尻尾巻いて逃げるのは構いませんがそんな情けない人はここには居ないと信じています

>>123
>>79の話？ ああ良いですよ書いてあげましょう

VBAの全力をお見せしましょう

>>125
その意気です
さあ書いてください

他の様子見してるチキンの皆さんも参加しても構いませんよ

>>117
呼吸みたいなことをわざわざ書くとか驚きなんですけど w

できました

Files = ReadCsvFiles("*.csv")
Data = ReadCalcPower(Files)
Sort Data, "desc"
ExportExcel Data

>>127
例えば隣に座ってるおじさんが呼吸してなかったら驚くし声をかけるだろう？
ねえねえVBAくんさっきから息してないけど大丈夫？生きてる？
まあだいたいそういう感じ

powershellは凄いぞ！ワンライナーで何でも掛ける！
って言ってる奴が出てきた時はまともなpowershellユーザーがちょっと可愛そうではあった

>>128
Subも書けよww

>>131
PowerShellと粒度を揃えましてん

VBAの書き方がわからないおじさんに教えてあげましてん

>>130
まともなパワーシェルユーザーなんか居らんわwバカかとんでもないバカだけやw

>>128
素晴らしい
ReadCsvFiles、ReadCalcPower、Sortの実装が見えないけどバグかな？

誰とは言わないけど負け犬敵前逃亡兵がきゃんきゃん吠えとるのw

>>135
バグではないよVBAではこのように抽象化することで
コードをわかりやすく書くの
PowerShellでもExcelExportがどうなってるかは見えないよね
それと一緒

検証できないから意味がない >>90は誰でも検証可能

今までそーっとしといたけどVBAにソートないんだよね

>>138
検証してやるから全部のソース出してよ
Export-Excelもそう、Sort-Objectもそう、それらのソースコードを
提出していただこうか、粒度を合わせるんだよ

>>139
ソートはないよ、自分で作るなりネットから拾ってくるなりで

粒度の違うものを比較しても仕方がない

>>137
いやいや抽象化は構わないけど
中身がないとバグだよ

はいソース
https://github.com/PowerShell/PowerShell
https://github.com/dfinke/ImportExcel
キミは誠実な人だから惨めに言い訳して逃げないでVBAで実装してくれるよね

ここ来るとVBAのおかげで飯が食えてる俺は先が無いなって思わされる

>>143
長すぎて読む気にならない
無駄なものを貼るな

>>145
あれれーキミも言い訳して逃げちゃう人だったんだ

>>146
僕は一切言い訳をしないし逃げることもない
ずっとここにいる、君はなぜここに居る

なぜPowerShellのソースコードを貼る

>>147
>>137

>>149
僕が言ってることには完全に筋が通っている
粒度を合わせることによってVBAとPowerShellの比較を可能にして
VBAのコーディング方法をPowerShellユーザに伝授した
もっと丁寧なお礼をいただいても良いと改めて読み返してそう思った

>>150
えーつまりVBAのコーディング作法では
未定義の関数を呼び出してエラーが出るのを眺めるのが正義、ということですか
流石vbaerは言うことが一味違いますね

>>151
誰もそんなこと言ってないですね
あなた誰ですか？

というかことの起こりは

>>79

このレスだぞ
このレス自体はPowerShellとは無関係な純粋なVBAの質問だろ？

そのあとでPowerShellだとどうやるのと聞き返されたから答えたまで

ということで純粋なVBAの質問である>>79への解答を待ってます
VBAでは実現不可能でしたら解答しなくても結構です

>>153
VBAで実現可能です
純粋なVBAの最終解答をお示しします

Files = ReadCsvFiles("*.csv")
Data = ReadCalcPower(Files)
Sort Data, "desc"
ExportExcel Data

>>154
動きませんでした
嘘をつかれては困ります

ワークシートの名前を変更するにはどうしますか？

VBAでどうやるのか聞き返されたら答えるまでですけど
PowerShellではどうやるのか教えてください

>>155
だったらPowerShellのプログラムも僕の環境ではピクリともしません
それを嘘つきというならPowerShellの方が嘘つきです

>>156
に答えてください

>>156
$app = New-Object -ComObject Excel.Application
$book = $app.Workbooks.Open($targetFilePath)
$book.Worksheets($targetSheetIndex).Name = "NewName"
$book.Close($true)
$app.Quit()

こちらは答えましたよ
あなたもはぐらかさないで真面目に>>79に答えてください

>>159
VBAではこうです
ActiveSheet.Name = "合計"
ワンライナーで一撃です

>>79に答えます
VBAではこう書きます
Files = ReadCsvFiles("*.csv")
Data = ReadCalcPower(Files)
Sort Data, "desc"
ExportExcel Data

>>160
あなたのコードには致命的な欠陥があります
対象とするブックを手作業で開かなければならなりません
これでは自動化を検討する程度の数のブックを相手にした時に間違いなく腱鞘炎になってしまいます

>>79への解答は不適切です
このコードには未定義の関数・サブルーチンが含まれているため動作しません
関数・サブルーチン化するならその実装も解答に含めて下さい

確かに、なんでもワンライナーで出来るかのような表現を使うよね、Powershellユーザー。

多分、そうは書いてない、思い込みだろうってレス着くと思うけど。

PowerShellとCOMってGCの方式が違いますよね
一方は世代別GC、一方は参照カウント
GC方式の違うものを混ぜるとメモリリークしますよ
>>159はメモリリークしますよ

>>159のソースはそのままで動くの？

>>162
あなたの主張はデタラメです
パワーシェルはワンライナーであらゆる処理を書けるほど表現力が高く、基本ライブラリが充実していることは確かに事実ですが
だからと言ってなんでもワンライナーで書くわけではありません
パワーシェルのユーザーは
1つのコマンドで1つの仕事を上手くこなす
コマンドを組み合わせて大きな複雑な仕事をこなす
というシェルプログラミングの良い習慣をもちろん知っています
論より証拠ということで>>143のリンクをみてください

>>163
しませんよ
リークするなら証拠を提示してMicrosoftに報告してください

>>161
いま開いてるExcelのシート名変えるってことなら問題ないですよね
じゃあそれで、むしろそれで

現在開いてるExcelのシート名をPowerShellで変えるにはどうしますか？

>>99 > 呼吸することを自慢する人間はいない
↓
>>129 > 例えば隣に座ってるおじさんが呼吸してなかったら驚くし声をかけるだろう？

こんな脈絡のないことを言い出してて驚くわ
まあ気味悪いから対面してたら放置するけど w

>>166
マイクロソフトも認識してます
だから.NETにはReleaseComObjectという
COMのためのメソッドが用意されてます
あなたのコードにはメモリリークのバグが存在します、僕はあなたにそれを報告します

>>167
[Runtime.Interopservices.Marshal]::GetActiveObject('Excel.Application').ActiveSheet.Name = "NewName"

逆に聞きますが、エクセルが起動していない時に、指定のブックの指定のシートの名前を変えるVBAコードは、どうやって書けばいいのですか？

>>170
まずExcelを起動します
開発のボタンを押してマクロエディタを起動します
そしてワンライナーの一撃コードを実行します
これがVBAの正規の手順です

[Runtime.Interopservices.Marshal]::GetActiveObject('Excel.Application').ActiveSheet.Name

これ暗記してるん？ すごい

メモリリークしてますけど

便乗で聞きたいんだけど
powershellでVBAの定数はそのまま使えるの？定数をCOMか何かからロードしたりするの？
あと名前付き引数とかどう処理するの？

>>169
ReleaseComObjectは速やかに参照カウントを減らすためのものです
それを実行しなくてもGCやプロセス終了時にリソースが解放され参照カウントも適切に処理されるので安心してください

明示的にReleaseComObjectを呼ばなければリークする、などという危険な状態を主力商品の1つである.NET上で放置するほどMicrosoftは怠惰ではありません

>>169
思った通りのレスですねw

>>171
それでは手間が多すぎます
おそらく手作業でシート名をクリックして名前を入力する方が早いでしょう

>>173
証拠の提示をお願いします
メモリリークの場合最低でも次の3つは欲しいですね

再現性のあるメモリリークを起こすコード
メモリを測定するコード
あなたの環境で測定したデータを分析したレポート

>>175
参照カウントじゃないから参照なくなってもGCが動くことが保証されないですよ
プロセスがすぐ終了するかも仕様次第ですし、博打プログラミングですよ

GCの方式が違うからこれは技術的にどうしようもないんですよ
怠惰ではないです、むしろマイクロソフトは頑張ってる方ですよ
実装者の知識と努力に期待せざるを得ないのは宿命です

>>177
こう考えてください、VBAを書くときExcelは起動してるんです
マクロエディタも起動してるんです、手間なんて何もありません
手作業では大変なことを行おうとしてるさなかのシート名変更ということですね

>>178
GC方式が違う、それが証拠です
PowerShellにデストラクタが存在しないことが
GC方式が違うことの証拠です
GC方式とソースコードからメモリリークは明らかです
明らかなものに調査はそれ以上の調査は必要ありません

>>179
すぐには回収されないだけとリークするの間には深い溝があります
遅くともある時点までには解放されることがわかっているわけですから、博打でもなんでもありません
.NETにはそれをコントロールする術も用意されています

>>182
コントロール術が用意されてるならそれを使ってコードを書いてくださいよ
解放されることはわかりませんよ、.NETでGCが行われることは保証されません
.NETにはデストラクタがないでしょう？ それが証拠です

>>180
いいえ
残念ですが起動していないことの方が多いでしょう
もし起動していたとしてもシート名を直接変える方がマシです

excelのマクロの効率的な書き方について相談できるサイトってどこかにある？仕事の話なのでこういうところに公開することはできないので…

>>181
支離滅裂で全く明らかではありません
GCでインスタンスが回収されると自動的に参照カウントが適切に処理されます
したがって何もせずともリークは起こりません
回収が少し遅れるだけです

>>184
Excel VBAを実行するのにExcelファイルが開いてない？？
支離滅裂ですね。

>>183
[GC]::Collect()

CLRではデストラクタではなくファイナライザがサポートされています
ご安心ください

>>185
マイクロソフトのフォーラムとかどうだろ

Technet フォーラム
https://social.technet.microsoft.com/Forums/ja-jp/home

>>188
ドトネトーは世代別GCなので1回実行しても回収される保証はないですよ

>>187
あるブックのあるシート名を変えたいと思った時にエクセルが都合よく開いているとは限りません

>>188

Object.Finalize メソッド (System)
https://msdn.microsoft.com/ja-jp/library/system.object.finalize(v=vs.110).aspx

| ガベージ コレクションは非決定的であるため、ガベージ コレクターが終了処理を実行すると正確にわかっていません。
| リソースを解放する、すぐにこともできますを実装する、 dispose パターンとIDisposableインターフェイスです。

マイクロソフトも半分支離滅裂ですがファイナライザの使用が非推奨なことが読み取れます
IDisposableインターフェースが用意されてるくらいです

>>190
引数なしのCollectはすべてのジェネレーションのガベージコレクションを直ちに強制実行します

>>193
勉強になります

>>191
Excel VBAを実行するのだからExcel ファイルは開いてますよ。
指定のファイルが開いてないってことを言いたいの？
その場合の処理はあなたのPower shellのコードと大差ないけど。

でもそれを呼ぶ前に全部のメモリ参照をなくす必要があります
それってできますか？ PowerShellの変数スコープは変態ですから
事実上不可能です

>>192
MSDNの翻訳が酷いことは有名なのでそれは我慢しましょう

リソース解放の時期をコントロールしたいなら決定的なIDisposableを使ってください
決定的でなくても問題がないならIDisposableに頼る必要はありません

スクリプトの利用形態から考えるとプロセスの寿命は非常に短くなります
これはエクセルインスタンスが本当に必要なくなった瞬間とプロセスの終了が時間的にほとんど離れることがないということです
このような場合では決定的な解放にこだわらなくても問題にはなりません

>>195
私の書いたコードでは指定のブックを開く必要がありません

>>197
そうとも限らないと思います
スクリプトを使うということは手作業での作業が煩わしく
それを効率化したいという欲求があるためです
スクリプトを書くとき、その時は常に手作業を躊躇する程の事態が発生している
状況と考えるべきで、ある処理がメモリを使んで離さなくて別の処理が
完了できないという経験を僕は山ほど経験してきました
メモリ管理を甘く見ると痛い目を見ます痛い目を見ます

ﾊﾟﾜｰ系池沼ｼｪﾙ

>>198
パワーシェルのスクリプトを作成して
コマンドプロンプトを起動して
コマンドを入力する必要があるじゃないですか

その時間使ってExcelを起動しましょう
VBAなら一撃です

>>196
処理を適切に構造化して変数のスコープを無闇に伸ばさなければ、自然と不要な変数の参照は辿れなくなります

そして先ほども書いたようにスクリプトはプロセス全体の寿命も短くなりやすいので
変数のスコープはそれほど問題にはなりません

どうしても変数をクリアしたいならClear-Variableというコマンドレットがあります
個人的に使う機会がないコマンドレットですがスコープとワイルドカードを指定してまとめて変数を消去でるそうです

>>198
>>156
$app = New-Object -ComObject Excel.Application
$book = $app.Workbooks.Open($targetFilePath)
$book.Worksheets($targetSheetIndex).Name = "NewName"
$book.Close($true)
$app.Quit()

ファイル開いてるけど、頭おかしいの？

>>199
シビアなリソース管理が必要ならその時に適切なコードを書けばいいでしょう
なにもすべてのスクリプトを怠惰に書けと強制しているわけではないのですから
ですがほとんどの日常作業でそこまでシビアなリソース管理が要求されることはありません
それとリソースの不足は非決定的なリソース解放よりも非効率的なアルゴリズムが原因で発生することが多いということは知っておいた方がいいでしょう

>>201
あなたの書いたコードは名前を変えたいと思うたびにブックを開かなければなりません
シェルを1度起動してパラメータを変えるだけとは訳が違います

>>203
開いているのはプログラムです
手作業で開くのとは全く意味合いが異なります

というか話を戻しますが>>79への解答はまだですか？
どうやら関係ないPowerShellの質問を繰り返して話をそらして逃げようとしているようですが忘れていませんよ

>>207
失礼な、僕は逃げも隠れもしません
>>79に対する解答をお示しします、ご査収ください

Files = ReadCsvFiles("*.csv")
Data = ReadCalcPower(Files)
Sort Data, "desc"
ExportExcel Data

>>204
アルゴリズムが大事なのは知ってますが
スクリプトでExcelを操作するときには計算量を気にしなければ
いけないほどのアルゴリズムを使うことはありません

やることはせいぜいシートの名前を変えて
コピーして集計して並べるくらいでしょう

問題はリソースリークなんです、関数を作りまくって
GCを呼びまくりますか？ 僕の目にはそれは狂気と映ります

>>205
VBAでブックを開きたくなりましたか？ 教えましょう
Workbooks.Open "C:\Book1.xlsx"
一撃です

VBAは一撃です

プロセス終了で必ず開放するんだから必要ならそういうスクリプト書けばいいんじゃないの
powershellに限らずリーク問題を解決するためにプロセスサーバ的な構成にしたりするけど

>>189
あ、想定してたのはフェイスtoフェイスで相談かメールで相談する形式なんだけれど、そういうのはやってないかなあ？

>>206
えっとまさか、実行に必要なファイルを全部手で開かないといけないと思ってたの？

バカ丸出しですね。

PowerShell から、Excel, IE とかは、別プロセスを起動するだけだろ？
シェルって、別プロセスを起動するものだろ？

GC のやり方の違いなんて、関係あるか？

VBAの質問です

指定フォルダを再帰的に検索してファイル名が*.csvにマッチするCSVファイルを列挙
各CSVからX列, Y列, Z列を読み取ってD := (X^2 + Y^2 + Z^2)^(1 / 2)を計算する
Dの大きい順に並び替えてX, Y, Z, Dを新規Excelブックに出力して
出力した全行をテーブルレイアウトに変更する

というプログラムを作りたいのですがどのように書けばいいでしょうか？

>>215
Excelに出力するって内容を足したのかw
しかもワンライナーって条件を外したのねw
その内容をPower shellのワンライナーでどうやるんだろうねw

>>216
>>79 と同じだよ？足したのは「VBAの質問です」だけ

>>217
ごめんなさい、見落としてました。

>>208
>Data = ReadCalcPower(Files)

ここだけは許さんw

頭の悪さを全力で競い合ってるスレがあると聞いて飛んできた
どれも最底辺レベルで甲乙つけがたいな

大昔何かの雑誌でBASICで一行ゲームとかネタでやってたのを思い出した

>>90 こんなの処理系にパイプ処理があるかないかだけの違いだろ
一行記述できるかどうかは、一行に記述できる最大文字数に加えて
パイプで記述できるか、一命令の区切り記号が設定してあるかくらいで決まる
区切り記号は、C系(C#)では;か}、昔のBASICでは:があったしLISPなんかは括弧で区切ればいくらでも書ける

ワンライナーなんて対話的に使う時に一々スクリプトを立ち上げたり面倒なので使うもの
可読性が悪くなるだけなのでプログラムで絶対に使うもんじゃない
昔のPCのメモリも少なかったのでそれなりに意味はあったんだけど捨てられた

今ではせいぜいネタ、言語のの優位性とは完全に無関係

Excelらしくやるならインポートが先かな
1. インポート_CSV
2. 追加_数式列
3. ソート_数式列
4. 変換_テーブルレイアウト
Excelのパワーをフル活用したいものだね

>>220 ほんこれ

>>220
ここはVBAスレだぞ

>>212
僕らの田中さんにお仕事依頼してみるとか

Office TANAKA - お問い合わせ
http://officetanaka.net/mail/index.htm

>>221
流れるようなインターフェースとかパイプラインを使ったワンライナーはモダンなプログラミングでは常識的なテクニックだよ
太古の時代から時が止まってるVBAのユーザーは知らないかもしれないけど
例えばc#のLinqやJavaのstreamなどはもろにパイプラインから影響を受けてるよね
VBAしか使わないのかもしれないけど少しは興味もって知識をアップデートしたら？

>>226
VBAにそんなの必要無い
ただの事務員にStreamなんて理解できるわけないだろう

>>224
低レベルの先頭切ってるのはお前なんだけどw

>>227
必要あるなしでいったらなにも必要ないよ
手作業だけでも仕事はできる
そうじゃなくて、より良い方法はないか？って模索していくことが大事なんだろ
つーか事務員がstreamを理解できないなんてのも決めつけでしかない
所詮は部品の組み合わせだから、手続き型のアルゴリズムを理解するよりずっと簡単だよ
簡単で効果的だから様々な言語が挙って似たような機能を導入したんだ

>>228
の割にはVBAコードが何にも出てこないよな
低レベルのPSerが息をするように簡単に書ける処理を
これだけ時間をかけて答えることができたVBAerがまだ一人もいないってちょっとレベル低すぎでしょ

>>230
開いているのはプログラムです！
だってw

コードうんぬんの前の話ですね！

>>230
どう言う意味だか教えて欲しいですよ！

ID:4dFHA/W/
こいつなんなの？誰にも無益なレスばかり

>>231
確かに
VBAerはコードを絶対に書こうとしないからコードがどうこう以前の問題なんだよな
意見するのはかまわんけど最低限、コードを書いて実証してからにしてほしいよね
コードも書かずに意見しても、うちで修行すれば空飛べるぜー、とか豪語する真理教のおっさんと大差ない
まさに戯言になってしまう
なんでvbaerさんまずはコードを書きましょう
>>79への解答待ってます

会社のPCにしかExcel入ってないから無理

ユーザー系の仕事でVBAつったら、事務員のスプレッドを少し自動化したものから、業務知識鬼のベテランがプログラム ちょっとかじったものまであるけど、最近またRPAバブルで前者を移植することになった

このRPAっつー半分胡散臭いものが流行るおかげでワシらオッサンPGが食っていけるわけだが、いかんせん胡散臭い

>>233
バカなPower shellユーザーを追い出したいだけ。
このスレにとっては最高に有益だと思うけど。

>>234
>>231は君の書き込みの引用なんだけどw

>>234
これ一個ずつやってみたらどうだろ？
VBAの実装の仕方がわからないって質問ですよね

1. インポート_CSV
2. 追加_数式列
3. ソート_数式列
4. 変換_テーブルレイアウト

自分で調べてみてそれでもわからないことが
出てきたら具体的に聞いてもらうということで

無能な味方が無自覚にバックファイアしてるようにしか見えん

他人を値踏みするスレじゃないですし
他人と自分を比較して自信をつけるスレでもないと思うんですよ
Excel VBAでわからないことがあったら質問するスレということで
ご理解賜りたいと思う次第でございます

>>240
議論に敵も味方も勝ちも負けも良いも悪いもないと思うんですよ
みんなで意見を出し合ってVBAパワーを高め合いましょう

>>536
dbからcsvでﾌﾞｯｺ抜いた、300万件程度のレコードのなかから
～って条件に該当するレコードをExcelで抜いてくださいと言われたことがあって困惑した

Excelじゃ無理だといったら「なんで出来ないのか、PGなんだからできるでしょ」みたいな言い方された
1週間あげるから、1週間でExcelであげて欲しいと・・

結局なんとか、Excelじゃなくてもいいと説得してその日のうちに
仕上げたら「早すぎるのじゃないか」「正確性が心配だ」と文句言われた



ことを思い出した

だからなんで読んだ瞬間に組めると思うようなアホ臭い処理で比較してるんだよ。

頭悪いなあ。
そんなもんで比較してもVBAの優位性は変わらんぞ。
Excel上から実行出来るとか1ファイルで済むとか。

例えばフローレイアウトを使うことは無いと思うが、あれならまだ分かる。
あれはVBAじゃ無理だと思うからな。
見て組めると思うようなものをわざわざこんな所で披露するのはアホだと思う。

そんなもんは仕事でやれ。
そんなくだらないことをする時間がもったいない。

今のExcelって100万行/シートだから3つか4つのシートに分割して読み込んで処理すれば不可能ではないよな、65000行時代なら考えたくないが

>>225
マクロの作成の依頼は無いみたいね。
あまりみんなこういうのやらないのかな。

>>243
VBAにこだわる人ってそんなもんよ

>>243
いや、仕事でやったことあるぞ。
もっとデータ多かったと思う。
それに引っこ抜くだけじゃなくて、それで演算もしてた。

今、計算してみたらデータは26280000以上だった。
正確には分からないけど多分倍以上だな。

>>244
VBAだと組むのに多大な労力がかかるからレスバトルごときではやりたくないんですよね
その気持ちわかります
これがVBAでもスラスラ短く書けるものだったらほれみたことかと言わんばかりに嬉々として解答してくれていたのでしょうね

>>246
ホントだ受け付けてないんだね

バトルだったのかー

1000個所以上(多分倍以上)の場所から1時間毎に取得したデータ3年分だな。

これをある時間毎に平均をとって1日に24個の平均値を作り、その最大をその日のデータとする。
で、それを3年分の日数取ってきて・・・
みたいな。

>>249
いや、スラスラとか関係ない。
5分で出来るものが20分になっても大したことない。

出来ないものは出来ないし、
何とかして頑張って出来るというものだったら5分が10日とかになる。
そういう方が問題。
解決策がみい出せるかどうかの方がよっぽど重要だよ。

>>249
短くスラスラ書けるようなものだったら回答しない。
他の誰かが回答するか、そいつが少し調べれば解決出来るだろうから。

たとえスラスラ書けてもVBAじゃ1レスに収まらないでしょ
VBAerはpastebinとかgistとかのコード共有サービスの存在も知らなそうだし

>>253
いや問題だよ
>>79みたいな日常的な作業は、解決に時間使っていいような困難な課題じゃないから

>>255
なら誰も答えられないってことはできないってことなんだろうな

ワンライナーじゃなくてもいいけどイミディエイトウィンドウしか使っちゃいけないって趣旨ですね？

>>259
もしできるならイミディエイトがいいけど
どうもVBAでは不可能って結論に落ち着きそうだから無理してイミディエイトを使わなくてもいいよ
普通にbasでもclsでも使ってください
とはいえレス分割するほど長くなると読む気がなくなるのでなるべくスマートに収めてください

>>243 よくよく考えると 1レコード分のバッファと条件一致したレコードの書き出し先さえ確保すれば
ReadLineの繰り返しで処理可能だから、レコードが何件あっても問題なさそう。
シートに取り込む必要なんてないわw
65000行時代でもできたと思うな

下のコードでボタンを押すたびにAの値が増えていくのですが
グローバル変数ってプログラムが終わっても残るものですか
またプログラムが終わったときに消えるにはどうしたらいいです？
Option Explicit
Dim A As Long
Sub ボタン1_Click()
A = A + 1
MsgBox A
End Sub

>>79,239
暇だから書いてみた。
素人が書いたコードだからワンライナー？ではないけど許してほしい。
[Module1]
Sub hoge()
Dim i As Long, k As Long
Dim data() As Variant
Dim cCsv As Collection
Dim csv As clsCSV
Dim fso As New FileSystemObject
Dim fn As Variant
'CSV読み込み
k = 0
Set cCsv = New Collection
For Each fn In FileFilter(ThisWorkbook.Path, "csv")
Set csv = New clsCSV
cCsv.Add csv.LoadCSV(CStr(fn))
k = k + csv.RowsCount
Next
'CSV合成・計算
ReDim data(1 To k + 1, 1 To 4)
data(1, 1) = "X": data(1, 2) = "Y": data(1, 3) = "Z": data(1, 4) = "D"
k = 1
For Each csv In cCsv
For i = 1 To csv.RowsCount
k = k + 1
data(k, 1) = csv.Table(i, "X")
data(k, 2) = csv.Table(i, "Y")
data(k, 3) = csv.Table(i, "Z")
data(k, 4) = (csv.Table(i, "X") ^ 2 + csv.Table(i, "Y") ^ 2 + csv.Table(i, "Z") ^ 2) ^ (1 / 2)
Next
Next

>>263 続き
'XLSXへエクスポート
Dim WB As Workbook
Dim Sh As Worksheet
Dim Tbl As Range
Dim LO As ListObject

Set WB = Workbooks.Add
Set Sh = WB.Worksheets(1)
Set Tbl = Sh.Cells(1, 1).Resize(UBound(data, 1), UBound(data, 2))
Tbl.Value = data

Set LO = Sh.ListObjects.Add(xlSrcRange, Tbl, , xlYes)
LO.Sort.SortFields.Clear
LO.Sort.SortFields.Add Key:=LO.ListColumns("D").Range, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
LO.Sort.Apply

WB.SaveAs ThisWorkbook.Path & "\hoge.xlsx"
WB.Close False

End Sub

>>264 普通は汎用モジュールを使うが自宅にないので、それっぽく再現したもの

Function FileFilter(folder As String, ext As String, Optional ret As Collection) As Collection
Dim fso As FileSystemObject
Dim fil As File
Dim fol As folder

Set fso = New FileSystemObject
If ret Is Nothing Then Set ret = New Collection

For Each fil In fso.GetFolder(folder).Files
If fil.Name Like "*" & ext Then
ret.Add fil.Path
End If
Next

For Each fol In fso.GetFolder(folder).SubFolders
Call FileFilter(fol.Path, ext, ret)
Next

Set FileFilter = ret
End Function

>>265 続き[clsCsv]
Private data As Variant
Private dCol As Dictionary

Public Function LoadCSV(fn As String) As clsCSV
Dim i As Long, j As Long, k As Long
'インポート
'※CSVの仕様が書いてないから、遅いけどコレで。
With Workbooks.Open(fn)
data = .Worksheets(1).UsedRange.Value
.Close False
End With
'列情報のキャッシュ
Set dCol = New Dictionary
For i = 1 To UBound(data, 2)
dCol.Add data(1, i), i
Next
Set LoadCSV = Me
End Function

Public Property Get Table(Row As Long, Col As String) As Variant
If dCol.Exists(Col) Then
Table = data(Row + 1, dCol(Col))
Else
Err.Raise 9999
End If
End Property

Public Property Get RowsCount() As Long
RowsCount = UBound(data, 1) - 1
End Property
行数制限が辛いわ

Sub の中で宣言すりゃいい

>>267 は>>262宛

無理に1行に押し込むより、少しづつステップ実行できる方が読みやすいし、良いのでは無いかと思うのでした。

VBAerの人頑張って最適化して?

長いなぁ
これ事務員さんにメンテナンス出来る?

dim csv as clsCSV
て通るの？そんな型知らないんだが

>>270
長いだけで素人にはすごく読みやすいよ。
F8で1行づつ動きを確認していって”ここだ！”ってところで追記して、実行して、違ったら矢印をちょっと前まで戻して、また追記して実行してｒｙ
って感じなので・・・。

>>271
自作クラス >>266 会社に行けばちゃんとしたクラスがあるけど自宅には無いから必要なものだけ実装した。

間違えた。 >>273は>>271へ

ruby厨のせいでrubyが不当に貶められてるのが気に食わないのでrubyで>>79書いた
1レスに収まるこの簡潔さよ

require "csv"
require "win32ole"

path_to_folder = "."

data = Dir[path_to_folder + "/*.csv"]
.map{|path| CSV.read(path, converters: :numeric)}.flatten(1)
.sort_by{|x, y, z| (x**2 + y**2 + z**2) ** 0.5}.reverse

ws = WIN32OLE.new("Excel.Application").tap{|app| app.Visible = true}
.Workbooks.Add.Sheets[1]
cells = ws.Range(ws.Cells(1,1), ws.Cells(data.size, 3))
cells.value = data
ws.ListObjects.Add(nil, cells)


ワンライナーじゃExcel操作するのを綺麗に書けないから諦め
APIが糞ってはっきりわかんだね

>>79 Dも出力するのかこれ。ちょっと(1行と1文字)修正

require "csv"
require "win32ole"

path_to_folder = "."

data = Dir[path_to_folder + "/*.csv"]
.map{|path| CSV.read(path, converters: :numeric)}.flatten(1)
.map{|x, y, z| [x, y, z, (x**2 + y**2 + z**2) ** 0.5]}.sort_by(&:last).reverse

ws = WIN32OLE.new("Excel.Application").tap{|app| app.Visible = true}
.Workbooks.Add.Sheets[1]
cells = ws.Range(ws.Cells(1,1), ws.Cells(data.size, 4))
cells.value = data
ws.ListObjects.Add(nil, cells)



なおcsvライブラリは標準添付ライブラリなのでわざわざ自作クラスとか作る必要ないです

>>276
Rubyの実行環境はどうやって入手するん？
事務員にできるん？

Export-Excelはどうやって使うん？
事務員にできるん？

>>272
じゃあこのコードに
・ワイルドカードあるいは正規表現を使ったファイル列挙除外機能
・CSVファイルの文字コード指定機能
・CSVファイルのデリミタ指定機能
をサクッと追加できますか？

事務員なら余裕やろな

>>280
コードを書かない人はプログラマでも事務員マクラーでもありません

はい。

>>276
自分が慣れてる書き方するために自作クラス作ったけど、作らなくても普通に書けるのでそこはツッコムところじゃないよ！

VBAは複数の二次元配列をマージする処理を自力で書かないといけないし、ソートもRangeに対して実行するか自作するかしないと出来ないので大変だとは思う。

やりたい命令がちゃんと用意されてるのはいいなぁ。

>>279
だからCSV用のクラスはちゃんとしたのが会社に行かないと無いってば。
イジめないで！
ファイル列挙用もこんな即興で書いたのじゃなくて、マトモなのがある。

日常的に使うものだから特にね。。

WSHのjscript版。with_なんちゃらは適当に補完してね。jscriptにはsafearrayがないから普通に書くとセル格納が糞遅い。
var base_path = "C:\base_path"
var outxls = "DXYZ.xlsx";
var csv_list = [];
with_dir(base_path, function(file) {
if (!file.path.match(/\.csv$/i)) return;
var i = 1;
with_file(file.path, function(str){
if (i++ == 1) return; // exclude header
var csv1 = str.split(",");
var x = parseFloat(csv1[0]); var y = parseFloat(csv1[1]); var z = parseFloat(csv1[2]);
var d = Math.sqrt(Math.pow(x,2) + Math.pow(y,2) + Math.pow(z,2))
csv_list.push([d, x, y, z]);
})
})
function csv_list_sort(a, b) {
return b[0] - a[0];
}
with_excel(outxls, function(excel, book){
var sheet = (new Enumerator( book.Worksheets)).item();
csv_list.sort(csv_list_sort);
csv_list.unshift(["D","X","Y","Z"]);
for(var i = 0; i < csv_list.length; i++) {
sheet.cells(i + 1, 1).value = csv_list[i][0];
sheet.cells(i + 1, 2).value = csv_list[i][1];
sheet.cells(i + 1, 3).value = csv_list[i][2];
sheet.cells(i + 1, 4).value = csv_list[i][3];
}
})

イミディエイトウインドウ縛りを外して貰えれば、Excel標準実装のデータインポートメソッドで文字コードもデリミタも如何様にも設定できたるし、その上速いらしいよ下記のサンプル4ね

http://www.wat3d.com/gogo/vba-speedup/2-CSV-Uptake/

いいね
プログラム板らしくなってきたじゃないか

>>286
サンプルじゃなくて完動するコードを貼れやカス

>>288
お前がやるんや

>>288
めちゃくちゃ長くなるから無理

>>290
自演ですか？

>>257
バーカ。
5分が20分になっても、全く時間なんて使ってないというぐらいだ。
まともにプログラム組んだこと無いか、誰でもできるルーチンワ―クしか書いたことないんだろ。
仕事で組んでる時だって上手いアイデア出すのに長い時間使って、15分節約できたことなんて何の意味も無い。

つまらんプログラムなんで読む気もせん。

いいからコードで語れや

>>292
バーカ
アイデア出すのに時間を最大限使いたいからくだらん仕事は可及的速やかに終わらせるんだよ
VBAなんかに時間使ったら頭使う時間もエネルギーも勿体なさすぎ

これプログラマの常識よ？
世の中みんなくだらん仕事はできるだけ楽にしてクリエイティブな仕事に時間体力金を使おうって考えてんの
クソやりにくい言語で自らを縛って車輪の再発明を繰り返す変人なんて相手にもされんわ

>>293
読まなきゃ自尊心傷付かないもんなw

プログラマってクリエイティブなんだ
知らなかったわ

>>284
それってさ、
「VBA自体の機能は弱いけどオレオレライブラリを充実させているからいいんです！」
ってことじゃない？
そんなの俺だってそうだよ！

なにが言いたいかというと特にないです。

>>295
だからバカなんだよ。
どうせお前はどんだけ時間使ったってアイデアなんて出ないだろう。
そういう問題だ。

そもそも、いくらだってもっと技術的に高度で、VBAでやるのは大変な例なんていくらでも有りそうなもんだが、こんな腐った例しか出せないところが、お前にアイデアなんて出せそうも無いことを物語ってる。

俺はこんな簡単な仕事をやる人間じゃない(やらない)
もっと難しい仕事をやるべき人間だ(やらない)



いつまでたってもやれない

VBAでもヲタが力んでWindows APIやクラスモジュール使い倒してるのはたまに見るな

マクロで何粋がってるんだ？という

>>301
マクロはお嫌いですか？

>>299
こんだけ具体的なコードが出てる中でサクッとコードを晒せないお前はどんな演説しても語るに落ちてる

>>303
コード出すんはお前や

>>299
お前は、アイデアなし、他言語使えない、頼みの綱のVBAですらコード書けない
バカ三冠王じゃねえか！おめでとう！

>>304
10レスぐらいになっちゃった

>>306
さようか

ここで語り合うヤツはそもそもクリエイティブではないだろｗｗｗ

まったく、つまらんコードでアホ丸出しだ。
俺はこういう馬鹿ではないのでちょっと面白いコードを出してやる。
結構前のことだが画面上に、あるピクセルを指示する何かを置いておきたいって、
質問(要望)があってその時にプロトタイプ的にサラッと書いたものだ。
機能的に不十分でやっつけだからその時は提示しなかった。

https://pastebin.com/W2utMzUM

俺が思うに.netが使えれば、もっと完成度が高く高機能なものを
簡単に作ることが出来るはずだ。
なんでこういうのを比較に出さないのかということだ。

それから、>>243はdbからcsvで抜いた300万件のデータと言ってるな。
これまで提示されたコードだと結構時間がかかると思うぞ。
俺の時は数千万のデータだったが最初に書いたコードではVBAで6時間ぐらい
掛かりそうだった。
で、コアを5～6個使って1時間程度に短縮した。

プロさんは相手と交渉できるんだろ。
dbに計算させた方が明らかに速いだろう。

>>309
アイデアもコードもつまらないものだったけどそのレスには爆笑した
確かにクリエイティブな才能(例えばコメディアンなどの)があるようだね

>>309
いやそんな誰が書いたかもよくわからんコードじゃなくて>>79を貼れよ…
要件もわからんコード出されても評価のしようがねえよ…馬鹿なのか…

>>311
悔しいからって犬の遠吠えですか?

フォームをクラスみたいに使う方法を知らないVBAユーザーは結構いるだろう。
お前のコードのように、見た瞬間に出来ると思うようなものじゃ無いんだよ。

それに、このコードにある機能を追加しようとしたら途端に難しくなる。
C#だったら簡単な筈だからPowerShellでも難しく無いだろう。
Excelも関係ないし、VBAでやるべきじゃない例としてはお前の挙げた例なんかよりよっぽど適切だ。

>>312
そんな誰でも出来るくせに仕事で書くようなコード書いて何が楽しいんだ?
仕事じゃねえんだからもっとおもしろいもん作れや。

俺の書いたそんなに高度じゃ無いもので、その割にアイデアが無いと出来ないようなのをな。

問題が面白いかの話なんて誰もしてないよ
Excelが絡むある作業をどう書くのかという話をしてるんだよお前以外は
早く>>79のコード晒さないと口だけの奴だと思われるぞ
もう遅いかもしれないけど

Microsoftの煽り営業やろな

>>315
どんなコードを書いてるかを見れば、そいつにそれが出来るレベルにあるかなんてすぐわかる。
だから俺が書く必要はないだろう。

それに、どっかのアホが既にVBAで書いてるだろ。
どうせ似たようなもんになるだけだろう。

そうだな、俺ならFileSystemObjectを使わずにブックのOpenもしない。
csv読み込んで演算するなら古いテキストのOpenで開いてやった方が速いと思う。
スピードを考えるならBinaryでひらいてStrconvを使うかな。
Dictionaryも使わないんじゃないかな。
クラスも使わない。
クラスを作るのにピッタリ来る処理とは思わないから。
まあ、だからといってアホのコ―ドが駄目かといえばそんなことは無い。
俺が見るに趣味の問題。

だが、つまらん作業に時間を使いたく無いからこんな処理のコードは書かん。

プログラマって自尊心の塊なのかってぐらい自分を守るな

特殊例から一般化しないでくれ...

一生ドーナッツ作ってろよw

質問に答えられないからってドーナッツ作って話をはぐらかそうとする奴が居るらしいんだがマジか？

俺もこの目で見るまでは信じられなかった

>>321
君は言動を見ると、そもそもプログラム書けないんじゃないか?
どの発言みても、レベルが高いようにはとても見えない。

例えば、俺がアホと呼んでる>>263だってコード見れば結構レベルが高いことなんてすぐ分かる。
人のコード見てそんなことも読み取れないんじゃ話にならん。

長文書く暇はあるのに15分で書けるコード(rubyの場合。テスト用csvファイルの作成などを含む)を
何故さっさと書かないのかコレガワカラナイ

>>323
そもそもコード晒さない奴が何言ってんだ

ドーナツの方がすごいと思ったけどね僕は

最高レベルのドーナッツ職人とコメディアンの二足のわらじは大変そうだなあ
そりゃコード書けなくなるわ忙しいもんな

>>320
>>321
ドーナッツやない、ドーナツや
ウェブをウェッブと言うようなものやで
キスをキッスと言うようなものやで
昭和のおっさんか

>>324
PowerShellのは3分で書けたぞ

アホが何を言って煽ろうが、書かないと宣言したもんは書かん。
それに、それなりにスキルのある奴はコードを見ればレベルもわかる筈だ。

自尊心保つの大変そうだなあ

>>323
PowerShellerなんかに褒められて、わ～い♪褒められた～♪と内心喜んでる俺がいる。
が、それは置いといて俺のVBAは準備含めて30分くらい。
（32行に収まらなくて調整するのに10分くらいかかったけども）

>>326
Winapi入門的な本やサイトでありがちな初心者用の練習課題ってとこかな

>>330
そもそもお前が勝手に問題作ったらお前が書いたコードかどうかも怪しいんだよ
そんなこともわからんのかコードが書けないスキルの無い奴は

>>332
君がPowerShellerじゃ無いのか?
「VBAerの人頑張って最適化して?」とか
「やりたい命令がちゃんと用意されてるのはいいなぁ。」とか書いてるし。

それとも、まんまとPowerShellerの口車に乗せられて、コード書いたんか?

>>334
だったら、もっとおもしろいお題を出すんだな。

それに、コード晒さなくてもこれまでの言動からすぐ分かるだろ。

>>336
たしかにわかるな
口先だけの奴だってなwwww

>>334
というか、こんなこと書くからレベルがすぐ分かる。

>>337
お前が碌に書けないのはすぐ分かる。

スキルのある奴なら>>317を読めば最低でも多少は書ける奴だとすぐ分かるんだよ。

>>335
生粋のVBAerだけど素人なので、仕事で使ってるVBAer任せた！ってつもりなのでした。
昼食後の昼寝前に暇だったから、誰も投稿しようとしないコードを上げたらどうなるのかなと・・・
口車に乗せられたってのは間違いないかもね！

これまでの言動から初心者レベルのWinapiを使った面白(？)アプリで有頂天になれる強い自尊心の持ち主ということはわかりました
どんな苦境でも前向きに物事を考えられるその人間性はとてもスゴイことだと思います

>>333
悔しいのかもしれんが、つまらんお題を出した自分が悪いんだよ。

>>340
あああわわわ・・この表現だと仕事で使ってないみたい。
会社でコソっと使ってるけど、これで御飯食べてるわけじゃないのでバリバリ使ってる人ならと・・・

結局、PowerShellは大したことできんと証明するようなお題なんだからな。

大したことできるというお題だって提示できた筈なんだ。
それでも、VBAじゃやらない処理だという反論も出来る場合もあるだろう。
でも、俺が見てもどうにもならんからそれだったらC#でやるというものもある。

>>340
あなたのコード見ていっちょrubyでも書いてみるかってなったから先陣を切ったのは偉い
素人でもなんでも実際に動くコードが良いコードだ

outlookのマクロはここでええかの？

>>345
確かに偉い
言い訳ばかりでなんにもコード書かないくせに自信だけはたっぷりの勘違いくんに爪の垢を煎じて飲ませてあげたいね

>>329
おいお前、Export-Excelを使う方法を教えろ
Windows 7、PowerShell 4だ

>>348
https://github.com/dfinke/ImportExcel

>>348
あ、私も知りたい。
自信満々に上げてくれた>>90を検証したいのにエラー出てくる。
こっちはWindows 10だ

なんか派閥が形成されててキモい
自分以外は全部敵だと思え、馴れ合う君たちに価値などない

>>349
その箇所を引用しろハゲ、横着すんな

>>352
そこまではわかった。
ダウンロードしたフォルダで>>90を実行すると、こうなるけどどうしたらいいの

PS C:\Users\hoge\Downloads\ImportExcel-master> gci . -Recurse -Filter *.csv | % { ipcsv $_ } | % { $_ | Add-Member -Pass
Thru -MemberType NoteProperty D ([math]::sqrt([math]::pow($_.X, 2) + [math]::pow($_.Y, 2) + [math]::pow($_.Z, 2))) } | S
ort-Object D -Descending | Export-Excel -Now
Export-Excel : 用語 'Export-Excel' は、コマンドレット、関数、スクリプト ファイル、または操作可能なプログラムの名前とし
て認識されません。名前が正しく記述されていることを確認し、パスが含まれている場合はそのパスが正しいことを確認してから、
再試行してください。
発生場所 行:1 文字:221
+ ... th]::pow($_.Z, 2))) } | Sort-Object D -Descending | Export-Excel -Now
+ ~~~~~~~~~~~~
+ CategoryInfo : ObjectNotFound: (Export-Excel:String) [], CommandNotFoundException
+ FullyQualifiedErrorId : CommandNotFoundException

>>353
あ、わかったんだナイス

>>353
CommandNotFoundException
https://github.com/dfinke/ImportExcel

>>355
だからお前がどうやったのかを言えや

>>354
>>355
わざわざExport-Excel.ps1の入ってるフォルダで>>90を実行しているのにコレが出るから悩んでいる。
dllみたいにsystem32へ保存しないとダメとかなんかルールあるんけ？

>>356,357
https://github.com/dfinke/ImportExcel



README.md

急にリンク貼るだけのコミュ障になったなコイツ
ただのクズか

そこに書かれてる
Install-Module ImportExcel -scope CurrentUser
を実行するとこんな感じだった。
---
PS C:\Users\hoge> Install-Module ImportExcel -scope CurrentUser
続行するには NuGet プロバイダーが必要です
PowerShellGet で NuGet ベースのリポジトリを操作するには、'2.8.5.201' 以降のバージョンの NuGet
プロバイダーが必要です。NuGet プロバイダーは 'C:\Program Files\PackageManagement\ProviderAssemblies' または
'C:\Users\hoge\AppData\Local\PackageManagement\ProviderAssemblies'
に配置する必要があります。'Install-PackageProvider -Name NuGet -MinimumVersion 2.8.5.201 -Force' を実行して NuGet
プロバイダーをインストールすることもできます。今すぐ PowerShellGet で NuGet
プロバイダーをインストールしてインポートしますか?
[Y] はい(Y) [N] いいえ(N) [S] 中断(S) [?] ヘルプ (既定値は "Y"): y

信頼されていないリポジトリ
信頼されていないリポジトリからモジュールをインストールしようとしています。このリポジトリを信頼する場合は、Set-PSReposit
ory コマンドレットを実行して、リポジトリの InstallationPolicy の値を変更してください。'PSGallery'
からモジュールをインストールしますか?
[Y] はい(Y) [A] すべて続行(A) [N] いいえ(N) [L] すべて無視(L) [S] 中断(S) [?] ヘルプ (既定値は "N"): y
PS C:\Users\hoge>

Installationぐらい読めよ

Export-Excel.ps1のコードなげえなあ
https://github.com/dfinke/ImportExcel/blob/master/Export-Excel.ps1

>>357
Install-Moduleはオンラインギャラリーからインストールするもので


ローカルのモジュールをインストールするのは↓これでいけるかも

about_Modules
https://technet.microsoft.com/ja-jp/library/hh847804.aspx

モジュールのフォルダを自分で作って
そこにモジュールを放り込んで
Import-Moduleやるみたいよ

c;\aaa\bbb\ccc.xls
c;\aaa\AAAAAAA\cccaaaa.txt
みたいに
二つ目のフォルダの階層だけを取得したい場合
どうすればいいのでしょうか？
上記ならbbbとAAAAAAAです

StrReverse関数はあくまでも右から見て最初の\以降しか取れません。

>>361
それでわかるわけないだろ、品川に行くにはと聞いてる人に関東だと答えてるようなもんでしょうが

久しぶりにVBAのまともな質問が

split して配列にぶち込んでArr[2]を参照

とりあえず、ps1は絶対パス指定じゃないと動かないらしいことがわかったので
フルパス指定したら先のエラーは突破できたけど、どこのフォルダに保存されたcsvも
＞ファイル 'C:\test\1.csv' が見つかりませんでした。
って出て読み込んでさえくれない。

>>363 の方法でなんかすれば動くのかな・・・
とりあえず今日は諦めるわ

明日は良いことあるよ

VBAってファイルを開いてコピーしてペーストして閉じるぐらいのもんじゃないの？
何をこんな難しい話をしてるんだ？？

>>364
２つ目のフォルダって、最下層から二つ目って意味じゃないかな？

Sub hoge()
Const sample1 = "c;\aaa\bbb\ccc.xls"
Const sample2 = "c;\aaa\AAAAAAA\cccaaaa.txt"

Dim s() As String
s = Split(sample1, "\")
Debug.Print s(UBound(s, 1) - 1)

s = Split(sample2, "\")
Debug.Print s(UBound(s, 1) - 1)
End Sub

>>357
PS で、カレントフォルダ以下を再帰的に、すべての .txt を取得する。
まずcd で、作業フォルダへ移動してから、実行して

$files = ( ls . -Recurse -Filter *.txt )

$files | % { echo $_ }
$files | % { echo $_.fullname }

上は、パス無しのファイル名のみで、下は、フルパス付きのファイル名になる。
ファイル名だけよりも、フルパスにした方が無難

% -> ForEach-Object の、alias だから、以下みたいにも書ける

foreach ( $file in $files ) { echo $file.fullname }

>>372
スレチ

一晩(実質2日だが)待ったがドーナツ先生はまだ>>79を解けないのか？

>>374
もはや解いたも同然と言っても過言ではない

>>374
あの、ところでテーブルレイアウトってどういう意味でしょうか？

テーブルレイアウトがこの問題の一番重要なところですよね

元々が「イミディエイトウィンドウで」なので
Excelブックのシートに展開することを指しているんだろうとエスパー

>>378
そういうことね、あざっす！

謎はすべて解けた

そもそも、MS謹製じゃない誰かの作ったライブラリ使って1行で書いて自慢するというんじゃね・・・
それって>>263や>>275の書いたコードを呼び出す1行のコードでも良いってこと?

それはそうやな

MS謹製のドーナツはあるんですか？

>>383
無理矢理こじつけて面白いとでも思ってる?
先のコードを見れば、MSのdllしか使ってないのはすぐ分かると思うのだが。
つまり、無理矢理なのは明らか。

それともそんなことも分からない程スキルが無いのかな?

ドーナツは見事だわ
なかなか出来るもんじゃない

>>384
お前が>>263のコードすら読めてないってのはわかった

>>386
???
先のコードって>>263のコードのことだとでも思ってる?
何で>>263のコードがここで出てくるのか分からん。

標準でいろんな機能が備わってるか、という基準でならVBAのボロ負け
ってことは皆さん承知でいいんだよね？

そらそやろ
飛行機は空を飛ぶってことに合意とってるようなもんや

喫煙所でタバコは体に悪いよねと合意取るようなもんや
酒、タバコ、VBA

>>387
レベルが低いとそんなこともわからないのかw

>>388
それ、 VBAが勝てる言語ってあるのか？

VBAが一番かわいいだろうが

ケンタッキーフライドチキンで鶏肉が不味いと言ってるようなもんだぞ

VBAのスレだぞここは

愛でよ愛せよ慈しめよ！

>>391
何をどう勘違いしてるんだかw

>>395
VBAは他所でスレ立ててやれ

>>398
あ、はい

>>309
＞俺が思うに.netが使えれば、もっと完成度が高く高機能なものを
＞簡単に作ることが出来るはずだ。
＞なんでこういうのを比較に出さないのかということだ。

ここを読むと技術力の低さが露呈していることがハッキリする
ドーナツアプリを見たがこの程度ではこれを.NETでやっても大きく差はつかない
せいぜい、運が良ければAPIじゃなくてマネージドな部品が用意されてるかもね、程度

>>79はみごとだ
標準のコレクションやライブラリの貧弱さ
ラムダ式の未サポートなどモダンな言語機能の欠如など
VBAの弱点をしっかり捉えた題材と言える
実際に勇気あるVBAerがコードを晒したがPSで書いた時とは全く異なる長ったらしい読みにくいコードだった
題材が的確だから結果にも大きな差がついた
オマケにVBAとは違って強力なライブラリや言語機能を備えたRubyがPSと同じく短くエレガントなコードになったことがこの事実をさらに後押ししている

>>400
最後にテーブルにするというExcelに寄り添いつつも実用性のある操作を加えることで
決してVBAだけに不利な条件にもしないという隙の無さもポイント高い


(ところでPSのやつ最後テーブルになってるようには見えないんじゃが...)

ルビーは実行環境インスコせなあかんし
池沼シェルはモジュールをインターネッツから
インスコせなあかん、それがネックやな

ドーナツはどこからインスコできますか？

>>401
そこに気づくとは
パワシェルは要件を満たしてないオナヌーコードに成り下がってる
簡単さにこだわる余り目的を見失ってる

>>403
VBAからや

要件を満たして正確に動作すること
これが第一、その上で簡単に書けたら良いよねが来る
簡単に書けました、ただし要件は満たしませんでは駄目なのさ

>>401
と思ったけど-Nowオプション付けるとテーブル(というかフィルター？)になるのか
早とちりだった

-TableNameでテーブルになるのかな？

わしもそう思ってた

>>400
はあ、どうしてケチをつける割に人の話を聞かない奴ばかりなんだ?
あれをそのままで.netの方が良いなんて言って無いんだよ。

特大ブーメラン

分かりやすいのは他言語のコードを見ても全く、使おうとは思わない点だ。
VBAで何の問題も無いとしか思えない。
所詮、そんなコードだということ。

その点ドーナツは凄いよな
俺も今やってる仕事でVBAでドーナツ使いたいわ
そんな魅力がドーナツのコードにはある

>>412
話が読めないバカが混じってるな。
日本語が弱いのかな?

>>413
日本語読めない子扱いされてるのがそんなに悔しいの？？

わざわざ日本語弱いとか煽ってくるとかwww
人間自分が言われて嫌なことを悪口に使うって聞いたことない？？

>>413
ねえいつもうるさいくせに何で黙っちゃったの

>>414
根拠も何も無い、論理的に間違っていてもまともに反論も出来ない、そういう奴だから日本語が弱いと言われても仕方がないだろう。

お前は何ーつ反論していない。
反論出来ないということだろう。

>>415
今、見たからだが。
お前みたいに、このスレに齧り付いてるわけじゃ無い。

>>416
おっそうだな
それ鏡に向かって言ってごらん？
それだけでかなり日本語能力が改善されると思うよ？

>>418
一切反論が出来ないようだw
論理的なものが何も無い。

このスレはいつからバカの楽園になったんや

バカが１人だけだとほっとかれて終わるけど
2人で言い合うから終わらない

例えば無数にあるエクセルファイルからそれぞれ読み取ってデータを集計する際、どう処理するのがベター？
速度気にするならデータベース？

>>422
無数にあるエクセルファイルって、データの形式は統一されてるの？

速度は気にするなと何度言えば

>>423
形式は統一されてるとして同じ作業を繰り返えさせるのはどうするのがベターなのかなって。
>>424
やっぱ普通に開いて閉じるの繰り返しか。

>>425
形式が統一されてるならSQL
{Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)}

そもそも、その内容だけを見た時にVBAでやる必要有るのか?とも思う。
好きなの使え。
それに、その程度のことでどれがベターとか考えるか?
コード見て、こりゃダメだと思うようなの書いて無い限りどんなのでも良いだろ。

スピード優先な処理なのに1つずつセルに入れてるようなのはダメだが、処理に時間がかかってダメだという状況じゃなかったら別にどうでも良いし。

ドーナツはVBAじゃないとダメだろ

Ruby なら、こういう感じで、フォルダ以下を再帰的に処理できる

Dir.glob('C:/Users/Owner/Documents/Ruby/test/**/*.txt') do |file|
next if File.directory? file # ファイルだけを処理する

# 処理
end

>>429
センスがない

VBAじゃないならスレチじゃん

>>428
何でVBAじゃないとダメなの?
ちゃんと答えられる?

>>430
どこがセンス無いんだ?
全然説明が無い。

Excel は環境構築がいらない。
Excelが実行環境だから

だから、Excelエンジニア(ノンプログラマー)は、Excelを使う

ところが、そこへ本格的なプログラミングを頼む者が現れるが、
プログラミング技術がないから、Excelで作ろうとする

案件と使う技術の不一致！

仮想マシンでwindowsからセットアップしなきゃならん
インストールしてからもマクロ許可の設定しなきゃだし
手間も金もかかる

>>435
？

パソコンとはWindowsとMicrosoft Officeが動くもののことである
WindowsとMicrosoft Officeが動かないマシンなどこの世には存在しない
してはならない

クリエイティブなエンジニアはみーんなマックとハイスペLinux

エンジニアはどっかよそへ行っててくれ

>>437
根本的に勘違いしてる。
別にOfficeが動かないマシンが有っても構わない。

けど、ここはExcelVBAのスレだからExcelが動く環境の人が質問する所だ。
Officeが動かない人がここで何をするんだ?

Officeの入ってない管理者用PCでリモートPCのOfficeをいじるときにCOM経由でVBAのコードを動かすこととかあるよね

>>440
Officeが動かないマシンなどありません
異端者はこのスレから立ち去りなさい

>>441
あるね

>>441
う～ん、それこそVBAじゃ無くても良いような気がする。
既に出来てるコードを動かすという点で新たに組む必要が無いという理由が、あるいは他にも事情があるのかもしれないけど。

でも、そもそもExcel入って無くてインスタンス作れるか?

>>441
無いだろ
リモート側のExcelどうやって起動するんだよ…

RubyバカはRubyのスレに逝けよ。Rubyのスレでは俺はRubyが使えるんだエラいんだって自慢できないからここに
いすわってんのか？

>>445
インスタンスはリモート側で作らせればいい
管理者側はリモート側のプロセスをモニターするだけ

何それリモデでよくね？

Office は高いから、入れていない

Ruby で処理して、VSCode のExcel Viewer で見たりする

csv開いて取り込む方法だけでも色々あるのね

openfileで開いて1行ずつ読み込んで、カンマ区切りでセルごとに格納するって方法もあれば、csvファイルをエクセルとして開いて配列に格納する方法もあった

高いからエクセル買えない奴多いんだな
中国人や韓国人ですかね？

こんなスレまだあるんだな
しかも結構人多いのに驚いたw
VBAっていうかExcelって需要あるんだね

でも仕事でやれって言われたらストレス溜まりそうだな
基本的にGUIが貧弱なVB6だよね

10年ぐらい前に必要に迫られてちょっとだけ触ったけど
C#に慣れた身には死ぬほど不便に感じたわ

>>452
じゃあC#スレいけば？

買えないならLibreOfficeがいいね
Excelとあまり遜色ない
BASICやpythonもサポートされてる
金出してでもネームバリューが欲しいならエクセル

>>453
意味が分からんw
頭悪そうだなおたく

>>455
このくらいの意味もわからんとはかわいそうなやつだな

また始まったよ
お前らなもっとやれ

何も始まらない
ID:w2kFCGmb が被害妄想が激しいお馬鹿さんなだけ

何だこりゃ?
始まってるじゃね―か。

C# スレでフルボッコでもされた憂さ晴らしに来たらこっちでもハブられてるって話だろ w

煽られてムキになっちゃってるVBAerって普段からC#erに嫉妬してそう

嫉妬心を妄想してご満悦のC#パーwww

{
}
っていう表記を見るだけでイライラする人とかいそうだよね

謎の仮想敵と戦いだしたC#パーさんwwww

まあわざわざこんなスレにまで来る時点でどっちが嫉妬してるんだよ
って話だわな w

昔はMSSoapとかいう便利なSoapクライアントが標準で入ってたと思うんだがwin7にはないのか？
いまどきのVBAだとどうやって標準だけでsoap serverに接続すんの？

VBA拗らせるとこうなるんだな
https://qiita.com/nodakoubou/items/1c92d33855cfd09ccc57

そもそもVBAの質問スレなのにVBAを叩く人が多いのは何でなの？そのお気に入りの言語のスレでVBAを叩けば良いのでは？

VBA使いに何故か頭のおかしい人がいっぱいいるから
頭のおかしい人は叩かれやすいから

>>469
統計とったん？
頭がおかしいのはもしかして・・・

>>470
取ったよ
有意にVBAerは頭がおかしい

>>467
いろいろ呼び寄せてる感じだなｗ

>>467
VBに取り憑かれなければもっと成果でていたかもしれないねもったいない

ナンセンスな仮定をするねえ

>>471
統計取る人の方が頭おかしいんじゃないかって
言おうと思ってたの
なんで・・・

これがレイトバインディング

ただの後出しジャンケンやんけ

みんなこだわりがあるんだな

qiitaはもう死んでいる

昔のVB6とVBAの互換性くらいの頃が良かったな
.NETの非接続型のデータセットもVBAでサポートしてほしい

ADODBがあるやで

vbaて最近やと難しい言語に入るからなw
ヤワな言語かじってプログラミング出来ると勘違いしとるバカが
「ルビーを使いこなせるボクが手も足も出ないvbaなんかクソに決まっとる」
言うて駄々こねとるんも無理ないわなw

セルを参照するrangeの仕様を見直せ

たとえばA1と指定すればA1だが、1Aと指定しても列がAで、行が1だということが分かるだろ。そのくらい内部で読み替えせないか？
仕様として、本当に、おかしい

逆だった。要は、A1でも1Aでも同じことだろと言いたかった

>>483
バカは仕様とか考えん方がええでw

通常ﾄｰｸﾝの先頭が数字なら数値のﾘﾃﾗﾙと解釈する
先頭が数字を許す数値以外のﾄｰｸﾝは通常ない
だれもいちいち面倒なことはやらない

わかった？

>>486←トークン言ってみたかったプロさんwwwww

昔はMSSoapとかいう便利なSoapクライアントが標準で入ってたと思うんだがwin7にはないのか？
いまどきのVBAだとどうやって標準だけでsoap serverに接続すんの？

ｵﾚはﾌﾟﾛﾌｪｯｼｮﾅﾙだからな
ｸｿﾆｰﾄや低学歴知恵遅れがでる幕はない

>>487
おいおまえ、トークンできとるか？

>>490
あいにくプライベートな質問はお断わりしとるもんでw

>>486
>だれもいちいち面倒なことはやらない
トークンもリテラルも理解できないが、１行で改修できるようなもんだろ
それを面倒とはいかに。

関数では列行指定なのにCells()だと行列指定で数字のみなのは変といえば変

=E1+1 ←　ｾｰﾌ
=1E1+1 ←　ｾｰﾌ
=1E+1 ←　ｾｰﾌ

ｺﾚ
どうしてくれんの？