Excel VBA 質問スレ Part51

Excel VBA 質問スレ P ..

2:デフォルトの名無しさん
17/11/08 11:28:45.81 +KUB1/9hd.net
早速質問
今vbaでマップ使って
とある表の集計を行なっております
一つのkeyに対しアイテムが複数あるので
配列で入れようと思ったのですがうまくいきません
何か良い方法はありませんか？

3:デフォルトの名無しさん
17/11/08 18:45:21.53 oD3+O0e3E.net
Dim dic
Dim a()
redim a(1)
a(0)="test1"
a(1)="test2"
Set dic = CreateObject("Scripting.Dictionary")
dic.Add "key1", "アテネ"
dic.Add "key2", "ベオグラード"
dic.Add "key3", a
msgbox dic("key3")(0)
msgbox dic("key3")(1)

4:デフォルトの名無しさん
17/11/08 19:49:47.05 aX63wCUb0.net
前スレ
Excel VBA 質問スレ Part50
ｽﾚﾘﾝｸ(tech板)

5:デフォルトの名無しさん
17/11/08 20:24:39.43 VRSOCYqCd.net
マップをやめて配列「で」入れる
って意味にとってたけど
マップの中に配列「を」入れる
って意味かよ

6:デフォルトの名無しさん
17/11/09 13:04:15.65 W66xKF5F0.net
アイテムが複数あっても同じkey 使えばいいんじゃねと思った

7:デフォルトの名無しさん
17/11/09 14:39:20.19 goVr3jSD0.net
集計をしたいって事じゃない？

8:デフォルトの名無しさん
17/11/09 20:19:01.12 HS5Oh82mM.net
>>6
やってみてから発言することをお勧めする

9:デフォルトの名無しさん
17/11/09 20:29:22.40 7b9amfpv0.net
いい言葉を見つけた
Those who know don't talk. (知ってる人は教えようとしない)
Those who talk don't know. (教えてる人はあまり知らない)

10:デフォルトの名無しさん
17/11/09 21:19:05.18 F89uizh+0.net
立て乙です。
自宅にエクセル環境が無いのでうろ覚えで
細かい間違いはあるかもですが、該当箇所以外はokという前提です
日本という名前のブック
各都道府県名のシート
があるとき
Dim Bn as Workbook
Dim T as Worksheet
Set Bn = Workbooks("日本")
Set T =Worksheets("東京都")
Workbooks("日本").Worksheets("東京都").cells(1,1) = "123"
Bn.T.cells(1,2) = "456"
を実行すると
上段は問題なく実行されて、東京都シートのセルA1に123が入力されますが
下段でエラーがでてしまいます。また
Bn.Worksheets("東京都").cells(1,2) = "456"
T.Worksheets("東京都").cells(1,2) = "456"
のどちらでも動きました
ブックもシートも両方変数で指定するとエラーになってしまうのでしょうか？
ブックもシートもそれなりに切り替えるので、可能であれば別で指定したいのですが……
心当たりがあればご教示いただけると助かります。

11:デフォルトの名無しさん
17/11/09 21:25:44.32 7b9amfpv0.net
>>10
×　Bn.T.cells(1,2) = "456"
○　T.cells(1,2) = "456"
オブジェクトの操作は慣れが必要だけど、こういうもんだと思っておくれ

12:デフォルトの名無しさん
17/11/09 22:48:42.62 5mp2zjAU0.net
>>10
Bn.Tだと
workbookオブジェクトにTって言う属性や関数が無いからエラーになるのは当たり前

13:デフォルトの名無しさん
17/11/09 23:25:52.19 r1UnXx8k0.net
>>10
> Set Bn = Workbooks("日本")
> Set T =Worksheets("東京都")
ここは
Set T =Bn.Worksheets("東京都")
って書くべき

14:10
17/11/09 23:38:24.62 F89uizh+0.net
返答ありがとうございます。
やっぱり両方同時に変数指定はできないんですね……
何というか、指定先が変わる度にセットするのは見づらいような感じがしてまして
明日何とか考えてみようと思います。ありがとうございました

15:デフォルトの名無しさん
17/11/09 23:57:00.50 3LOjlHPk0.net
　　●●●宇宙の外側に何があるのか？●●●
　　URLﾘﾝｸ(jbbs.livedoor.jp)▲y/3729/1069922074/84-87
　　この掲示板(万▲有サロン)に優秀な書き▲込みをして、総額148万円の賞金をゲットしよう！(*^^)v
　　URLﾘﾝｸ(jbbs.livedoor.jp)▲dy/3729/ →リンクが不良なら、検▲索

16:窓に入れる！

17:デフォルトの名無しさん
17/11/10 00:13:48.87 anK9LaNF0.net
>>10
名前（Workbooks）が一致していればいいってものじゃない。
オブジェクト.メンバ　という構文なんだよ。メンバとはそのオブジェクトが持っているメソッドとかプロパティとかのこと。
しかし　Bn.T と書くと、オブジェクトとオブジェクトを . で繋いだことになり、これは意味不明なものになる。

18:デフォルトの名無しさん
17/11/10 02:06:21.33 HkDX0vBax.net
コレクションかユーザー定義クラス使うかしたらいいと思うが

19:デフォルトの名無しさん
17/11/10 02:16:45.89 HkDX0vBax.net
>>16
質問者はオブジェクト.メンバの構文の意味が分かってなくてオブジェクトブラウザも見たことない人なんだろうな
オブジェクトのメンバ名を指定してメソッド関数やプロパティ関数を呼び出すことで別のオブジェクトインスタンスのコントロールを取得しているんだってことが理解できてないんだろう

20:デフォルトの名無しさん
17/11/10 10:37:51.15 3nhwt3Be0.net
>>10
>T.Worksheets("東京都").cells(1,2) = "456"
これホントに動いたのか？
WorksheetにWorksheetsプロパティとか無かったはずだけど
何がやりたいかよくわからんが
とりあえずブック名とシート名受け取って該当Worksheet返す関数作ればいいんじゃないかと

21:デフォルトの名無しさん
17/11/10 12:27:51.12 VovrPQN6d.net
ワークシートchangeでtargetのA1が代わったらコードが流れるようにしてて、それ以外はexitで抜けてるんだけど、コードがセルに転記してて毎回changeの所に戻ってはexit、戻ってはexitで見辛いのはなんとかなりませんか？

22:デフォルトの名無しさん
17/11/10 13:11:21.32 ooNCyCJx0.net
>>20
マクロの実行中に何度もセルに書き込みが発生する処理が美しくないので設計を見直す。

23:デフォルトの名無しさん
17/11/10 13:45:49.16 Fw2iLfOX0.net
作った人に聞いてみたら？

24:デフォルトの名無しさん
17/11/10 17:25:45.54 6gcbKBqNp.net
EnableEvents=False
でイベント制御したらだめなの？

25:デフォルトの名無しさん
17/11/10 18:26:04.03 DKnywXcl6.net
SolverOk関数のEngineまたはEngineDescの引数の規定値って何でしょうか？

26:デフォルトの名無しさん
17/11/11 03:04:03.09 pW9oGH+o0.net
>>24
俺の使ってるバージョンだとその引数が無いっぽいから分からんけど
オブジェクトブラウザで表示させれば分かるんじゃね

27:デフォルトの名無しさん
17/11/11 08:36:27.60 Smy5DbHD0.net
MP4ファイルのプロパティ値を取得するプログラムでエラーが発生してしまいます
★の箇所で「'NameSpace'メソッドは失敗しました：'IShellDispatch6'オブジェクト」のダイアログが出ます
参照設定Microsoft Shell Controls and automaitonを追加してもだめでした
解決方法がわかれば教えてください
Private Sub CommandButton1_Click()
Dim Shell, Folder
Set Shell = CreateObject("Shell.Application")
Set Folder = Shell.Namespace(range("A1").Value) ←←←★

28:デフォルトの名無しさん
17/11/11 09:03:00.19 Smy5DbHD0.net
>>26
こちらのサンプルでとりあえず動きましたお騒がせしました
Dim FSO As Variant, SHell As Variant, Folder As Variant
Set FSO = CreateObject("Scripting.FileSystemObject")
Set SHell = CreateObject("Shell.Application")
Set Folder = SHell.Namespace(FSO.GetFile(Songs(1)).ParentFolder.Path)
Cells(1, 1) = Folder.GetDetailsOf(Folder.Parse

29:Name(Target), 0)

30:デフォルトの名無しさん
17/11/11 12:39:17.23 KQr/r2/c0.net
エクセル２０１３を使用しています。
今、日付を手入力しているのですが、何かで見たのですが
カレンダーから選択して入力できる機能があるのですがエクセルでもできる方法ないでしょうか？
いろいろさがした所アクセスはできるのですがエクセルは標準でもなく
カレンダーコントールなるものあるみたいですが、アクセスもインストールしていないので
VBAマクロの中にもありません

31:デフォルトの名無しさん
17/11/11 14:37:40.42 iMxfLIL8a.net
>>14
両方同時にではない。
Worksheetを変数に入れたということはブック情報も込みで入ってる。
だから便利なの。
Aブックのαシートを変数に入れてもその変数でBブックのαシートにアクセスできるわけじゃない。
君のBn.T式のやり方だとBブックのαシートにもアクセスできることになる。
それはBn.Worksheets(T)式と変わらない。
一方、もしBブックのαシートにアクセス出来ないのならBn.T式の意味が無い。
T式で良いわけだから。

32:デフォルトの名無しさん
17/11/11 15:59:40.18 D533txsCa.net
>>27
動くのは結構なことだけどFSO無くてもファイル情報取れるよ。
他の部分で便利にFSO使ってるなら良いんだけどその部分だけ見たら無駄だよね。
Dim objShell As Object
Dim objFolder As Object
Dim objFItm As Object
Set objShell=CreateObject("Shell.Application")
Set objFolder=objShell.Namespace("C:¥Users¥Hoge¥Desktop")
Set objFItm=objFolder.ParseName("fuga.txt")
Debug.Print objFolder.GetDetailsOf(objFItm,3)
参照設定とか書いてるけど、それぞれの意味分かってる?
CreateObjectってのは、その場で名前を元にオブジェクトを作成する。
だからコード書いてる間にはどんなメソッドやプロパティがあるか分からないからインテリセンスでの候補が出ることもない。
参照設定は使うオブジェクトを事前に指定することでオブジェクトの型とかメソッド、プロパティにアクセス(インテリセンス等)しやすくするためのもので、CreateObject使ったり、オブジェクトの型をObjectにしてるんだったら意味がない。
CreateObjectで生成出来ないのも有るし参照設定のがある意味上位互換だけど人にコードを提示する場合は参照設定するよう指示も書かなくちゃなんないからCreateObjectでの例が多いんだけどさ。
もちろん、参照設定したら動くようになるなんてことも無い。
Dim objShell As Shell
Dim objFolder As Folder
Dim objFItm As FolderItem
Set objShell=New Shell
Set objFolder=objShell.Namespace("C:¥Users¥Hoge¥Desktop")
Set objFItm=objFolder.ParseName("fuga.txt")
Debug.Print objFolder.GetDetailsOf(objFItm,3)

33:デフォルトの名無しさん
17/11/11 16:02:23.93 vmoy6u3Z0.net
参照設定は極力しないほうが良いよね
参照設定を忘れてドハマリすることがたまによくある

34:デフォルトの名無しさん
17/11/11 16:04:50.69 D533txsCa.net
>>28
エクセルでも出来るんだけど非常に上級者向けなんです。
上級者でも自分で1から組めない人が多いんじゃないかと思う。
上級者って何?、お前の勝手な分類だろって言われればそうなんだけど。

35:デフォルトの名無しさん
17/11/11 17:24:06.37 vmoy6u3Z0.net
>>28
エクセルアドインカレンダー
で検索すれば色々見つかるよ
使いやすいもの選べばよろし

36:デフォルトの名無しさん
17/11/12 05:18:36.72 Dmy+tyrb0.net
>>28
UserForm使えば簡単に自作できますよ。
年と月用のテキストボックスをつけて、年と月それぞれ増減させるために、スピンドルボタンをつける。
日付表示用のラベルを必要数用意。
年と月のテキストボックスの値に応じて、ラベルの表示を変更。
ラベルのクリックイベントで、年と月のテキストボックスとラベルのテキストを連結して、日付に変換。
ラベルのクリックイベントは、クラスでまとめれば、クリックイベントをたくさん書く必要もありません。

37:デフォルトの名無しさん
17/11/12 06:52:57.92 UfHz6itl0.net
スピンボタンな

38:デフォルトの名無しさん
17/11/12 11:00:33.46 61FaOR6Wd.net
コードっていろんなパターンあってたくさん書いてると思うんだけど、コードの保管ってメモ帳？？

39:デフォルトの名無しさん
17/11/12 11:17:54.47 QqFg5+2e0.net
>>36
エクスポートできるよ
gitとかsubversionとか使えばいい

40:デフォルトの名無しさん
17/11/12 11:23:55.96 61FaOR6Wd.net
連投すまんが、セルを方眼紙にして、フォームの中に直線コマンド、円コマンド、角コマンド等CADみたいなそれぞれ押したらそれが、反映されて作画って出来る？

41:デフォルトの名無しさん
17/11/12 11:28:28.89 QqFg5+2e0.net
>>38
できるかできないかで言うと出来る
各図形の位置に当るセルの背景色を変えれば良いだけ

42:デフォルトの名無しさん
17/11/12 12:15:44.63 chRcmei30.net
>>36
ブログ作ってそこによく使うコードを置いてある
いつでもどこでも検索すれば出てくるので非常に便利

43:デフォルトの名無しさん
17/11/12 12:16:32.95 chRcmei30.net
>>38
できるけどかなりめんどくさい
cacooとか既存サービス使った方が良いと思う

44:デフォルトの名無しさん
17/11/12 17:01:38.36 eJwcw8mO0.net
>>34
簡単じゃないだろw
しちめんどくせーよ

45:デフォルトの名無しさん
17/11/12 17:02:12.03 eJwcw8mO0.net
>>36
モジュールをそのまま保存できるだろ

46:デフォルトの名無しさん
17/11/12 18:22:11.84 syzs4wk80.net
>>42
他に手軽な方法がないからUserFormで作れるようにしておくのが一番いいぞ。

47:デフォルトの名無しさん
17/11/12 18:36:30.88 eJwcw8mO0.net
>>44
まあそれしかないのはそうなんだけどさ

48:デフォルトの名無しさん
17/11/12 20:02:01.58 Dmy+tyrb0.net
vbのランタイムをインストールすればDateTimePicker使えるけど、Formでカレンダー自作しておけば簡単に使い回したり配布出来るから一個作っておくといいと思いますよ。

49:デフォルトの名無しさん
17/11/12 22:30:08.29 XHSQB0UC0.net
フォルダ1
┗XXX29年10月.xlsx
　XXX29年11月.xlsx
　YYY29年10月.xlsx
　YYY29年11月.xlsx
フォルダ2
フォルダN
フォルダ1内に今月のファイルがあったらコピーして名前を翌月に変更して保存
これをフォルダNまで同じように処理する方法教えてください
年月の取得はユーザーフォームが理想ですが全く分らんので
マクロ実行用ファイルのA1に年、A2に月入力して取得する感じを考えてます

50:デフォルトの名無しさん
17/11/12 23:03:42.29 eJwcw8mO0.net
>>47
今月のファイルを探したいならDate関数使えば今日の日付が出るからそっからformatなりyearとmonthくみあわせるなりで取得すればいいからわざわざ入力させる必要がないね
フォルダないのファイル名の取得ならググればいくらでも出てくるぞ
俺はfilesystemobjectを使うけど

51:デフォルトの名無しさん
17/11/12 23:12:47.43 UfHz6itl0.net
>>47
まずは最初の部分だけ
今年 = Format(Now, "e")
今月 = Month(Now)
来月 = DateAdd("m", 1, Now)
年 = Format(来月, "e")
月 = Month(来月)

52:デフォルトの名無しさん
17/11/12 23:16:31.66 UfHz6itl0.net
変数に残す必要なかった
今月 = Format(Now, "ee年mm月")
来月 = Format(DateAdd("m", 1, Now), "ee年mm月")

53:デフォルトの名無しさん
17/11/13 00:50:26.46 cup53tTa0.net
どうしてもカレンダー欲しいんだったらSysDateTimePick32使って頑張るだろうな。
面倒くさいけど他のコントロールもMSFormsを使わないウィンドウ作成もやったことある。
きちんとプロパティ作るの面倒くさいから使いたいものしか実装してないけど。

54:デフォルトの名無しさん
17/11/13 00:58:21.51 cup53tTa0.net
>>48
ファイル名取得にfilesystemobjectは激重だった気がする。
Dir関数で頑張る方がよっぽど速い。
これが原因でfilesystemobjectは使わなくなってしまった。
他では速いものもあるのに食わず嫌いになった。

55:デフォルトの名無しさん
17/11/13 01:02:34.35 AtJ4gbq1x.net
>>52
処理対象のファイルのロングパスがDirの引数の字数制限を越えてるときはどうするの？

56:デフォルトの名無しさん
17/11/13 06:21:29.66 gczEvEcT0.net
そもそも劇重なんて思ったことないが...

57:デフォルトの名無しさん
17/11/13 08:01:19.66 4dN82Cnsd.net
なんか別のものと勘違いしてるんじゃないか

58:デフォルトの名無しさん
17/11/13 08:26:57.35 pr331NCP0.net
たかがファイル名を取得するのに処理負荷を感じるほど重くなるとか考えられないな。
読み取り先が等速ドライブに突っ込んだCDだったとか、回線の細いNASだったとかなら分かるけど。

59:デフォルトの名無しさん
17/11/13 09:22:13.43 mbcSFLNRa.net
>>52
クラスにして使いやすくしてるならDir関数でもいいと思うけど生で使う気は更々起きねーなあれは
めんどくさすぎる
早い遅いは環境次第だろう
何をしようとしたか知らんが

60:デフォルトの名無しさん
17/11/13 12:42:29.30 IBZYfbeXM.net
またVBAでクラス語る奴が来ちゃったよ...

61:デフォルトの名無しさん
17/11/13 12:44:49.20 U+ZWq00Pa.net
なんかWindows10でマクロの挙動が安定しなくなったんだけど、そういうのある？

62:デフォルトの名無しさん
17/11/13 13:17:08.13 GJIgK8HXa.net
>>58
語ってるつもりはないし、普通に機能としてあるのに使ってバカにされる筋合いもない

63:デフォルトの名無しさん
17/11/13 13:21:12.07 ck+reS0/0.net
vbaでクラス使うメリットあるの？
一応あるインターフェースは使い物にならないし、継承も使えないし、コンストラクタに引数も設定出来ない。
vbaでクラス使うメリット教えて

64:デフォルトの名無しさん
17/11/13 13:21:56.90 GJIgK8HXa.net
>>61
カプセル化

65:デフォルトの名無しさん
17/11/13 13:43:14.72 4dN82Cnsd.net
>>61
たまにある
単体の処理してる間だけじゃなく、しばらくの間は状態を持っててほしいとき
ごく素朴な使い方しか出来ないし、しようとも思わないけど

66:デフォルトの名無しさん
17/11/13 13:48:11.54 GJIgK8HXa.net
というか、クラスを使うデメリットって逆に何

67:デフォルトの名無しさん
17/11/13 13:52:55.00 HKnEhqdPd.net
そもそもクラスが必要になるほど大規模なコードを書く用途にVBAは向いてない、使うべきじゃない
ちゃんとした開発環境を使え
会社が許可しないなら転職するか我慢するかの二択、あるいは出世して自分で規則を変えろ
仕事の能率がアップして利益が増えるんなら反対する理由はないだろ

68:デフォルトの名無しさん
17/11/13 15:44:46.11 XD2Cv4t70.net
自分の好きなコードが書けないから転職とかww

69:デフォルトの名無しさん
17/11/13 15:54:24.73 IBY/CNJo0.net
不合理なことを押し付けてくる会社なら、転職も選択肢ってことだろ。日本語ﾀﾞｲｼﾞｮﾌﾞ？

70:デフォルトの名無しさん
17/11/13 16:07:38.26 pr331NCP0.net
クラスを使うとシンプルに表現出来る場合がある。規模の問題では無い。
普通に使ってるとなかなか活用するイメージが湧かないけど、覚えておくと役に立つよ。

71:デフォルトの名無しさん
17/11/13 17:08:14.63 GJIgK8HXa.net
ここでも前に書いたけど、配列のラッパークラスとか、一度作ると便利よ
コレクションだと微妙に取り回し悪かったりするからね
これ以上はスレチかな

72:デフォルトの名無しさん
17/11/13 17:09:30.17 4dN82Cnsd.net
>>68
そうだよね
ただ、いちいちクラスモジュールを追加しなきゃならないから、使い捨てクラスをほいほい定義しづらい

73:デフォルトの名無しさん
17/11/13 17:20:46.73 78YzXPYPa.net
FileSystemObjectのファイル一覧取得が遅いのなんて結構有名な話だと思うんだが。
ハードディスクにあるファイル名全部取ってくるとかすれば分かる。
昔

74:、どっかに比較してる所が有ったんだが見つからないな。 Win32APIが一番速かったがDirでもそんなに大きな違いは出なかった。が、FileSystemObjectは糞遅い結果になってた。そもそも自分で組んだら遅くてネットで調べたらやっぱり遅かったという。

75:デフォルトの名無しさん
17/11/13 17:23:43.47 78YzXPYPa.net
クラスは凄く便利だが、無理に使う必要は無いと思う。
個人的には仕様を考えた段階でクラス使うのがぴったりと感覚で分かる。
そういう時以外は使わない。

76:デフォルトの名無しさん
17/11/13 17:47:02.85 GJIgK8HXa.net
>>71
そうなんか
まあ、今んとこそんな大量のファイルのやり取りしたことないから体感したことなかったわ
まあ、その辺使うにしても生で扱うよりクラスでまとめちゃった方が取り回し良さそうだがね
その辺は好みなんだろうけどね

77:デフォルトの名無しさん
17/11/13 18:55:14.32 IBZYfbeXM.net
>>64
まともな言語ならクラスを使うデメリットはないけどVBAのクラスは制限が多すぎて使う意味がない

78:デフォルトの名無しさん
17/11/13 19:08:08.64 wM5leOdq0.net
>>59
bit数の関係で安定しなくなったことはある
>>61
多分、ない
class使ったほうが見通しがよくなる場合はあるけど、
正直そんなに変わらんというか、めんどくさくなるだけの場合が多い気がする

79:デフォルトの名無しさん
17/11/13 21:27:40.19 qqs7mRHsj
この流れで突然クソみたいな質問するの恐縮なのですが…
共有で使っているExcelのデータの行がランダムに大量に消える現象が起きてます
多分誰かがオートフィルタかけた状態でうっかり削除したんだと思うんですが、
消えた行に全く共通点が無いので「マクロにウイルスが付いたんだ！マクロやめろ！」って因縁付けられています

まずVBAにウイルスを仕込むならともかく、VBAを使用しているせいでウイルスに感染するって無いですよね？
あとこのコードに行を消すような要素があるか見てもらいたいです
オートフィルタをかけるだけの簡単なコードなんで無いと思うんですが周りに誰も聞ける人が居ないので一応…
簡単な指示だけどすごく頻繁に使うので消したくないんです

Sub filter1()
　　 Range("K2").AutoFilter Field:=9, Criteria1:="<>"
　　 Range("L2").AutoFilter Field:=10, Criteria1:=""
　　 Range("O2").AutoFilter Field:=13, Criteria1:="AA"
End Sub

Sub filter2()
　　 Range("K2").AutoFilter Field:=9, Criteria1:="<>"
　　 Range("L2").AutoFilter Field:=10, Criteria1:=""
　　 Range("O2").AutoFilter Field:=13, Criteria1:=""
End Sub

Sub filter3()
　　 If ActiveSheet.FilterMode = True Then
　　 ActiveSheet.ShowAllData
　　 End If
End Sub

80:デフォルトの名無しさん
17/11/13 21:36:08.79 S878v5EG0.net
この流れで突然クソみたいな質問するの恐縮なのですが…
共有で使っているExcelのデータの行がランダムに大量に消える現象が起きてます
多分誰かがオートフィルタかけた状態でうっかり削除したんだと思うんですが、
消えた行に全く共通点が無いので「マクロにウイルスが付いたんだ！マクロやめろ！」って因縁付けられています
まずVBAにウイルスを仕込むならともかく、VBAを使用しているせいでウイルスに感染するって無いですよね？
あとこのコードに行を消すような要素があるか見てもらいたいです
オートフィルタをかけるだけの簡単なコードなんで無いと思うんですが周りに誰も聞ける人が居ないので一応…
簡単な指示だけどすごく頻繁に使うので消したくないんです
Sub filter1()
Range("K2").AutoFilter Field:=9, Criteria1:="<>"
Range("L2").AutoFilter Field:=10, Criteria1:=""
Range("O2").AutoFilter Field:=13, Criteria1:="AA"
End Sub
Sub filter2()
Range("K2").AutoFilter Field:=9, Criteria1:="<>"
Range("L2").AutoFilter Field:=10, Criteria1:=""
Range("O2").AutoFilter Field:=13, Criteria1:=""
End Sub
Sub filter3()
If ActiveSheet.FilterMode = True Then
ActiveSheet.ShowAllData
End If
End Sub

81:デフォルトの名無しさん
17/11/13 21:42:36.96 zsNLMe3/0.net
シート保護かけてみるとか

82:デフォルトの名無しさん
17/11/13 21:45:59.98 wM5leOdq0.net
>>77
ウィルスに感染していて、セキュリティをsageているためにウィルスが実行されているというパターンなら考えられるが
其れ以前の問題として
・オートフィルタをかける
・全体をコピー
・ペースト（値として貼り付けなど）
で行が減っている可能性のほうが高いと思う
この仕様
、意外と知られていないんじゃないかなぁ

83:デフォルトの名無しさん
17/11/13 22:24:58.44 S878v5EG0.net
>>79
それって別のシートやブックに貼り付けるときに可視セルだけ貼り付けられているという意味ですか？
別のブックやシートにコピーする事は無いと思うので可能性としては低い気がします…
試しにオートフィルタしながら同じシートに

84:貼り付けようとしたら「コピー領域と貼り付け領域が違うため貼付できません」となりました

85:デフォルトの名無しさん
17/11/13 22:25:14.14 GJIgK8HXa.net
>>77
まあ、自作マクロでウィルスどうこうはあり得ないわ
コード見る限りでも、フィルターかけてるだけで値の操作はしてないしな
まあ、フィルターかけっぱなしにならないようにブッククローズ時にフィルター解除すれば？

86:デフォルトの名無しさん
17/11/13 22:28:52.42 wM5leOdq0.net
>>80
＞それって別のシートやブックに貼り付けるときに可視セルだけ貼り付けられているという意味ですか？
そう
＞別のブックやシートにコピーする事は無いと思うので可能性としては低い気がします…
そか
オートフィルタならまずこれかなーと思ったけど、コピーペーストしてないなら違うかな

87:デフォルトの名無しさん
17/11/13 22:30:45.38 GJIgK8HXa.net
フィルターで謎のデータ消失なら質問者の疑念通りフィルターかけたまんま範囲削除じゃねーかな

88:デフォルトの名無しさん
17/11/13 22:32:36.92 wM5leOdq0.net
実際のコード上げたほうがいいかもねぇ

89:デフォルトの名無しさん
17/11/13 22:46:30.32 S878v5EG0.net
ありがとうございます
コードがおかしいわけじゃないなら良かったです
一応ここに貼ったコードはAAの部分に別の単語が入ってるだけで他は全て実際に使っているものと同じです
クローズ時にフィルター解除するようにはしてなかったのでやってみます

90:デフォルトの名無しさん
17/11/14 09:16:46.87 8wZuibTmp.net
インターネットが壊れた！みたいなのはやめてください！

91:デフォルトの名無しさん
17/11/14 09:53:14.55 tqdP1JBma.net
エクセルの特定の行だけ消すウイルスとか笑えるわ
まあ、バグ満載のマクロとかある意味ウイルスだけど

92:デフォルトの名無しさん
17/11/14 11:29:31.52 G7+v7Fl70.net
ウィルスは簡単に作れるだろ。
リテラシー無い奴が増えたからウィルスとは何ぞ?という議論が必要かも知れんが。
ただ、ExcelよりはAccessとかのが簡単だから大丈夫なんか?と思ったことあるけど。
Application.VBE系のコードが動くようになってれば感染させるのは簡単。
通常、Excelではセキュリティ設定で動かないようにはなってる。
Accessには設定が無い。
WordやPowerPointはどうだったかな。
Application.VBE系ってのはコード書いてるエディタを弄るものでVBAでコードを追加出来る。
つまり自分自身のコードをHDD上の不特定なxlsファイル開いて追加すれば自己増殖出来るし、Auto_Open辺りを追加して次回誰かが開いた時に勝手に実行させることも出来る。
ついでにそのxlsファイルをメールに添付して、アドレス帳の適当な所に送ることも出来る。
少し書ける奴なら分かってるだろうからApplication.VBE系は動かない設定になってるだろう。
Application.VBE系は便利でGithubにアップしたり、VBAのバックアックしたり、コード取得してWinmergeに与えて比較したり色々利用してたけどVB.netのCOMアドインに移行中。

93:デフォルトの名無しさん
17/11/14 11:36:59.15 JNyIRsqMM.net
隙あらば自分語り

94:デフォルトの名無しさん
17/11/14 12:24:48.16 vavtQv330.net
長文はスルーで

95:デフォルトの名無しさん
17/11/14 12:38:00.31 Tcgv7xMn0.net
コンピュータウィルスって「操作している人間の意に沿わない動きをするプログラム」だったと思ったんだけど、
いつの間にか定義が変わったのか。
CDトレー開いたりマウスをランダムに動かすジョーク系もウィルスだったはずだから>>77のもウィルスと言っていいと思ったんだが。

96:デフォルトの名無しさん
17/11/14 12:42:08.62 dN7NjwRxp.net
>>91
その定義だと世の中のあらゆるソフトはウイルスになるんじゃね
バグはあるからな
AndroidやiOSもウイルスになる

97:デフォルトの名無しさん
17/11/14 13:07:49.89 5gpUPtII0.net
>>91
その定義だとワームやトロイの木馬とウィルスが区別できないわけだが
いくら今だとより広義に使われるとはいえ
>>いつの間にか定義が変わったのか
はそのままお前に返してやるよ

98:デフォルトの名無しさん
17/11/14 13:09:39.12 Tcgv7xMn0.net
>>92
バグは確か「論理的に正しくない結果を

99:もたらす何か」みたいな定義だったと思う。マシン内に虫が侵入して電気的にショートするのが語源だしね。同じ定義で使い続けるとバグとウィルスがあやふやになるというのは時代の流れだなぁ。

100:デフォルトの名無しさん
17/11/14 13:16:31.95 Tcgv7xMn0.net
>>93
ワームもトロイの木馬も、元々はコンピュータウィルスを感染させるテクニックというか、
媒介手順だったはずがいつの間にか独立してウィルスの親戚みたいな扱いになってるよなぁ。

101:デフォルトの名無しさん
17/11/14 14:03:33.75 5gpUPtII0.net
>>95
もともと、「感染」しないものはウィルスじゃない
いつのまにか独立したんじゃなくて、初めからちゃんと別物でちゃんと区別されていたんだが
いつのまにかまとめてウィルスと呼ばれるようになったんだ
今じゃマルウェア全般が広義にウィルスって言われる始末
バグは語源は諸説あるが、作成者の意図にそわない動作
ウィルスは作成者の意図にそった動作するプログラム
いくらなんでもそれを混同しないでくれ

102:デフォルトの名無しさん
17/11/14 17:57:06.04 Tcgv7xMn0.net
>>96
だからトロイの木馬もワームも単体ではウィルスじゃなかったんだよ。
言うなればコンテナみたいなものなんで、トロイの木馬型のパッチプログラムとかも可能だし。
たぶん想像している「定義づけられた時期」が違うせいで食い違ってるだけだな。

103:デフォルトの名無しさん
17/11/14 17:58:22.04 MC75ktwb0.net
もうやめよう

104:デフォルトの名無しさん
17/11/15 10:46:14.78 PQCfnSyv0.net
>>97
???
自己増殖しなきゃウィルスじゃない。
トロイもワームもウィルスじゃねーだろ。

105:デフォルトの名無しさん
17/11/15 12:15:18.42 l7NNgtZ+d.net
プログラミングによる業務自動化絶対阻止マンがいて、ウィルスだろうがワームだろうが
題目はなんでもいいから邪魔しようとしている
という妄想をした...
...疲れているようだ

106:デフォルトの名無しさん
17/11/15 12:24:36.36 CIMTn4iP0.net
vbaが駄目なら関数でやればいいじゃない

107:デフォルトの名無しさん
17/11/15 12:41:18.42 PQCfnSyv0.net
いや、だからApplication.VBE系の実行を拒否する設定にしておけばOK。
普通はそうなってる。
マイクロソフトも散々懲りたということだろう。
Accessはそうなってないから危険だけど、どっちにしろアンチウィルスソフト入れたり、それなりに敏感ならまあ大丈夫だろう。
メールに添付されたファイルを何も考えずに開くようなバカのいる所はそもそもコンピュ－タ使うなって話。

108:デフォルトの名無しさん
17/11/15 15:25:25.16 PmECE2vTd.net
Excel2010からExcel2013にしたら「ライブラリが見つかりません」というが発生しました。
他のPCで作成したExcelファイルを開こうとしたら上記のようなエラーが発生したのです。
Excel2010の時も参照設定は参照不可になっておりましたがExcelに記載されているデータを
参照するだけでVBSは動かさないのでExcel2010ではエラーになりませんでしたが、Excel2013
ではファイルを開いた際に「ライブラリが見つかりません」というエラーになります。
これはExcelに開いた際に参照設定のチェックをしないみたいな設定があるのでしょうか？

109:デフォルトの名無しさん
17/11/15 17:08:22.00 MYmTne2b0.net
>>103
説明がひどいなw

110:デフォルトの名無しさん
17/11/15 20:25:36.13 m2725R1N0.net
vbeのツールのライブラリファイルって実体はなになんですか？参照不可になったりしますが
オブジェクトエクスプローラのライブラリともちがうし

111:デフォルトの名無しさん
17/11/15 21:27:06.93 BuHcCqTIx.net
>>103
VBSとオブジェクトライブラリに何の関係があるんだ？

112:デフォルトの名無しさん
17/11/15 23:13:12.29 gnIues9e0.net
メモリリークはVBAでどう対処すればいい？
巨大なファイルクローズ後にまるまんまリークするのですが

113:デフォルトの名無しさん
17/11/15 23:18:44.71 R7mLmomD0.net
巨大なファイルは
・作らない
・分割する
・変換する
・開かずに読み取る
・csvならテキストとして読み込む
この辺
メモリリークはある意味どうしようもないので前提からどうにかしないと解決しない

114:デフォルトの名無しさん
17/11/15 23:25:33.43 gnIues9e0.net
>>108
ありがとう。思い当たるのもあります。
・開かずに読み取る
　これ、できるんですね。調べてみます

115:デフォルトの名無しさん
17/11/16 02:14:21.20 Og9f/0gn0.net
俺なら読み取り専用で一部だけ読んで閉じる

116:デフォルトの名無しさん
17/11/16 12:25:39.51 NqwHUE6Zr.net
>>107
それはメモリリークではないので気にする必要はありません

117:デフォルトの名無しさん
17/11/17 11:56:05.53 8RvIbz6z0.net
巨大なファイルをSSDのHDDに移すと速いんじゃね

118:デフォルトの名無しさん
17/11/17 11:57:22.13 8RvIbz6z0.net
HDDってかいたけどHDDじゃないけどな

119:デフォルトの名無しさん
17/11/17 12:27:16.57 OabwNEEsd.net
SSDのHHDのFFD

120:デフォルトの名無しさん
17/11/17 17:41:51.06 1LBcgp5Vd.net
VBAで原価計算してる人いる？

121:デフォルトの名無しさん
17/11/17 20:16:29.56 Iig4V4n+H.net
Dir関数で末尾$のフォルダを確認するとエラーになる。
（配下のフォルダはエラーにならない）
これ、どんな理由でしょうか？

122:デフォルトの名無しさん
17/11/18 00:56:48.74 lwdaQlHz0.net
>>116
なぜエラーの内容を書かないのか
軽く試した範囲ではエラーにならないな
環境とエラー内容と、実際にエラーになるコード晒せ

123:デフォルトの名無しさん
17/11/18 12:07:28.26 +9+JGsY3H.net
>>117
ですよね。すんません。
'Case NG
?Dir("¥¥Svr¥Share$", vbDirectory)
'Case OK
?Dir("¥¥Svr¥Share$¥Sub", vbDirectory)
アクセス権は親フォルダから継承していますので双方UNCアクセス可能な状態です。Domain Admins権限で実行しています。
GetAttrの戻りは双方 16 です。
共有名に$をつけない場合は発生しないように見受けられます、、、
と、思ったのですが、$の有無ではなくて、共有フォルダ自体を指定すると発生するようです。
エラーは、52: ファイル名または番号が不正です。となります。
ご教示お願いします。

124:デフォルトの名無しさん
17/11/18 12:11:55.49 +9+JGsY3H.net
>>117
環境は、
2008Server
Win7Pro/Excel 2010@vmware 5.4.0
です。

125:デフォルトの名無しさん
17/11/18 13:20:32.42 +9+JGsY3H.net
>>117
末尾を"¥"で終わらせるとエラーにならないことがわかりました。でも戻りが "." になります。わからなくもないですが "Share$" を期待していたので、、
どう解釈すればいいのでしょうか。
（Dir を使う際は末尾 "¥" を励行したほうがいい？）

126:デフォルトの名無しさん
17/11/18 17:21:41.22 lwdaQlHz0.net
UNCパスでそこは共有名であってフォルダ名じゃない気がするが

127:デフォルトの名無しさん
17/11/18 17:56:31.65 HVgorTjE0.net
すいません　wordのVBAです。画像貼りつけて文字列の折り返しを背景にするのに下記では2行目で
描画の対象とならないオブジェクトが選ばれているためにtypeメソッドまたはプロパティは使用できません。
となりますが、どうしたらよいですか？
Selection.InlineShapes.AddPicture FileName:="a.jpg", SaveWithDocument:=True
Selection..ShapeRange.WrapFormat.Type=wdWrapBehind

128:デフォルトの名無しさん
17/11/18 19:38:08.85 +9+JGsY3H.net
>>121
なんかややこしいですね。
共有名に "¥" をつけて初めて共有フォルダのルートフォルダとして認識される、と覚えておくことにします。

129:デフォルトの名無しさん
17/11/18 22:21:46.28 +9+JGsY3H.net
立て続けにすんません。
onAction の引数について、全角英数記号が半角に解釈されて実行されてしまうのは既知の仕様でしょうか？
ひらがなカタカナは被害を受けないようです。
CommandBars.ActiveControl.Caption
CommandBars.ActiveControl.OnAction
あたりで変換前の文字列を救出できるようですが、、根本的対応はないのでしょうか。
上記で躓いてしまい、公式で情報をみつけられなかったもので、、

130:デフォルトの名無しさん
17/11/19 10:05:19.39 M3mw+ZdH0.net
>>122
まずさ、Selection使うの辞めようぜ。
Hoge.Select
Selection.Fuga
という形が有ったらたいてい
Hoge.Fuga
という形にできる。
つまりね、大抵は選ぶ必要がない。
ある程度書ける人は選ぶ処理をいかに無くすかを考える。
そうすればApplication.ScreenUpdating=False使っても
速度が変わらなくなる。
ちらつき防止のために使うのが有用なのは変わらないんだけど。
.Selectを使うのはユーザーに明示的に場所を示す場合と、
本当にどうしようもない場合がごくまれにあるだけだ。
オブジェクトブラウザでShapeRangeとかWrapFormatを
調べてそこに何が(型)期待されてるかを調べる。
後は合わせれば良いだけだ。

131:デフォルトの名無しさん
17/11/19 10:10:14.58 M3mw+ZdH0.net
>>124
"OnAction" "全角"でググると結構出てくるね。
コメント以外で日本語使うこと無いから遭遇する事無かったわ。

132:デフォルトの名無しさん
17/11/19 11:46:20.87 JvH46D6m0.net
>>125
＞.Selectを使うのはユーザーに明示的に場所を示す場合と、
「ユーザーが明示的に選択したオブジェクトを処理する場合」も追加願います

133:デフォルトの名無しさん
17/11/19 11:56:21.06 aexN4+ic0.net
追加願いますって何を言ってるんだ？？？

134:デフォルトの名無しさん
17/11/19 12:23:26.42 JvH46D6m0.net
>>128
>>125が
＞.Selectを使うのはユーザーに明示的に場所を示す場合と、
＞本当にどうしようもない場合がごくまれにある　「だ　け」　だ。
と言ってるから、もう一つのパターンもあるよ、と言ってるわけだが？

135:デフォルトの名無しさん
17/11/19 12:30:59.55 aexN4+ic0.net
select使わない理由は誤作動の原因になるからの方が多いんじゃないか
もちろんパフォーマンスも大きく変わるけど、言うほど変わらない
それよりもコード上、何のブック、シートがactivateになっているかを把握する方が遥かにめんどくさい

136:デフォルトの名無しさん
17/11/19 12:55:38.95 YlgcavI50.net
作ってるものが偏っているからActiveSheetやSelectionを使う機会がないだけで、
もっと操作補助的な面の強いマクロなら使う場面もあるかもしれない。

137:デフォルトの名無しさん
17/11/19 12:57:36.65 aexN4+ic0.net
確かにコードの最後にcells(1,1).selectはよく書くけど、それ以外のselectは>>125の通り「本当にどうしようもない場合」だけだな
オートシェイプかなんかでsetできなかったような、忘れたけど

138:デフォルトの名無しさん
17/11/19 13:53:20.81 wFQIPa4T0.net
IOと純粋関数部分を分けるようにと、Hな言語から学んだよ。

139:デフォルトの名無しさん
17/11/19 13:59:20.49 ZK6mPT5SM.net
>>131
> もっと操作補助的な面の強いマクロなら使う場面もあるかもしれない。
まあそれが
> .Selectを使うのはユーザーに明示的に場所を示す場合と、
> 「ユーザーが明示的に選択したオブジェクトを処理する場合」
なわけだが

140:デフォルトの名無しさん
17/11/19 16:16:58.30 M3mw+ZdH0.net
>>130
誤動作とか以前に無駄なことをしたくないという自然な考えがある。
Cells(1,1).Select
Cells(1,2).Select
Cells(1,1).Select
と書かれてたらなんじゃこれと思うだろ。
マクロの記録は操作を自然に記録してしまうけど、
やりたいことはそれじゃない。
それにコードも汚くなって読みたくないものになる。

141:デフォルトの名無しさん
17/11/19 16:18:58.83 8D87jpDPa.net
ユーザーが明示的に選択したものに～
ってのもぶっちゃけ運用の問題の気もするが
マクロ化の範囲にもよるんだけども
可能な限り避けるべきってのは正しいでしょ

142:デフォルトの名無しさん
17/11/19 17:16:48.30 JvH46D6m0.net
>>136
＞可能な限り避けるべきってのは正しいでしょ
そうなの？
実際それをやることは少ないけど、別に避けてるわけじゃないな。
「ボタンを押すと、選択しているセルの書式を～する」なんて処理はたまにある。

143:デフォルトの名無しさん
17/11/19 17:30:54.95 SAgRzZs9a.net
ユーザーが明示的に選択したものに処理を与えるってのはアリだとは思う。
でもそれはHoge.Selectでは無くてSelectionを使う場合だよね。

144:デフォルトの名無しさん
17/11/19 17:35:35.45 JvH46D6m0.net
>>138
なるほど
最初のきっかけとなった>>125の1行目が、
＞まずさ、Selection使うの辞めようぜ。
だったからずっと Selection のことを語っていた

145:デフォルトの名無しさん
17/11/19 17:48:04.11 lBNHVI9l0.net
>>136
優先順位の問題でしょ
> ユーザーが明示的に選択したものに～
って言う仕様の方が
> 可能な限り避けるべき
より優先されるのは当たり前

146:デフォルトの名無しさん
17/11/19 17:50:02.84 aexN4+ic0.net
>>138
あぁそれはアリ
会社によっては多用するだろう

147:デフォルトの名無しさん
17/11/19 20:49:12.88 eK6D85VJ0.net
wordのマクロ組んでる人おらんのかな？

148:デフォルトの名無しさん
17/11/19 21:18:16.41 aexN4+ic0.net
>>122 >>142
そもそもwordを使わない
あととりあえず動くコードを書いてくれ
Selection..ShapeR
ピリオドがニコあって邪魔
で、差し込んだ画像の文字列の折り返しってのが何がしたいのか良く分からん
テキストボックスなら分かるしそれで通るけど

149:デフォルトの名無しさん
17/11/19 21:23:25.50 eK6D85VJ0.net
>>143　画像のレイアウトで背面にしたいんですよ。　なんかしらんけど動いて、なぜか前面で貼りつけられました。
なんかEXCELと勝手が違いますぬ・・・。

150:デフォルトの名無しさん
17/11/19 21:27:01.10 aexN4+ic0.net
>>144
エクセルと勝手が違うんじゃなくて、ただただ猛烈に使いにくいだけ
で、上手く行ったので質問は終了ってこと？

151:デフォルトの名無しさん
17/11/19 21:31:31.01 eK6D85VJ0.net
>>145　とりあえずは。　また多分色々とお伺いすることになると思いますが、
なにとぞよろしくお願いいたします。

152:デフォルトの名無しさん
17/11/19 22:32:44.41 Z3cAV0my0.net
wordはスレ違いだけどな
あんまりvbaと親和性もないし
あくまで文書ツールだからな

153:デフォルトの名無しさん
17/11/19 22:50:31.56 1/mWyqVE0.net
おいおいExcelかてただの文書ツールやぞｗ

154:デフォルトの名無しさん
17/11/19 22:56:21.06 aexN4+ic0.net
>>148
釣りはほどほどに

155:デフォルトの名無しさん
17/11/19 23:23:51.19 lBNHVI9l0.net
文書ツールとしてExcel使う奴はたくさんいるけど w

156:デフォルトの名無しさん
17/11/20 08:54:30.90 6BLE5ZLY0.net
>>146
まず君が貼り付けたのは何かを考えよう。
マクロ記録が示すコードを見ればInlineShapeだろう。
InlineShapeを調べれば文字列の中の位置を指定した図形ということらしい。
要は10文字目に挿入とかさ。
InlineShapeにはWrapFormatプロパティは無い。
文字列の折り返しを背景にするというのは回り込み等を自動でやるわけでその結果文字が動くだろ。
それじゃ位置を指定したことにならない。
だから出来ない。
それじゃあどうするかというと、InlineShapeをShapeに変換するというのが1つ。
InlineShapeにはConvertToShapeというのがあるから、それをShapeで受けてやればShapeにはWrapFormatプロパティがある。
Dim iShp As InlineShape
Dim Shp As Shape
Set iShp=Document("hoge.doc").Characters(10).InlineShapes.AddPicture("C:¥fuga.jpg")
Set Shp=iShp.ConvertToShape
Shp.WrapText.Type=wdWrapThrough
しかしそもそも最初からInlineShapeじゃなくてShapeを貼り付ければ問題にならない。
Set shp=Documents("hoge.doc").Shapes.AddPicture("C:¥fuga.jpg")
shp.WrapText.Type wdWrapThrough
Shapeは位置を指定出来ないといっても何文字目という意味で指定出来ないだけで、Left、Top、Width、Heightでの位置指定はできる。
今回の問題もSelectionだったな。
何のオブジェクトを触ってるのかはっきりさせずに組んでるからエラーの意味も分からない。

157:デフォルトの名無しさん
17/11/20 12:21:51.39 phW/Gatbr.net
>>150
そらそれが本来の使い方やもの
なに勘違いしてニヤニヤしとんねんお前
気色悪い奴だな

158:デフォルトの名無しさん
17/11/20 13:11:30.03 tncAZsVja.net
>>152
Jカスこんなところでも下らねー釣りしてんじゃねえよ

159:デフォルトの名無しさん
17/11/20 15:08:27.78 6BLE5ZLY0.net
WordVBAで使いにくいのは記録出来ても良さそうなものが記録出来ない所。
ただ、これはこっち�

160:ｪ出来ても良さそうと勝手に思ってるだけでMS的にはまずい何かが有るのかもしれない。それよりも困るのは Debug.Print Typename(hoge) とやってSelectionが帰ってくる所。型を知りたいのにSelectionは無いだろう。

161:デフォルトの名無しさん
17/11/20 17:44:20.81 PC8rzjhFa.net
>>154
型名調べる関数もうひとつあったよね
あんま使わんから忘れたけど

162:デフォルトの名無しさん
17/11/20 19:16:12.47 3EUEsxu/0.net
>>154
笑ったｗ

163:デフォルトの名無しさん
17/11/20 19:56:44.52 HiJj2X0L0.net
>>154
? typename(hoge)とやったら
Emptyと出てきたぞ。
あなた↓の頭と同じでカラッポ。

164:デフォルトの名無しさん
17/11/20 21:46:53.19 dynAF7sP0.net
>>151　ありがとうございます。　じつはそれで解決しました。
マクロで記録したらinlineshapeで、なんやねんこれ？と理解していなかったことが原因でした。

165:デフォルトの名無しさん
17/11/20 22:35:57.11 bUEYENj70.net
前スレ943様の下記ファイル、もう一度upしていただく訳にはいきませんでしょうか。
DLしようと思いながら、失念していて、先ほどしようとしたところ消えてしまっていました。
943様、お手数をおかけしますが何卒よろしくお願いいたします。
943デフォルトの名無しさん (ﾜｯﾁｮｲ 06e9-FqSh)2017/11/05(日) 15:01:02.75ID:2uRc+T650>>944 >>958
>>942
写真は辞めてくれ。見るのめんどくさい
出てきたからあげるわ
大体やりたいことはこれだと思う
・設定シートのB列に表示したいもの。C列は入力する文字を入れる
・入力シートのA1に「う」と入れて決定。リストが現れて「東京」「北海道」が現れるので選択する
もちろん「う」じゃなくても「東」なんかでもいい。場合によってはB列に「渋谷」とかいれてもいいかもしれない
URLﾘﾝｸ(dotup.org)
自分で言うのも何だがこれ超便利。かなりオススメ

166:デフォルトの名無しさん
17/11/20 23:57:02.00 3EUEsxu/0.net
こういう時はせめてエクセルアップロードできるアップローダーぐらい探してくると良いぞ

167:デフォルトの名無しさん
17/11/21 02:44:24.85 eIBN2cFq0.net
>>157
www
hogeをなんだと思ってる？
そりゃそのまま打てばEmptyが帰ってくるだろう。
hogeで察してくれんかね。
カラッポなのは誰の頭だよ。

次ページ