VBAなんでも質問スレ Part2

VBAなんでも質問スレ Part2 at TECH

[前50を表示]
200:デフォルトの名無しさん
16/04/10 10:59:47.17 KR5BT3Be.net
全ドライブを検査してひとつしかdllファイルがなかったって言ってるんだろ。
それが本当なら何も対処できないよ。OSレベルの不具合。

201:デフォルトの名無しさん
16/04/10 17:49:12.01 r0zhudqC.net
VBAをコーディングするのに最適な画面サイズとモニターの台数は何台ですか？
縦と横どっちでつかってすか？
4Kディスプレイはどうですか？

202:デフォルトの名無しさん
16/04/10 18:54:26.34 oV0tVvW7.net
(´・ω・｀)

203:デフォルトの名無しさん
16/04/10 19:33:25.31 Y5yf6QHK.net
>>197
3台
縦
4Kいいよ

204:デフォルトの名無しさん
16/04/27 21:49:20.13 Wsz3hpAs.net
エクセルのVBA質問があります。
一番前のTOTALシートのA22：H26までを複数シート（20シートくらいある）の最終行の次の行に貼り付けたいのです。
各シートの最終行はバラバラで多いのは数千とあります。
しかも、G列には\と$の通貨マークH列には金額が書いてあり、SUMIFが組んであります。
記録マクロでやると下記みたいになりますが、こんなこと可能なのでしょうか？
調べても出てこないので誰か教えてください。
Sub Macro2()
Rows("24:28").Select
Selection.Copy
Sheets("A").Select
Rows("22:22").Select
Selection.Insert Shift:=xlDown
Range("H22").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=SUMIF(R9C7:R19C7,RC[-1],R9C8:R19C8)"
Range("H23").Select
End Sub

205:デフォルトの名無しさん
16/04/28 00:18:56.90 Vq22azhO.net
>>200
可能です

206:デフォルトの名無しさん
16/04/28 07:31:01.70 TNqjmghT.net
>>201
教えてください。

207:デフォルトの名無しさん
16/04/28 08:26:47.90 RqXO/zBw.net
>>202
具体的にあなたが躓いているところがわかりません

208:デフォルトの名無しさん
16/04/28 12:27:24.37 xB9gNSEq.net
>>203
具体的にあなたが何がわからないのかわかりません

209:デフォルトの名無しさん
16/04/28 12:29:10.17 gq5pmM2C.net
>>200
For Eachで全シートループして、各シート最終行取得して貼り付ければ良いと思いますが、ダメですか？

210:デフォルトの名無しさん
16/04/28 20:07:58.00 iqsXmWMg.net
>>200ですが、出直してきます。

211:デフォルトの名無しさん
16/05/01 15:15:56.13 tKi6j9CT.net
匿名通信（Tor、i2p等）ができるファイル共有ソフトBitComet（ビットコメット）みたいな、
BitTorrentがオープンソースで開発されています
言語は何でも大丈夫だそうなので、P2P書きたい！って人居ませんか？
Covenantの作者（Lyrise）がそういう人と話したいそうなので、よろしければツイートお願いします
URLﾘﾝｸ(twitter.com)
ちなみにオイラはCovenantの完成が待ち遠しいプログラミングできないアスペルガーｗ

The Covenant Project
概要
Covenantは、純粋P2Pのファイル共有ソフトです
目的
インターネットにおける権力による抑圧を排除することが最終的な目標です。そのためにCovenantでは、中央に依存しない、高効率で検索能力の高いファイル共有の機能をユーザーに提供します
特徴
Covenant = Bittorrent + Abstract Network + DHT + (Search = WoT + PoW)
接続は抽象化されているので、I2P, Tor, TCP, Proxy, その他を利用可能です
DHTにはKademlia + コネクションプールを使用します
UPnPによってポートを解放することができますが、Port0でも利用可能です(接続数は少なくなります)
検索リクエスト、アップロード、ダウンロードなどのすべての通信はDHT的に分散され、特定のサーバーに依存しません
ｌ

212:デフォルトの名無しさん
16/05/01 23:24:37.04 u17iQe5m.net
EXCELのVBAでメール返信(OUTLOOK)をする仕組みを作りたいのですが、
元メールを引用するにはどうしたら良いでしょうか？
タイトルやらアドレスやら本文がくっついてないと、
どうも返信感がでないと思いまして。

213:デフォルトの名無しさん
16/05/03 10:11:50.64 YSERRocv.net
>>208
Outlookヘルプから
次の例は、現在のフォルダを受信トレイに設定し、フォルダの 2 番目のメッセージを表示します。
Visual Basic for Applications
Set myOlApp = Outlook.Application
Set myNamespa

214:ce = myOlApp.GetNamespace("MAPI") Set myFolder = myNamespace.GetDefaultFolder(olFolderInbox) myFolder.Display Set myItem = myFolder.Items(2) myItem.Display

215:デフォルトの名無しさん
16/06/04 14:31:26.42 ZLbjql14.net
Excel向けだとVBA関連の本は結構あるのにOutlookのVBA本って
あんまり無いですね。
Outlookの仕分け機能では宛先とCCに○○から来た時に動作する
条件を付けられますが、宛先○○から来た時には動作するけど
CCに何か入っていた場合は動作しないマクロは作れないでしょうか。
環境はWin7、Outlook2010です。

216:デフォルトの名無しさん
16/06/04 17:57:25.97 +2vTx5YA.net
>>210
作れるよ

217:デフォルトの名無しさん
16/06/04 17:59:26.06 +2vTx5YA.net
outlook vba mail
とかでググれ

218:デフォルトの名無しさん
16/06/04 21:08:48.99 xa1tVlDu.net
>>210
多分こんな感じでできるかと
Public WithEvents InboxItems As Items
Private Sub Application_Startup()
Set InboxItems = Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub InboxItems_ItemAdd(ByVal Item As Object)
Dim mailItem As Outlook.mailItem
Set mailItem = Item
If InStr(mailItem.To, "○○") > 0 And mailItem.CC = "" Then
MsgBox "何かする"
End If
End Sub

219:デフォルトの名無しさん
16/06/12 09:42:53.63 D40PIOb3.net
　　　　　　　　　　　　　　　【Ｗｉｎ１０】　　　　こんな犯罪級ＯＳ薦めんなよｗｗｗ　　　↓　　　【スパイウェア】

この使用許諾契約書には書かれています
”最後にあなたのコンテンツを含む個人データ（例えばあなたの電子メールの内容や―プライベート通信やプライベートフォルダ内のファイル）にアクセスし―開示し保全します”
開示する　ここ重要だよ
契約がなければ通常　高度な違法行為になりうることです　それはあなたが自分の意思としてこの契約書に同意したのです
URLﾘﾝｸ(www.youtube.com)

　　　　　　　【秘密保護法】　　ナチスの手口でサヨクを捕まるんだろ？　早くやってみろよ　m9(^Д^)　　【緊急事態法】

スノーデン氏→国家秘密法は諜報機関ＮＳＡの日本での活動を容易にするために米国が設計して日本政府に導入を要求したもの。
全日本人が調査の対象であり、ＮＳＡはあなたの交際関係、信仰等の個人情報を把握している。
URLﾘﾝｸ(twitter.com)
今朝、辺野古で新基地建設に反対するママの会メンバーに対して、機動隊員が「お前たちには汚い血が流れている」などと暴言を吐いたそうです。
自分のやっていることを「だってお金欲しいもん～」「俺の写真を待ち受けにしろ」とも（顔写真）
URLﾘﾝｸ(twitter.com)
サンマ以降のバラエティ芸人の大半が、暴走族出身で極右思想。原発反対派を「放射脳」と嘲笑する連中。
芸能界極右は石原慎太郎一家を筆頭に、上田晋也　草野仁　津川雅彦　向井理　松本人�

220:u　宇多田ヒカル　マツコ　春日俊彰　田村淳　北村晴雄 https://twitter.com/tokaia mada/status/630627400552845312

221:デフォルトの名無しさん
16/06/14 02:34:53.84 2DTiTbF7.net
vbaでshell関数を使って指定パスのエクスプローラをファイル選択状態で開いてるのですが、
家でやると何でもないのですが、会社でやると、その方法で立ち上げたエクスプローラは
１分～数分以内に「エクスプローラは停止しました」となって落ちます。そのフォルダだけ
落ちるので他のは巻き込まれないだけマシですが、手動で立ち上げた他のエクスプローラで
このように不意に落ちた事はないので、プログラムから立ち上げたエクスプローラが特別
不安定だとしか思えないのですが、原因が不明です。
それで、家と会社の違いは、会社だと共有フォルダを開いている事です。
家ではテスト環境をローカルで構成している為か、全く問題は起きません。
色々ぐぐってみたのですが原因が不明です。
vbaから開く方法で、解決策、あるいは次善の方法等ありますでしょうか。
shell関数はこのように使っております。
Shell "Explorer.exe /select, """ & path & """", vbNormalFocus
環境はWindows7 Excel2010(32bit)です。

222:デフォルトの名無しさん
16/06/14 06:56:55.57 wwwgAdKU.net
>>215
試しに自宅の環境で共有フォルダをshell関数でファイル選択状態で開いてみたけど
特に問題なかったよ
原因は共有フォルダであること
ではないのじゃないかな
その共有フォルダへのショートカットを作って
それをshell関数を使ってexplorerで開いてみるとかは？

223:デフォルトの名無しさん
16/06/14 08:10:13.51 BcKyLCvc.net
手動で起動したプロセスは、親プロセスが無く、単独のプロセスだから、ずっと生き残るのかな？
Aプログラム(Aプロセス)から起動したプロセスは、親プロセスがAとなり、
Aを終了すると、その子プロセスもすべて、連鎖して終了するのかな？
プロセスを起動する際、親子関係を切れば？
ただしそうすると、起動されたプロセスは、A終了後も残り続けるから、
誰がそのプロセスを終了するのかが、問題となる
漏れは、Windowsはよく知らない。Linuxから推測して書いた

224:デフォルトの名無しさん
16/06/14 08:45:39.28 2DTiTbF7.net
>>216
ショートカットから開く方法ですか、考えもしなかったです。
確実に再現するバグではない（場合によっては２０分くらい経ってからクラッシュしますし、端末によっては何も起きなかったりします。）
なので、原因を掴むのが難しいです。
>>217
なるほど、プロセスが分離されているから巻き込まれなかったんですかね。
前後のコードを見返しているのですが、shell関数を読んだ直後に
Kill thisworkbook.fullName
thisworkbook.close
を読んで終了させているんですが、ひょっとしたらこの兼ね合いが原因かも？とふと思いました。
shell関数は非同期処理で、会社の共有フォルダを開くときはローカルと違って若干起動に時間がかかります。
shell関数の処理が完了しきっていないのに即終了させるから、動作が不安定になってる可能性はありますかね・・。
なのでとりあえずShell関数を、Wscript.ShellのRunメソッドの同期処理に置換えてみました。
それで明日会社でテストしてみます。

225:デフォルトの名無しさん
16/06/15 20:38:23.92 985LHqkd.net
それVBAとか関係なく、普通にネットワーク上のフォルダを表示してるエクスプローラでも発生してるんじゃないのか？
URLﾘﾝｸ(support.microsoft.com)
URLﾘﾝｸ(support.microsoft.com)
とりあえず俺はこの二つで直ったが、エクスプローラ落ちるとかでググってみ

226:218
16/06/16 07:48:37.40 MO4h1nff.net
>>219
同期処理に変えたら全く落ちなくなりました。
どうやら推測は当たったみたいです。
手動で立ちあげてる時には同じトラブルは一度も起こったこと無く、誰からも聞いていないので、
VBA処理が原因で間違いないと思います。
ぐぐっては見てたんですけど、VBA関連でのエラー報告は０でしたね。
しかし、元々この手のトラブル報告がかなり多いことにはびっくりしました。
とりあえずは解決です。皆さんどうも有難うございました。

227:デフォルトの名無しさん
16/06/16 14:05:29.72 tOwQ8tvq.net
タイミングの問題で、バグが起きるときは、
sleep 3秒などで、時間稼ぎすることが多いな

228:デフォルトの名無しさん
16/06/16 16:27:03.77 YtVxucfB.net
>>221
タイミングというか処理を待ち合わせる必要があるって事だよな
3秒で完了しない処理だと問題が起きる
90%くらい解決出来れば実用上は問題にならないかも知れないけど

229:デフォルトの名無しさん
16/06/16 21:40:45.67 JOmdLZoV.net
' キャッシュ反映を待って5秒待つ
↑これなんとかして

230:デフォルトの名無しさん
16/06/16 21:53:33.23 EpEOLr57.net
>>223
何のキャッシュか判らないけど
キャッシュをフラッシュするインターフェイスがあればそれを使えば良いのでは
無いなら知らない

231:デフォルトの名無しさん
16/06/17 01:16:02.29 Sh+IdTol.net
起動方法と起動のタイミングの問題で
>１分～数分以内に「エクスプローラは停止しました」
>場合によっては２０分くらい経ってからクラッシュ
のような症状が出るとは考えにくいけどな
まあ、直ったって言うならそれでいいけど

232:樵の結び目。
16/09/03 18:27:18.44 Ms7vNg4j.net
この作者について
URLﾘﾝｸ(img.atwikiimg.com)
どう思いますか？？
　

233:デフォルトの名無しさん
16/09/28 19:27:48.59 BVBInYIb.net
vbaの And, Or って短絡評価してくれないの？？？

234:デフォルトの名無しさん
16/09/28 20:30:34.84 X231kNmm.net
>>227
普通しない
（常にしないかどうかは知らんけど）

235:デフォルトの名無しさん
16/09/28 22:20:25.14 w7cfX4QA.net
X(n) And Y(m) で X(n) = False だった場合、Y(m) は評価しなくても式が False と確定する
Or でも同様のことが可能
VBAがショートサーキットしているかどうかは、各関数で Debug ログを出力してみればわかる

236:デフォルトの名無しさん
16/09/29 04:55:17.68 IF5lu7hc.net
>>229
いちいち短絡評価の説明なんてしなくていいよ...

237:227
16/09/29 08:22:26.74 l2tsRcXf.net
くぅ。
短絡評価してくれるもんだと思って、
True, False, Nullを返す関数の結果で、
NullをFalseに倒したくて、
左辺でNot isNullやってたけど、
右辺もNullで動いてしまってエラーになってはまったわ。

238:デフォルトの名無しさん
16/09/29 12:46:05.66 tIM+raH6.net
VBAあるある

239:デフォルトの名無しさん
16/10/06 19:51:33.65 prbbit7d.net
.NetならOrElseやAndAlsoが使えるし
Nullable指定も出来るから便利なんだけどなー
まあ無いものねだりしても始まらないか

240:デフォルトの名無しさん
16/10/08 17:43:11.29 fiaM9vLl.net
VB(A)はWithとかある割にそういうとこは全然気が利かないよな
C言語すら知らない人が作った言語なんだろう事は判る

241:デフォルトの名無しさん
16/10/08 22:59:38.27 315EhZFM.net
VBって元々はMSじゃないんだよね　BASIC好きのゲイツが惚れ込んで買収しただけ

242:デフォルトの名無しさん
16/10/27 20:44:38.40 LE0ob9Yw.net
vbaの中、上級者向けの書籍を教えて�

243:ｭださい

244:デフォルトの名無しさん
16/10/27 21:44:23.99 BIHhfe0H.net
漠然と「ＶＢＡの初心者向けの本を教えてください」ってのはよくあるが、上級者向けは珍しいね
ある程度基礎が身に付き、やりたいことが分かってきていれば
○○に関する本、ってなるように思うんだが・・・
田中亨氏の「Excel VBA 逆引き辞典パーフェクト」は名著だよ

245:デフォルトの名無しさん
16/10/28 04:23:54.86 s9odN72t.net
>>237
ありがとうございます。
クラスや多段階配列、イベント自作、擬似コントロール配列あたりの情報がある書籍はありませんか？

246:デフォルトの名無しさん
16/10/28 15:06:05.95 Sg+Wt/Uz.net
アプリ作成で学ぶExcel VBAプログラミングユーザーフォーム&コントロール（横山達大著）
かんたんプログラミング応用編（大村あつし著）
同じく、かんたんプログラミングコントロール関数編
デバッグ関連だと
立山秀利著の本

247:デフォルトの名無しさん
16/10/29 23:22:10.90 b3lytwnZ.net
VBAでコードを抜き出してSVNやgitで管理したりするとそれだけで上級者っぽくなる

248:デフォルトの名無しさん
16/10/30 08:10:21.54 R4QvvoTp.net
それ以上にバカっぽいけどなｗ

249:デフォルトの名無しさん
16/10/30 09:23:46.57 2kQlDpFE.net
今時差分管理もしてないのかよ

250:デフォルトの名無しさん
16/10/31 23:59:17.10 9abcSnRr.net
VBACとか使ってんの？

251:デフォルトの名無しさん
17/02/06 12:06:59.89 1XFRepCN.net
PowerPointのVBAでファイルを閉じた後も変数の値が保存されるようにしたいんですが外部のテキストに書き出す以外にファイル本体にどうにかして埋め込む方法はありますか？

252:デフォルトの名無しさん
17/02/06 14:57:53.43 atuXlQHb.net
透明のシェイプとかに書くとか色々あるけど
実際本体ファイルを更新されるとバージョン管理とか使う側が気持ち悪がるとか運用面で問題が出そう

253:デフォルトの名無しさん
17/02/06 19:29:23.46 4FxLnD3n.net
Excel脳っすなぁ
標準的なユーザーデータ保存場所がちゃんとあるんだからそれ使えばいいじゃん

254:デフォルトの名無しさん
17/02/06 19:58:54.20 KOZLaxG/.net
>>246
どうすればいいでしょうか

255:デフォルトの名無しさん
17/02/06 21:21:37.88 VJg+IRhi.net
>>244
Presentation.CustomDocumentProperties
URLﾘﾝｸ(msdn.microsoft.com)

256:デフォルトの名無しさん
17/02/07 07:09:26.95 HIDKMkau.net
>>246
条件によるだろ
思いつきで即答すんなアホ

257:デフォルトの名無しさん
17/02/07 07:27:10.54 ff698yUf.net
>>249
条件って
ファイル本体に埋め込みたい
ってことだろ
>>246 の保存場所がどこの事を言ってるのかよくわからんが >>245 より >>248 の方がはるかにマシ

258:デフォルトの名無しさん
17/02/07 07:40:32.09 xddq+MTq.net
ファイル本体に埋め込みすんのがアホなんだよわかれよ素人
ゴミを量産して人に迷惑かけないでくれ
独りよがりの仕事してんじゃねえよ

259:デフォルトの名無しさん
17/02/07 08:07:27.12 ff698yUf.net
単なる基地害だったのか

260:デフォルトの名無しさん
17/02/07 20:25:02.30 1dqSFjs6.net
実際に仕事してるとそれこそ基地外避けを作る必要が出てきたりするんだよな

261:デフォルトの名無しさん
17/02/07 21:24:47.40 lpX4EXgF.net
ユーザーデータを変な場所に保存したりするやつとか避けないとな

262:デフォルトの名無しさん
17/02/07 22:43:16.46 diTiDCUQ.net
>>254
> 変な場所に
透明のシェイプとかのことですね、わかります

263:デフォルトの名無しさん
17/02/13 17:14:33.92 QPcPOced.net
50枚のスライドが入ったパワポが5個あります。
これを統合したいのですが
ファイル1の1枚目
ファイル2の1枚目
ファイル3の1枚目
ファイル4の1枚目
ファイル5の1枚目
ファイル1の2枚目。。。
という順番にしたいのです。
どういうマクロを書けばいいでしょうか？

264:デフォルトの名無しさん
17/02/13 21:36:30.61 MAF656mM.net
>>256
その通りのマクロを書けばいいのでは？

265:デフォルトの名無しさん
17/02/13 21:54:55.31 1gaAmlEB.net
新規で作ったらコピペを繰り返すだけ

266:デフォルトの名無しさん
17/02/14 00:38:49.96 hvVJhpIb.net
パワポってマクロ使えるんだ
そらそうだわな

267:デフォルトの名無しさん
17/02/14 01:58:27.90 ahDpDw9M.net
ExcelVBAをつかいこなしていても
パワポはマクロの記録がないと腰が重いな

268:デフォルトの名無しさん
17/02/15 08:18:34.60 uIQboeV9.net
>>256
この作業用を何回も繰り返さないといけないの？
1度きりならあなたの場合は手作業の方が早い気が

269:デフォルトの名無しさん
17/02/15 13:14:12.73 zgJtAmDR.net
>>256
スマホからだから試してないけどこんな感じかな
Application.Presentations.Open(ひとつ目のファイル)
Application.Presentations.Open(ふたつ目のファイル)
...
Application.Presentations.Open(いつつ目のファイル)
Set P = Application.Presentations.Add
For I = 1 To 50
For J = 1 To 5
Application.Presentations.Item(J).Slides(I).Copy
P.Slides.Paste
Next
Next
P.SaveAs(新規のファイル)

270:デフォルトの名無しさん
17/02/23 13:32:21.69 xPy6pfR0.net
選択されているセル範囲内の文字、図形を削除する手順を作ってみましたが、処理がえらく重いです。
もっと処理を早くする方法はないでしょうか？
Sub sakujo()
Application.ScreenUpdating = False 　 '画面更新を停止
Dim shp As Shape
Dim rng As Range
If TypeName(Selection) <> "Range" Then Exit Sub
For Each shp In ActiveSheet.Shapes
Selection.ClearContents
Set rng = Range(shp.TopLeftCell, shp.BottomRightCell)　　'図形の配置されているセル範囲をオブジェクト変数にセット
If Not (Intersect(rng, Selection) Is Nothing) Then　　'図形の配置されている範囲と選択されているセル範囲が重なっているときに図形を削除
shp.Delete
End If
Next
Application.ScreenUpdating = True　　'画面更新を再開
End Sub

271:デフォルトの名無しさん
17/02/23 14:40:32.47 bekNjoMq.net
>>263
再計算とイベントも停止してみた？
あと、コレクションに対するループの中で自分自身のコレクションが変化するのは、なんとなくまずい気がする
根拠はないけど、それって遅くなる要因と違う？

272:デフォルトの名無しさん
17/02/23 15:02:34.32 Q2T7iSLN.net
処理の基本をよく考えるべき。
1.Shape毎にSelection.ClearContentsする意味は?
2.shp.Delete後もループする意味は?
3.そもそもSelectionって何?つまり何が選択されている時に削除したいの?
For Each shp In ActiveSheet.Shapes
If shp Is Selection Then
shp.Delete
Exit For
End If
Next
じゃ駄目?

273:デフォルトの名無しさん
17/02/23 15:08:21.72 Q2T7iSLN.net
選択されているセル範囲については最初のIf文でExit Subしてるから削除されないんじゃ?
処理がよく分からん。
選択されているShapeの下のRangeの内容を削除したいならshp=Selectionの場合に
Range(shp.TopLeftCell,shp.BottomRightCell).ClearContents
で良いんじゃ?

274:デフォルトの名無しさん
17/02/23 15:10:34.31 Q2T7iSLN.net
shp=Selectionの場合じゃなくてshp Is Selectionの場合だな。
shp.Deleteの前ね。

275:デフォルトの名無しさん
17/02/23 15:24:01.29 5OVH7aZj.net
>>265
質問者じゃないけど変わって説明するよ
・シート上に文字と図形が複数箇所に設定されている
・消す範囲を選択して、その範囲内の文字と図形を消すコードを書いた
・でもなぜか遅い
質問者に言えるのは、
・Selection.ClearContentsはfor eachの外でいい
・試しに100個のshapeを貼り付けて50個くらいが入る範囲を選択して消してみたら一瞬で終了（もちろんコードでだよ）
・遅いって具体的にどれくらいなの？

276:デフォルトの名無しさん
17/02/23 16:00:14.32 Q2T7iSLN.net
>>268
コード見りゃわかる。
でもコードがやってることは無駄な部分が多いから聞いてる。
最初のIf文を見ればRangeを選択した場合はExit Subしたいみたいだがら範囲選択した場合は処理して欲しく無いんだよな。
→じゃ、どんな時に処理して欲しいの?
For Each shp In ActiveSheet.Shapes
If shp Is Selection Then
Range(shp.TopLeftCell,shp.BottomRightCell).ClearContents
shp.Delete
Exit For
End If
Next
じゃ駄目なの?

277:デフォルトの名無しさん
17/02/23 16:07:14.86 xPy6pfR0.net
今までは長い時で1～1.5秒程止まっていました
>>268さんの言われた通り、Selection.ClearContentsの位置を変えたらスムーズになりましたのでこれで行こうと思います
たくさんご意見頂きありがとうございました

278:デフォルトの名無しさん
17/02/23 16:14:41.52 5OVH7aZj.net
>>269
> If TypeName(Selection) <> "Range" Then Exit Sub
だよ

279:デフォルトの名無しさん
17/02/26 14:44:16.79 nMuhJunv.net
エクセルのマクロでも質問大丈夫でしょうか？
名前と同じファイル名の画像を名前セルの隣に貼り付けるプログラムなんですが
Sub ボタン1_Click()
Const n As Long = 2
Dim i As Long
Dim x As Double
Dim s As String
Dim t As FileDialog
Dim m As VbMsgBoxResult
With ActiveSheet
For i = 2 To .Cells(.Rows.Count, 2).End(xlUp).Row Step 6
Set r = .Cells(i, 3).MergeArea
s = "D:\画像\1\" & .Cells(i, 2).Value & ".jpg"
Dir Application.Path
With .Pictures.Insert(s).ShapeRange
.LockAspectRatio = msoTrue
x = Application.Min(r.Width / .Width, (r.Height - n) / .Height)
.Width = .Width * x
.Left = r.Left + (r.Width - .Width) / 2
.Top = r.Top + (r.Height - .Height) / 2
End With
Next
End With
End Sub
この"D:\画像\1\"の部分をフォルダ選択できるようにしたいので
Dim s As String
　　Dim t As FileDialog
Set t = Application.FileDialog(msoFileDialogFolderPicker)
s = "t" & .Cells(i, 2).Value & ".jpg"
としたら「1004　PicturesクラスのInsertプロパティを取得できません。」と実行できません
どうしたら"D:\画像\1\"の部分をフォルダ選択できるようにできるのでしょうか？ご教示お願い致します。

280:デフォルトの名無しさん
17/02/26 16:00:22.84 nt1S72uw.net
>>272
Dim s As String
Dim t As String
With Application.FileDialog(msoFileDialogFolderPicker)
　　If .Show = False Then Exit Sub
　　t = .SelectedItems(1) & "\"
End With
'途中省略
s = t & .Cells(i, 2).Value & ".jpg"
じゃないかな?
あと
元コードもそうだけど
フォルダ内にその画像ファイルが存在してなかった時の対策も必要だと思うよ
同じエラーになるぞ　それとも絶対あるのが確定してる?

281:デフォルトの名無しさん
17/02/26 16:45:49.33 nMuhJunv.net
>>273
大変ありがとうございます！
ただ、貼り付ける画像は複数あり、貼り付けるたびにフォルダ選択画面が出てしまいますので、一気に貼り付けられないものでしょうか？
ファイルが存在してない時の対策は、セルの状態を色変えて罫線で斜線を挿入したいと考えてますが、まだそこまで進む前段階がクリアできないので困ってます
よろしくお願いします

282:デフォルトの名無しさん
17/02/26 16:51:45.39 nt1S72uw.net
>>274
ん? そこは分ってるとおもたよ
フォルダ選択部分は Forループの外だよ
↓ここねw
With Application.FileDialog(msoFileDialogFolderPicker)
　If .Show = False Then Exit Sub
　t = .SelectedItems(1) & "\"
End With

283:デフォルトの名無しさん
17/02/26 16:57:59.74 nMuhJunv.net
>>275
あっ！できました！ありがとうございます！助かりました！

284:デフォルトの名無しさん
17/03/06 23:29:36.96 QCgyLcj6.net
こんにちは。
パワーポイント2013のVBAについて分かる方教えて下さい。
やりたいことは、グラデーションの塗りつぶしがあるシェイプのGradientStopsのそれぞれの色を変化させるアニメーションの方法です。
2013ではできないけど2016ではできる等の情報もあればお願い致します。

285:デフォルトの名無しさん
17/03/08 21:50:45.20 DO0ivfK5.net
vbaだけでhttpサーバーって出来る？

286:デフォルトの名無しさん
17/03/08 23:04:04.36 Tpob7EG8.net
俺が手を下すまでもないな
答えてやれよ
>>280

287:デフォルトの名無しさん
17/03/09 01:39:01.40 UFk6xx1O.net
VBAだけってのが
外部コントロール使用禁止
API呼び出し禁止
なら不可能です

288:デフォルトの名無しさん
17/04/09 15:56:17.26 9WwYB+FH.net
VBAの変数の値を次回の処理を行う時まで記録しておくのにセルに書き込みをしたりしていますが、
セルにアクセスするのを減らすためにセルに記録しなくて処理終了時に変数値をVBA内で保存しておいてくれる一次記憶領域みたいな物はないのでしょうか？

289:デフォルトの名無しさん
17/04/09 16:02:56.39 9WwYB+FH.net
ちりも積もればの話ですが
足し算引き算割り算レベルの計算をセルに関数を割り当てて行うのと
同じ計算式を変数を用いてVBAで書いて実行するのとで、より処理速度が速いのはどちらでしょうか？

290:デフォルトの名無しさん
17/04/09 16:09:57.30 Lq/WJuQk.net
>>281
セルでいいんじゃないの？
ただそのIOは配列アクセスを使うべき
ループで1セルづつ読み込むとかがナンセンス

291:デフォルトの名無しさん
17/04/09 16:14:42.36 K8MFArI9.net
>>281
説明がいまいち分かりにくい。
次回ってのは何時のことを言ってる?
グローバルな変数じゃダメなの?
次にそのブックを開くまで保持したいならセルってのも分かるんだが。
で、その場合にセルの代わりに保持したいならCustomDocumetProperties使ったりするかな。

292:デフォルトの名無しさん
17/04/09 16:27:32.06 9WwYB+FH.net
>>283
ありがとうございます。
＞配列アクセス
勉強してみます。
>>284
Bookを閉じずに他からデーターを取り込み再度VBA実行を繰り返します。
＞グローバル変数
＞CustomDocumetProperties
勉強してみます。
グローバル変数に代入した数値は処理を中断しても生き続けるのであればそれで解決しそうです。

293:デフォルトの名無しさん
17/04/09 16:44:07.10 9WwYB+FH.net
>>284
プロシージャの上に定義すると処理が終了しても最終定義された内容は残ったままなんですね！
今まで処理を中断する必要がある場合は変数をすべてセルに書き出していましたが大発見です。ありがとうございました。

294:デフォルトの名無しさん
17/04/09 19:39:59.08 9WwYB+FH.net
Public変数もしくは通常の変数の指定数の限界はあるのでしょうか？
問題なく動くレベルは何個ぐらいでしょうか？
50個
100個
1000個
10000個でも平気だっり？
実は
100000個以上でも問題ないとか？

295:デフォルトの名無しさん
17/04/09 19:51:50.86 0T9WQSVM.net
>>287
使えるメモリは決まってる
変数の個数じゃなくてそれぞれのバイト数の合計

296:デフォルトの名無しさん
17/04/09 23:55:43.90 K8MFArI9.net
>>287
グローバル変数(Public)は便利に見えるけどスコープを考えて必要無い所では使わない方が良い。
PublicかPrivateかプロシージャ内で宣言するかを意識して使った方が良いね。

297:デフォルトの名無しさん
17/04/10 02:47:06.39 AhmZ51rM.net
日曜の午後からずっとVBAを書いてるけどまだおわらね～
てかやればやるほど選択肢が爆発的に増えてきて一生かかってもおわりそうにね～！ｗ

298:デフォルトの名無しさん
17/04/10 04:05:13.85 sRLMXvmn.net
>>287
しかもEndやErrorで抜けたら破棄されるという罠

299:デフォルトの名無しさん
17/04/11 00:40:18.97 egN7ZnVO.net
素数や組み合わせ爆発のような数学の迷宮的な問題に陥って
一生かかってもコードを完成させるのは無理ですよみたいな場合もあるのでしょうか？

300:デフォルトの名無しさん
17/04/11 10:41:22.79 Ei1BFwyD.net
>>292
数学的バックグラウンドがなければコードが書けないという類いの問題はあるね。
たとえばNP困

301:難なやつ。巡回セールスマンとかナップサック問題とか、ナーススケジューリング問題とか。自力でなければ、それなりの回答が得られる解法（コード）が既に存在してるものもある。

302:デフォルトの名無しさん
17/04/11 11:01:45.96 o/k96Ri6.net
問題を解く方法を考案するのと、その方法をコンピューター言語に翻訳する作業は別ですわ
それぞれに異なった知識と才能が必要となりますので

303:デフォルトの名無しさん
17/04/11 11:03:15.94 6dnWkPrh.net
>>291
End Subの行にブレークポイント、これ

304:デフォルトの名無しさん
17/04/12 22:41:46.94 iuenojzm.net
パブリック変数で
1000個
10000個でも平気だっり？
とかどんな拷問なんだよw

305:デフォルトの名無しさん
17/04/20 23:26:11.80 92wBssf5.net
テストしてみたがパブリック変数500個は問題なく動いた。
もっと使ってる人いる？

306:デフォルトの名無しさん
17/04/21 19:40:41.67 TpPjDerb.net
いらない

307:デフォルトの名無しさん
17/04/21 21:22:06.10 BWuBR5xw.net
変数の一部を変数にする事は出来ないのでしょうか？（代入
とかではなく）
たとえば↓はイメージですが変数名の箇所を文字列をつなぎ合わせる時と
同じように変数をわりあてられないのでしょうか？（以下は動きませんがphpではこれができます。）
dim aaa1
dim aaa
dim no
dim bbb
aaa1=例文１
aaa=aaa
no=1
aaa & no = bbb
msgbox bbb
↓
結果は「例文１」　と表示されますみたな、、　

308:デフォルトの名無しさん
17/04/21 21:28:31.62 BWuBR5xw.net
>>299
最終的には
aaa1＝「例文１」
aaa2＝「例文2」
aaa3＝「例文3」
・
・
とし
aaa & no のno番号だけ差し替えて制御するみないな感じで使います。
ただしnoの番号は連続した数字ではなく他の集計結果からランダムに発生するため
ループ処理等では成り立たず変数のように扱う必要があります。

309:デフォルトの名無しさん
17/04/21 22:10:11.53 9tskJEPF.net
>>300
aaa1とかaaa2を変数として捉えず、文字列と数値を要素に持つ2次元配列と見れば良い
で、データ全体を制御するときは、aaa1，aaa2...の2次元配列全てを要素として持つコレクションオブジェクトを生成して操作する

310:デフォルトの名無しさん
17/04/21 22:18:30.36 TpPjDerb.net
>>300
Dictionaryのkeyにすれば良いんじゃね

311:デフォルトの名無しさん
17/04/21 22:25:23.50 9tskJEPF.net
CollectionよりDictionaryだな、確かに

312:デフォルトの名無しさん
17/04/21 23:24:44.93 3F+Ljh12.net
そういう質問、初心者によく聞かれるわ
普通は配列を使えと教えるもんだが

313:デフォルトの名無しさん
17/04/22 06:16:50.97 zUhE/Mll.net
>>302
>>301
ありがとうございます。Collection　Dictionary　調べてみましたが
どちらも説明をざっと読んでも使い方が理解できませんでしたが挑戦してみます。
phpのように　（aaa & no） =
と変数名自体を複数の変数で合成する事は出来ないのですね。

314:299
17/04/22 08:27:20.54 zUhE/Mll.net
>>300
>>301
>>302
>>304
aaa1＝「状況に応じて変化する数値１」
aaa2＝「状況に応じて変化する数値2」
aaa3＝「状況に応じて変化する数値3」
・
・
すみません説明を単純にするために「例文１」としてましたが
変数に格納されるのは状況に応じて変化する数値（他の集計の計算結果）でした。
固定された文言であればDictionary keyで処理できるというのはわかりましたが
格納されている物が変化する数値の場合かつ
変数名を数字で管理（他の集計から３という結果が出たら→aaa3が適応されるみたいな）
したい場合こういうことを実現する方法はありますでしょうか？

315:デフォルトの名無しさん
17/04/22 08:53:12.92 MM2jcjjz.net
>>306
変数名を数字だけで管理する方法はない。
VBAの仕様上、できない。
というか、その集計結果なるものがプログラム実行時に決定するのだとしたら、集計結果を格納する変数の名前に集計結果の数値をはじめから盛り込もうとするのは無理があるし、そもそも理由が分からない。
やりたいことを実現するにはもっと適切な他の方法があるんじゃないかな。

316:デフォルトの名無しさん
17/04/22 11:27:30.44 6RXuRSFv.net
>>306
Dictionaryのvalueは変更可能

317:299
17/04/22 15:29:06.19 zUhE/Mll.net
>>308
>>307
理解するのにかなり時間がかかりましたがDictionaryなんとなくわかりました。
これって Dim とかPublicとかの変数とは別に存在できるんですね。
全く未知の分野ですが使ってみます。ありがとうございました。

318:デフォルトの名無しさん
17/04/22 20:43:48.30 zUhE/Mll.net
Dim dic As New Dictionary
Dim i As Integer
dic.Add "キー1", "アイテム1"
dic.Add "キー2", "アイテム2"
dic.Add "キー3", "アイテム3"
Dictionaryで指定した"キー"と "アイテム"は処理が終了するとリセットされるようですが、
グローバル変数のように処理が終了しても次実行されるまで記憶させておくようにする事は出来ないのでしょうか？

319:デフォルトの名無しさん
17/04/22 22:48:51.75 AOzJBbd9.net
>>310
プロシージャを跨いで値を保持させるなら、グローバルな配列変数、（アプリケーションがExcelならば）セル、シェイプ、カスタムドキュメントプロパティ、グローバルコレクション、自作のグローバルクラスのインスタンスなどに値を記憶させるしかない
でもそれならわざわざプロシージャ内でDictionaryを使って連想配列を操作するより、ExcelのセルにKeyと値を書き込んで配列アクセスして読み書きする処理の方が遥かに楽だと思う

320:デフォルトの名無しさん
17/04/22 23:30:15.48 zUhE/Mll.net
>>311
ありがとうございます。
今作っているコードでセルへのアクセスが膨大になってきて処理時間がどんどん長くなる傾向がみられまして
全操作をセルにアクセスせずに完結させようと色々考えていましたがなかなかそうはいかないようですね。

321:デフォルトの名無しさん
17/04/23 05:30:19.61 t5ve42Di.net
>>312
Dim dic As New Dictionary
の宣言を何処でしているかによるんじゃね？

322:デフォルトの名無しさん
17/04/23 10:16:09.39 wfwXXeKO.net
>>312
標準モジュールとかでDictionary型のオブジェクト変数をグローバルスコープ（Public）でNew宣言すれば、処理を抜けてもDictionaryのItemは初期化されないんじゃないのかな
ただ単なる配列の処理でデータが数千件程度なら、描画止めた状態でワークシート使った方が遥かに楽だと思うが。

323:デフォルトの名無しさん
17/04/23 16:51:51.75 fs201BJ1.net
>>311
引数に渡すってのを忘れてるぞ。
一番使われてるんじゃないか?

324:デフォルトの名無しさん
17/04/23 17:11:32.92 yvJyPXpi.net
>>315
何の引数に渡すことを指してるのかな？

325:デフォルトの名無しさん
17/04/23 18:02:04.26 fs201BJ1.net
>>316
プロシージャを跨ぐって話だろ。
別のプロシ－ジャに引数として渡せば形の上ではそれぞれのローカル変数でも値は保持されるだろ。

326:デフォルトの名無しさん
17/04/23 18:27:09.16 yvJyPXpi.net
>>317
>>310を読んでなんとなく、一個のルーチンのプロシージャ間の値の受け渡しの話ではなく、ルーチン内で一度AddしたDictionaryのKeyとItemを何らかの形で保存して、同じルーチンを再実行したときにKeyとItemを再利用することが出来るかどうかという話だと思ったんだが
まぁ、オブジェクトプロパティへの値の保存も実際はそのオブジェクトを定義してるクラスのメソッドに引数を渡してるのと同じだから、変わらないといえば変わらないけど

327:デフォルトの名無しさん
17/04/28 17:33:41.10 krqKI6DB.net
超既出FAQですな。
『Public 宣言された変数の有効期間』
URLﾘﾝｸ(support.microsoft.com)
簡単に言うと、メソッド実行中以外はいつでもpublic変数はクリアされうるから、値が残っていることを期待したマクロを書くなってこと。

328:デフォルトの名無しさん
17/04/28 19:14:11.69 AZu

329:qyiJa.net

330:デフォルトの名無しさん
17/04/28 22:13:43.74 A3VkBONm.net
Publicな静的変数は使わない。
エクセルのセルとかワードの文書変数とかの規定オブジェクトにデータを書き込んだ方が便利

331:デフォルトの名無しさん
17/04/29 02:16:02.91 2iGvQ1xG.net
>>321
いや、それは格好悪いんじゃね?
セルを使ったりCustomDocumentPropertiesも使うけど、それに合ったものだから使うわけでPublic変数に合ったものもある。
適材適所だろ。

332:デフォルトの名無しさん
17/05/25 20:51:55.45 yS9f0RVc.net
ontime で実行するプロシージャって標準モジュールに書かないとあかんのか。
このブックでマクロが使用できないか、またはすべてのマクロが無効になっている可能性があります。って出た。

333:デフォルトの名無しさん
17/05/25 21:07:30.77 JTnnq+Q0.net
>>323
スコープ
普通にCallで呼び出せる場所にないと実行できないのは、どの方法でも同じ

334:デフォルトの名無しさん
17/05/26 00:03:34.69 Fw61rXsb.net
>>324
ThisWorkBookのモジュールからOnTimeでThisWorkBookのモジュール内のPrivate Sub を予約したんですが・・・これじゃ駄目なんですかね？

335:デフォルトの名無しさん
17/05/26 23:19:52.51 Fw61rXsb.net
>>325です
OnTimeで実行予約するプロシージャを標準モジュールに移動したら動くようになりました～

336:デフォルトの名無しさん
17/06/05 21:02:56.92 bd1ggU41.net
特定の文字が含まれているセル（複数ある）を検索し、
検索されたセルを含む行全体（Entirerow）を同時選択する方法
以上お願いします。

337:デフォルトの名無しさん
17/06/05 21:06:49.56 bd1ggU41.net
その文字を含むセルを、行ごと削除したり、行ごとコピーしたりと、いろいろしたいので質問致しました。

338:デフォルトの名無しさん
17/06/05 21:25:48.60 nSGQpg3a.net
鮮やかな丸投げっぷりにﾜﾗﾀ
作成依頼OKな Excel VBAスレと間違えてない？

339:デフォルトの名無しさん
17/06/05 21:31:47.51 tRFV5HQ5.net
>>328
とりあえず、複数行を選択するところをマクロの記録で見てみたら？
ｃｔｒｌキー押しながら選択するのとshiftキーを押しながらのとで。

340:デフォルトの名無しさん
17/06/05 21:41:12.12 jKyX/qwq.net
検索対象のセル範囲でForループを回す
セル値に特定文字を含むセルが見つかる度にEntireRowを取得して変数に入れるかUnionで選択対象の範囲をマージしていく
ループ終了後にSelectする
以上

341:デフォルトの名無しさん
17/06/05 21:45:35.27 epzJZZwH.net
>>327
Ctrl+Fで検索しろやボケナス
ちゃんと行選択までしてくれるぜ

342:デフォルトの名無しさん
17/06/05 22:37:03.17 bd1ggU41.net
ごめんなさい、質問者です。
ここじゃなかったのですね。上に上がったやり方でできそうなのでやってみます。ありがとうございます

343:デフォルトの名無しさん
17/06/06 05:49:03.11 tznXutzN.net
色々細かい条件でどんなコードが効率いいか、変わってくるでしょ。
例えばそのセルがあるのは、特定の行だけとか、検索文字列はセルに完全一致なのか含まれるのか、など。

344:デフォルトの名無しさん
17/06/06 09:11:47.41 YhE+Nuz8.net
331だが、同じ行に該当セルが複数ある場合は無駄が生じるな
実現したい機能次第だが、工夫が必要かもな

345:デフォルトの名無しさん
17/06/07 19:31:10.77 e13xfCG0.net
はじめまして。以下2点、教えていただけると幸いです。
環境は、OS:Windows7, Excel2010です。よろしくお願いします。
1.プルダウンの初期値設定
セルA1にりんご、A2にバナナ、・・・のようにA列にある項目をプルダウンで選択したいです。
このとき、「A列のj行目（パラメータ選択可能）を初期値にしたプルダウンをB1に設置する」VBAのコマンドを教えていただきたいです。
2.ファイル名の変更
aaa.txtというファイルをデスクトップに出力するマクロを作れました。
このマクロ実行後、再度実行するとaaa(2).txtのファイルを、再度実行するとaaa(3).txtのファイルを出力・・・
このようなVBAのコマンドを教えていただきたいです。

346:デフォルトの名無しさん
17/06/07 21:49:32.12 nqbSOdK9.net
>>336
コマンドはありません

347:デフォルトの名無しさん
17/06/07 22:23:27.64 L3ua+fDn.net
>>336
txtファイルをデスクトップに出力っていう日本語の破壊力がやべぇ

348:デフォルトの名無しさん
17/06/08 05:33:24.44 1DKX/Vru.net
>>336
1
・B1セルを選択してからマクロの記録を実行
・入力規則でリストを選択にリストの内容でA列を選択する
・マクロ記録の終了をする
・できたコードを修正してA列の任意のセルをデフォルトにするように変更する
2
・デスクトップにaaa.txtが存在するかチェックする。
・存在しない場合はaaa.txtを作成して終了。
・存在する場合はDo~Loop中にデスクトップにaaa(i).txtが存在するかチェックする
・存在する場合はiをカウントアップして次のループ
・存在しない場合はそのiを使用してaaa(i).txtを作成して終了。

349:デフォルトの名無しさん
17/06/25 17:10:56.20 /fEFwdln.net
A1セルに　=NOW()-TODAY()　と入力すると
現在時刻が表示されますが。
MsgBox Range("a1")
とすると　0.0110212・・・と言ったような数値が出ます。
Dim now As Date　
now=Range("a1")
と型を指定した変数に格納してやると　
MsgBox now で　21:49:32 といった一般的な時間表記を示せますが、
変数化を省略して
MsgBox Range("a1")～に補足コードを書くなどで同じ処理を実現する方法は無いのでしょうか？

350:デフォルトの名無しさん
17/06/25 17:20:36.10 A4A49pvi.net
MsgBox Range("A1").Text
とか
MsgBox Format(Range("A1"), "hh:mm:ss")
とか

351:デフォルトの名無しさん
17/06/25 17:26:03.97 /fEFwdln.net
>>341
なんと！！
変数をだらだら定義すること無く綺麗さっぱり解決できました！ありがとうございました。m(_ _ )m

352:デフォルトの名無しさん
17/07/17 17:20:20.62 7pjXcMGR.net
プロシージャの中で1回しか使わないのに、わざわざ変数にするやつとかいるよね。（しかもハンガリアン記法で）
100行に満たない程度のコードなら、Withステートメント使ったほうがむしろ可読性は上がる。

353:デフォルトの名無しさん
17/07/17 17:25:26.05 l3sSLpQS.net
マシンパワーが貧弱だった大昔ならともかく、今時はリソースを気にする必要なんてないんだから、可読性を最優先で記述するべきだよ。

354:デフォルトの名無しさん
17/07/23 22:54:52.46 EbUz/UVB.net
>>343
ああ、俺だ。
Ubound(配列)とか、For～Nextの中で何回も実行すると、
なんか遅いような気がして、一度変数に入れちまう。

355:デフォルトの名無しさん
17/07/24 03:07:48.10 /3vdoRrW.net
>>345
何回も実行するなら変数に入れたほうがいいんじゃね？

356:デフォルトの名無しさん
17/09/01 23:04:37.73 RmCwgyLh.net
>>345
(1)
For I1 = 1 to UBound(xxx)
For I2 = 1 to UBound(xxx)
(2)
J=UBound(xxx)
For I1 = 1 to J
For I2 = 1 to J
普通に考えて本のチョット早いと思われますが、記述の労力ほどじゃない。
他の方の書いてますが、今は、処理速度が物凄く早くなっています。
気にしなくていいと思います。
ただし、私はEXCELでVBAを書くのですが、シートのセルに書き出すと物凄く遅くなる。
VBAの配列とかメモリーならばほとんど気にしなくていいです。
ですから、メモリー内で処理して最後の最後にシートに書くようにしてます。

357:デフォルトの名無しさん
17/09/02 08:26:52.52 tqo/3wkP.net
>>347
> ですから、メモリー内で処理して最後の最後にシートに書くようにしてます。
基本中の基本だからいちいち書かなくてよろし

358:デフォルトの名無しさん
17/09/05 10:53:29.80 WmSrV0rS.net
アノニマスに入会したいんですがVBA知ってるだけで入れますか?
あと入会ってどうやんの? スーツ着て履歴書持って事務所に面接に行くの？

359:デフォルトの名無しさん
17/09/05 12:25:17.40 P2jRu54V.net
たまにハローワークに求人出てるから行ってみれば？

360:デフォルトの名無しさん
17/09/12 02:10:43.27 2wFcaigK.net
超初心者です
同じブック内の複数のシートにある顧客データをUserFormを用いて（検索するイメージ）抽出し、別のシートへ出力するコードを書きたいのですがいまいちわかりません。
大変困っているのでヒントをくださればありがたいです。

361:デフォルトの名無しさん
17/09/12 02:30:21.88 U3/YorLf.net
>>351
超初心者には無理です
パソコン教室に通ってせめて初級をクリアしてから質問してください

362:デフォルトの名無しさん
17/09/12 04:10:40.96 2wFcaigK.net
>>352
返信ありがとうございます
Excel自体触ったことない超初心者ですが頑張っているところです( ??? )

363:デフォルトの名無しさん
17/09/12 08:28:28.15 GFFccSR9.net
>>351
自称初心者がどこでUserFormとか覚えたの？
まずはシート上でやってみようね

364:デフォルトの名無しさん
17/09/12 12:27:40.35 7XJfZGpJ.net
どこで覚えようとお前の知った事じゃねえだろｗ
なんだこのバカはｗｗｗ

次ページ