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/11/05(日) 17:22:31.31

>>947
なるほど。ありがとうございます！
大事に使わさせていただきます！

2017/11/05(日) 17:32:40.60

>>949
立場を教えてもらってるおまえは
下なんだからちゃんと理解しろよ

2017/11/05(日) 17:59:37.33

>>951
たかが一つ教えた気になったら
全部が上だと思うのが間違いだと指摘している
ちゃんと教えてやるから正しく理解しろ

2017/11/05(日) 18:03:31.52

>>954
人の言ってることを勝手に拡大解釈するようなアホに教わることはないんだ、スマン

2017/11/05(日) 18:35:21.91

>>955
このスレに質問した人も
あなたに教えてほしいとは言ってないだろ

2017/11/05(日) 18:46:16.14

無能の屁理屈はスルーで

2017/11/05(日) 19:05:22.65

>>956
意味がわからない
質問者が回答者を選ぶシステムは無い

まぁ仮にあったとして、俺は>>1>>73>>110>>167>>875と>>943
（167-875の間は調べるのがめんどくさくなった）
だけど、そこまで悪い回答者ではない。指名も多数あるだろう。ははは
回答もロクにせずに教室で大暴れしてる誰かとは違う

2017/11/05(日) 19:06:04.69

回答が出来ないならせめてスレ立てぐらい頑張れ
1000里の道も一歩からだ

2017/11/05(日) 19:08:37.19

どうみても質問者より回答者の方が多いし回答者同士で質問を奪い合ってる状態
もう自称上級者が「教えさせてください」と頭下げていいレベル

てかお前らの態度次第じゃ質問してやってもいいんだけどどうする？ちゃんと答えられんのか？

2017/11/05(日) 19:12:27.65

>>960
はい、是非質問して下さい
練磨のため、社会のためにも問題解決に励みたい所存です

2017/11/05(日) 19:17:19.82

>>961
間違えた。
意識高い系なんじゃなくて、ただのバカだった。すまん。

2017/11/05(日) 19:19:47.12

>>961
VBAで次スレを一発で立てることは可能ですか？

2017/11/05(日) 19:23:35.37

>>963
「一発」が何の一発か分からんが、立てることは可能
ただ5chになってからの仕様は知らないのでvbaでの回答はできない

vbaでそんなシステムを作るよりも、専ブラ使ったほうが早いと思う

2017/11/05(日) 19:29:07.50

>>958
回答者を選ぶシステムがないから
勝手に教えたのは自分だよな

勝手に教えておいて立場が上とか傲慢だよなってことだアホ

2017/11/05(日) 19:32:08.01

>>965
だからそう言ってるじゃないか
俺は傲慢で不遜だしそういう態度を取りたいから回答を続けているんだよ
で、回答をもらえた方も問題解決できてハッピー
誰も損してないね

君がここ何か文句を言いたいなら、俺以上に早く正確に回答することだけど、出来るのかな？

2017/11/05(日) 21:29:59.86

>>966
VBAでQiitaに記事を投稿することは可能ですか？
内容は VBAでQiitaに投稿する方法についてです。

2017/11/05(日) 21:41:12.55

>>967
Quiitaの仕様についてはよく知らないしわざわざ自動化することでもないだろう
内容を考えれば自動化するよりも手動で投稿したほうが確実で早い

2017/11/05(日) 21:53:05.13

>>966
まだ荒してんのかお前w
いいかげんにしろ無能

2017/11/05(日) 22:22:27.36

何も貢献出来てない者が上から目線とか何の冗談だ。
質問も回答もしないバカ者は完全に荒らしだろ。

どんなに負けたく無いのか知らんが、人のせいにするんじゃなくて技術を持ってない頭の悪さを呪うんだな。

2017/11/05(日) 22:27:54.74

>>966
またアホな事を
教える側が上とか言ってる事を指してるんだよ
お前は馬鹿すぎて議論にすらならない

2017/11/05(日) 22:33:57.47

そろそろ次スレ頼む
俺は無理だった

ERROR: このホストはBBx規制中です。-

2017/11/05(日) 22:40:31.46

>>972
あなたの豊富な知識をここで提供してみませんか！

https://qiita.com/advent-calendar/2017/vb

2017/11/05(日) 22:44:26.84

プルダウンリストにて
以下のような表があったとして、

田中人事 42歳
山本経理 23歳
佐藤人事 46歳
・
・
・

以下のようなプルダウンボックス×2を配置します
口口
左のボックスで部署を選んだら右のボックスに該当部署の人のリストが出て、その右に年齢を出したいです。
普通に検索しても、同じキーが連続してる例しかなく、このようにデータベースタイプでキーが飛び飛びになってる表からキーで検索してプルダウンボックスに反映させるやり方が分かりません、どうやればいいですかる

2017/11/05(日) 23:27:18.16

With文で指定したObjectをWith文内で表記する方法はありますか？
ObjectがRangeの場合、 .Offset(0,0) でお茶を濁しておりますが、、
With文内で添字を取るようなObjectのプロパティにアクセスするケース
で躓きました。
PowerShellの $_.nameみたいなものが使えたら嬉しいのですが、、

2017/11/05(日) 23:47:42.44

>>974
ワークシートから検索してコンボボックスに追加していくということなら
表をごっそりRangeオブジェクトでとってきて
ForEachで検索列を手当たり次第見ていって
検索値にヒットしたらコンボボックスにAdd
でご要望通りになるかと

2017/11/05(日) 23:49:55.08

>>975
.Item( ) じゃなくて？

2017/11/05(日) 23:55:54.55

あれだな　ガキの頃からキーボードカチャカチャやってる世代じゃ無くなって来てるからな
Excelとか、むしろ面倒なんだろな　そおゆう世代向けのUIというか操作に変えてかなきゃ
業務も滞ること夥しく成ってくんだろな
Excelの売り方もおかしくなってくし　そろそろ潮時かもな

もちろん裏方さんにとってはキーボード必須だろうけど、使う側、数値入れる側にとっちゃあ
タッチじゃないとダメ　って時代に突入してんだろな　いやはや

2017/11/06(月) 00:12:10.27

>>977
すげー！　まさに捜していた答えでした。
感謝

2017/11/06(月) 22:53:26.80

みんな早く登録するんだ
https://qiita.com/advent-calendar/2017/vb

俺はもう投稿したぞ
去年

2017/11/06(月) 23:22:43.53

>>974
俺の環境が悪いのか、以下のようなプルダウンが四角にしか見えない
＞左のボックスで部署を選んだら右のボックスに該当部署の人のリストが出て、その右に年齢を出したいです。
3つ要素があるように思えるけど、実際はどういう風に実装したいの？ペイントか何かでいいのでイメージ画像を作って欲しい

2017/11/07(火) 04:32:19.79

>>974
余談だが現在の年齢を表にすると
来年になっても年取らないぞ

2017/11/07(火) 09:39:24.82

bomなしのutf-8 csv に出力するコードでbom飛ばすときのposition = 3がパラメータが間違っていますとか言われるんやけどなんでか教えてください！

2017/11/07(火) 10:04:40.57

>>983
出力するとき、最初からposition=3ってするの？

2017/11/07(火) 10:07:49.90

>>984
.Position = 0
.Type = adTypeBinary
.Position = 3
ってします

2017/11/07(火) 11:14:50.45

Adodb.Streamの話だろ。
ちゃんとキーワード入れろや。

2017/11/07(火) 11:45:09.30

>>985
まだ書き込んでなくね？

2017/11/07(火) 12:02:33.38

>>983
ADOで悩んだ記憶あるけど
オブジェクトをコピーするので逃げた記憶がある

2017/11/07(火) 12:04:47.76

あ
空っぽオブジェクトつくって
データだけコピーね(勿論三バイト捨てて)

2017/11/07(火) 12:10:48.56

excel vbaでword文書を印刷したいんだけど
「セクション1の余白が印刷可能なページ範囲の外～」
っていうアラートが出てしまう

disalertでも出ちゃうんだけど良い方法ないかな？

2017/11/07(火) 17:59:00.13

余白を変更してみたらどうかな？

2017/11/07(火) 18:04:03.30

>>991
レスありがとう

印刷したいファイルは数十個あるから
手作業での余白調節は難しいんだ

それともそれを自動化すればってこと？

2017/11/07(火) 21:57:50.56

csvファイルをエクセルで開いて、xlsxで保管した場合、このファイルを開いてシート操作やセル操作するのは、通常のエクセルファイルとして可能ですか？

2017/11/07(火) 22:04:04.44

>>993
可能です

2017/11/07(火) 22:20:04.16

>>993
シート操作やセル操作をアドインにすればxlsxでも可能です。

つうか、なんでデータベースの出力形式やデータ交換フォーマットってCSVが主なんだろう？
どんなポンコツDBでもXLS出力ぐらいは付いていると思うんだが「データよろしく」
と言うと「じゃあCSVで」と大抵は返される。CSVの意味わかってのかよぉーと叫びたくなるぜ。だって、数字を1000の位でカンマ区切り
とかヨユーでしてやがるからｗ

「カンマ・セパレーテッド・バリュー」って意味わかんねえのかよこのハゲーっと心の中で絶叫してます。

2017/11/07(火) 22:31:27.81

>>994　>>995　そうですか・・・。今日は開いたファイルのシートを全然認識してくれなくて、非常に困ってます。
BOOKは開いて閉じる操作ができてるので、大丈夫ですが、中のSheet1を全く選んでくれません。

2017/11/07(火) 22:34:55.14

で、それのどこがVBAに関係するの？

2017/11/07(火) 22:37:41.98

>>995
xls出力が良いとは限らんでしょ。
それに自分はCSVでもセパレータに普通じゃない文字使ってCSV出力機能自体作ったりしてたが。
&H05の文字とか。

2017/11/07(火) 22:40:04.04

>>996
認識ということの意味が分からん。
それにVBAでSheetを選択する処理なんて殆どしないと思うが。

具体的に何がしたいの?

2017/11/07(火) 22:49:27.70

>>999　ただ単に　VBAで別のブックへコピーしようとして、このファイルのRANGEの範囲を全然選んでくれなくて、
突きつめて行ったら、Sheet1を認識してくれなかったということに気づいて・・・。

**1001** · Over 1000

このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 72日 10時間 9分 10秒

**1002** · Over 1000

5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。

───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────

会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。

▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/

▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php