[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 03/22 05:48 / Filesize : 289 KB / Number-of Response : 1047
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Excel VBA 質問スレ Part57



1 名前:デフォルトの名無しさん mailto:sage [2018/09/10(月) 21:42:39.57 ID:K1uuwFLt.net]
ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK


※前スレ
Excel VBA 質問スレ Part56
mevius.5ch.net/test/read.cgi/tech/1534976724/

917 名前:デフォルトの名無しさん [2018/11/05(月) 23:37:43.98 ID:Vz2xlIAK.net]
>>868
Range.Textプロパティ、Valueプロパティが良く理解できなくて困ってます。
セルの指定で合ってますか?

コピー元の表の中からから1行(5セル分)コピーして、隣のシートの所定の位置に貼り付けたいです。
1行選択した後、マクロ起動させて隣のシートに張付けという操作です。頼みます、教えてください!

918 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 00:56:10.22 ID:bmwIjcqH.net]
>>877
Sub CopyToPrintForm()

ThisWorkbook.Worksheets("データ用シート名").Range("コピー元セルの行番号:コピー元セルの行番号").Copy Destination:= ThisWorkbook.Worksheets("印刷用シート名").Range("コピー先セルの行番号:コピー先セルの行番号")

End Sub

919 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 01:09:36.50 ID:bmwIjcqH.net]
>>877
印刷するデータの行をユーザーに選ばせる場合、ユーザーに行選択させた状態で以下のマクロを実行させるようにするとかでいいだろ
文字通り一行コピーしてしまうので要注意

>>877
Sub CopyToPrintForm()

ThisWorkbook.Worksheets("データ用シート名").Activate
ActiveCell.EntireRow.Copy Destination:= ThisWorkbook.Worksheets("印刷用シート名").Range("コピー先セルの行番号:コピー先セルの行番号")

End Sub

920 名前:デフォルトの名無しさん [2018/11/06(火) 01:38:13.14 ID:ca/fCdtD.net]
>>879
ありがとうございます。
Pasteはいらないのでしょうか?

921 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 02:06:44.79 ID:hX39oSae.net]
教えてください!とか言ってるから荒しかと思ってたがガチか

922 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 02:42:45.06 ID:hX39oSae.net]
>>867
>ペースト先のシートは保存せず元に戻す
マクロを実行すると「元に戻す」は使えなくなるから、一々開きなおさないといけないけど大丈夫なのかな
もしその作業が連続して行われるなら、テンプレート用シートと印刷用シートを別に用意した方が楽な気がする

923 名前:デフォルトの名無しさん [2018/11/06(火) 06:33:12.72 ID:ca/fCdtD.net]
>>882
保存せずは間違えでした。
ペーストしたものをデリートするマクロを作って、元に戻す予定です。

924 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 07:50:07.02 ID:hqcuocq7.net]
>>880
引数付きでCopyメソッドを実行するときはPasteメソッドは書かなくていい

925 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 08:01:03.35 ID:hqcuocq7.net]
>>883
印刷用シートはデータと切り離してテンプレート用の別のファイルにした方が良い
そうすれば、印刷処理のとき一時的にテンプレートから印刷用フォーマットを書き起こした後、印刷用フォーマットのブックを削除するだけで済む
印刷後に印刷用シートを初期化するマクロを更に走らせるなんて、手間を増やしてるだけだと思うぞ



926 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 19:36:10.55 ID:gYvutDKX.net]
複数端末で使用しているマクロがあります
端末aのデスクトップに目当てのファイルがあり、他の端末はネットワークで繫がっている端末aのデスクトップを覗きに行く感じになってます
ファイルパス & filenameで参照したいんですがどのように書くべきなんでしょうか

927 名前:デフォルトの名無しさん [2018/11/06(火) 19:50:54.72 ID:S8pHBi6C.net]
>>886
のぞいてる?
スケベ!

928 名前:875 [2018/11/06(火) 19:57:59.09 ID:ca/fCdtD.net]
みなさんありがとうございます。自分のイメージしてたものが100%出来ました。

929 名前:デフォルトの名無しさん mailto:sage [2018/11/06(火) 22:30:23.08 ID:hKUAUjlF.net]
VBAベーシックの資格取得がてら基本情報の午後問対策にしようと思ってるんですけど出題範囲とかレベル感的に同じくらいですかね?

930 名前:デフォルトの名無しさん [2018/11/07(水) 10:26:42.01 ID:d5oBs1zX.net]
VBAの資格って新しくできたのか?

931 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 10:35:52.33 ID:XvVrOgoe.net]
>>886
ネットワークにつながったPCの名前に「\\」を付けるとアクセスできる
officetanaka.net/other/extra/tips15.htm

932 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 10:44:51.43 ID:t8cEHMAy.net]
>>891
\\端末a:\Users\Admin\Desktopみたいな感じですね、ありがとうございます

ちなみにこれは端末aでも端末a以外でもこの書き方一つで参照出来るんでしょうか

933 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 10:53:48.53 ID:XvVrOgoe.net]
>>892
端末aのフォルダを共有設定にしておかないとアクセスできない
共有になってれば、どのPCでもアクセスできる
エクスプローラーで共有フォルダを開いて、アドレスバーをコピペしてみると書き方が分かる

934 名前:875 [2018/11/07(水) 11:49:07.56 ID:4XVkNdGZn]
シート間の切り替えで我慢が揺れるんですが、防ぐ方法は有りますか?
1行丸々コピーはデータが重いんでしょうか?

935 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 11:32:15.04 ID:nZWGaJPv.net]
会社なのに共有フォルダはないの?



936 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 11:34:31.05 ID:+HyKX3eQ.net]
>>889
基本情報はJavaやCできない文系カスならExcel選べばいいでしょ
ワークシート関数を使いこなせれば十分で、VBAなんか全く要らん

937 名前:875 [2018/11/07(水) 20:36:23.84 ID:TW51zyDp.net]
マクロ起動でシートの切り変わりで画面がブレるというか、もう少しスムーズに動いて欲しいと感じます。
1行まるごとコピーしているので重いのでしょうか?

938 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 22:08:04.86 ID:Qojc5OuV.net]
配列に入れるとか?
dim a
a = sheet1.Range("コピーしたい範囲")
sheet2.Range("sheet1と同じ大きさ") = a
シート切り替える必要あんの?

939 名前:デフォルトの名無しさん [2018/11/07(水) 23:56:50.98 ID:kdSj6Mns.net]
text.txtの中身
1,"my name is taro"
2,""hello,world""
3,"hello,world"

これをエクセルに変換して期待値は以下としたい
どうしたらいい?

A B
1 my name is taro
2 "hello,world"
3 hello,world

940 名前:デフォルトの名無しさん mailto:sage [2018/11/07(水) 23:58:12.32 ID:Z9bNZaPm.net]
拡張子を.csvに変えてダブルクリックしてみよう
あら不思議!

941 名前:デフォルトの名無しさん [2018/11/08(木) 00:00:20.32 ID:+1CERcyT.net]
ちなみに拡張子をcsvにすると以下のような変な出力になる。

A B C
1 my name is taro
2 hello world""
3 hello,world

942 名前:デフォルトの名無しさん [2018/11/08(木) 00:02:21.00 ID:M68F6j6d.net]
"が一個足りない
csvで"をインポートするには
"を""にして
"でくくらないといけない

943 名前:デフォルトの名無しさん [2018/11/08(木) 00:10:13.02 ID:+1CERcyT.net]
手順としては以下でよいか?
1. test.txtの中身を置換で「""」にマッチする箇所を「"""」として保存する
2. 拡張子をcsvにする。

期待値になったのでよしとする。
さらに一歩質問いいですか?

944 名前:デフォルトの名無しさん [2018/11/08(木) 00:19:54.15 ID:+1CERcyT.net]
test.txtの中身
1,"my name
is taro"
2,"""hello,world"""
3,"hello,world"

これをエクセルにして期待値として以下としたい

A B
1 (※)
2 "hello,world"
3 hello,world

B1セル内に
my name
is taro
が格納され、適切に改行が入っていることを期待。

が、csvにしたら、ちゃんと期待値になってた。。
んー、、途中で改行が入るケースではまってた記憶があったんだが、、、、。これでよしとするか。。

945 名前:デフォルトの名無しさん [2018/11/08(木) 00:35:58.02 ID:+1CERcyT.net]
ああ、思い出した

"がつかないケースで、改行が入っている場合

test.txtの中身
1,my name
is taro

エクセルにして期待値として以下としたい

A B
1 (※)

(※)
B1セル内に
my name
is taro
が格納され、適切に改行が入っていることを期待。

拡張子をcsvに置き換える前に、"で囲むようにすればいいが、置換でなんとかならないものか。



946 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 01:33:19.87 ID:QHwNiY6E.net]
ExcelのCSV読み込みでセル内改行がある場合

d.hatena.ne.jp/stealthinu/20170127/p1

947 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 07:54:15.59 ID:u+iZKjOm.net]
なんかもう最初のカンマまでの文字数だけ切り取るほうがシンプルなんじゃ

948 名前:デフォルトの名無しさん [2018/11/08(木) 11:52:01.74 ID:rWQT8E4I.net]
excelの3Dグラフで陰線処理ってできますか?

949 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 12:05:03.88 ID:Yck2Cb0Y.net]
陰毛処理?

950 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 14:33:21.43 ID:3qqw0Iqx.net]
>>898
それのどこに配列が絡んでるんですかね?

951 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 14:42:53.05 ID:rBrrwKGn.net]
>>908
昔方法探したけどできなかった


陰線処理ってエロくないのにちょっとエロく思える単語だよな

952 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 15:12:21.75 ID:BZZI+ZYR.net]
質問する奴も答える奴も論外で草
質問する奴はそういうスレだからともかく
答える奴が池沼なのはもう少し何とかならないか?
VBAだから無理か

953 名前:デフォルトの名無しさん [2018/11/08(木) 19:19:19.39 ID:j6Jh7/pK.net]
なんやプロさん同士で内紛勃発か?w

954 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 20:27:13.91 ID:hKKyRwQm.net]
>>910
えっ?
絡んで無いと思ってる?
今となっては初心者でも使う手法だと思うんだが。

それとも何か勘違いしてるのは俺か?

955 名前:デフォルトの名無しさん [2018/11/08(木) 20:30:22.05 ID:j6Jh7/pK.net]
>>914
おまえだけやプロさんw



956 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 20:41:38.00 ID:vlGhAqs/.net]
>>910
変数代入のときにSetステートメント使ってないから、変数にはセル値の配列が入ってるぞ

957 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 22:36:31.77 ID:I6vRTJnd.net]
>>873,>>874
SQLServer側でセルの権限管理???
プロ??

958 名前:デフォルトの名無しさん [2018/11/08(木) 22:38:08.36 ID:j6Jh7/pK.net]
プロさんにつっこんだらあかんやろ
暗黙のルールぐらい守れやカス

959 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 22:43:10.26 ID:I6vRTJnd.net]
そんなことより、XMLクライアントとしてのExcelを語ろうぜ

960 名前:デフォルトの名無しさん mailto:sage [2018/11/08(木) 23:06:03.49 ID:g1taMrfK.net]
>>917
セルの権限管理なんぞサーバーから見たら何の意味もないよ

961 名前:デフォルトの名無しさん [2018/11/09(金) 10:17:43.12 ID:46H7vVxk.net]
sagawa-oki.com/
ここにアクセスしたら不審サイトであると警告が出ました。
PCに詳しい人、これどういうしくみなんですか?
オレのPCは感染したのですか?

962 名前:デフォルトの名無しさん mailto:sage [2018/11/09(金) 10:21:06.82 ID:mRKVO+Jg.net]
yes

963 名前:デフォルトの名無しさん mailto:sage [2018/11/09(金) 10:42:48.08 ID:jWmpQO7/.net]
>>921
もう手遅れですね
アマギフ送ってくれたら直してあげられるよ

964 名前:デフォルトの名無しさん mailto:sage [2018/11/09(金) 14:25:59.43 ID:xyt0IPos.net]
>>919
これ興味あるんだよな
使いやすい?

965 名前:デフォルトの名無しさん mailto:sage [2018/11/09(金) 22:13:18.94 ID:GmFPY+rV.net]
プロに聞いてみようぜ



966 名前:デフォルトの名無しさん mailto:sage [2018/11/09(金) 22:36:34.07 ID:dt2W+h7o.net]
デザイナーが描くような美しいUMLのシェイプを生成するDSLライブラリはありませんか?
PlantUMLのエクセルバージョンのようなものを探してます

967 名前:デフォルトの名無しさん mailto:sage [2018/11/10(土) 13:47:50.89 ID:g7tZUN2t.net]
データの持ち方はシンプルな方がいい
そうでないなら条件を明確に

968 名前:デフォルトの名無しさん [2018/11/12(月) 08:23:59.02 ID:emJ6rSNr.net]
901だが、
さらにおしえてほしい
textに

"please call a "phone"."

と書かれているケースがあり、これをcsvとして読みこませる前に
表記が崩れないように整形を加える。

最終的に1セル内に
please call a "phone".
が入っていればよいです。

上記を実現するための整形の流れとしてどうしたらいい?
整形後は、phoneの間に"をさらに追加する。端っこの"には手を加えない。
"please call a ""phone""."

手作業ではなく、置換で自動化したい

969 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 09:22:19.42 ID:CGIJA+ER.net]
そういうのはCSVとして読み込むんじゃなくて、自前で構文解析した方が良い。
この程度なら難しく無いでしょ。

970 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 09:52:07.52 ID:zyHWT4B/.net]
>>928
正規表現置換の使えるエディタで
検索パターン
([^\,\"]+?)\"{1}([^\,\"]+?)
置換後
\1\"\"\"\2
などとすれば一応行ける

971 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 09:53:55.26 ID:zyHWT4B/.net]
訂正
置換後
\1\"\"\2
だな、1個多かった

972 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 21:39:04.12 ID:OsYv7RWH.net]
全く無知な自分にご教授下さい。
マクロでフォルダ内のエクセルのシート1をすべて結合するマクロを探しています。
ネットに転がってるのを実行してもうまくいかないです。
できればですが、シート名は統一していないないので、ブックないのシートのRange(A1)が日付だったシートのみを結合とか高度すぎて無理でしょうか。

973 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 21:42:09.58 ID:dMWbNPXa.net]
>>932
私には可能ですし特に高度とも思いませんが、貴方にできるかどうかは知りません
少なくとも今目の前の問題を片付けたいだけであれば、諦めて手作業したほうが貴方にとっては早いでしょう

974 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 21:54:32.66 ID:JxfhNlMu.net]
ネットに転がってるのがあってもできないなら回答しても意味なくね?
ファイル名が統一されてないからうまく行かないんなら、フリーソフト拾ってきて一括リネームしたら済む話かもしれない
何を試みて何かどううまく行かなかったのか、真に目的を達成するには何がどうなっていればいいのか
それくらいは頭を整理して明記しなさい
何がわからないのか何がしたいのか自分でわからないけど親切に要件をヒアリングして代わりに作ってほしい、ならそこらへんのSIerに相談しなさい

975 名前:デフォルトの名無しさん [2018/11/12(月) 22:03:30.98 ID:XDhm+jvj.net]
>>933
バカはお口にチャックな



976 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 22:13:45.72 ID:MyIa17Oe.net]
Dir
sheet(1)
IsDate
この辺りで調べてみればそこまで難易度は高くないと思う

977 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 22:18:58.14 ID:OsYv7RWH.net]
>>933
なるほど。難しいって事ですね。
>>936
sheet(1)だと中にはsheet(2)にデータがある場合があるんです。
なのでシートのA1が日付の時だけコピーとかしたかったのです。

978 名前:デフォルトの名無しさん mailto:sage [2018/11/12(月) 22:36:44.04 ID:zyHWT4B/.net]
for each ws in Worksheetsとif文が使えればできるよ

979 名前:デフォルトの名無しさん [2018/11/13(火) 00:16:47.48 ID:6PLLlNb2.net]
>>930
試したけど、grepにひっかからず。

980 名前:デフォルトの名無しさん [2018/11/13(火) 00:18:49.38 ID:6PLLlNb2.net]
936ですが、
原因が分かりました。
([^\,\"]+?)\"{1}([^\,\"]+?)の後の半角スペースが入っていたので引っ掛からなかった。
半角スペース覗いたらできました。

981 名前:デフォルトの名無しさん mailto:sage [2018/11/13(火) 03:19:44.71 ID:gWmuHRek.net]
>>928
1"2"3"4"5

これが君には、"24"、"3" の2つに見えるけど、
普通の人は、"2"、"4" の2つに見える

つまり、"3" がネスト・内側だとは判別できない。
内側を表すには、確実に、外側と区別できる方法が必要

例えば、""3"" のように、" が2個続いたら内側と解釈するとか、何らかの方法が必要だけど、
他に解釈されないような、特別な記号を作るのは難しい

982 名前:927 mailto:sage [2018/11/13(火) 07:16:41.37 ID:xWZc78Mp.net]
>>940
半角スペースはそちらでの混入かと

983 名前:デフォルトの名無しさん [2018/11/13(火) 21:19:22.76 ID:8adn94NA.net]
>>940
Excel vba にも正規表現による置換機能あるよね?その検索パターン、置換する文字列をそのまま使えるのか?

984 名前:デフォルトの名無しさん [2018/11/13(火) 21:22:12.20 ID:Vxu3kwrv.net]
>>941
長い、3文字で

985 名前:デフォルトの名無しさん [2018/11/14(水) 00:32:01.09 ID:cWkoLxip.net]
こんばんは。質問させてください。

VBAでXMLファイルを作成したいのですが、MSXML2というパーサ(?)を使わないといけないのですか?
Printなどを用いてテキストファイルを作成し、拡張子を.xmlに変更して作成した場合、何か問題があるのでしょうか

XMLファイルはただのテキストファイルだという認識だったのですが、「VBA XML 作成」などと検索すると
ほぼ全てのサイトでMSXML2を用いた方法が紹介されているので混乱しています

よろしくお願い致します



986 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 02:04:23.47 ID:otO/yyOk.net]
Ruby, Python, JavaScript など、すべての言語・コマンドでも、そう。
HTML, XML, JSON などは、それ用のライブラリを使う

勝手に作ったファイルは、パーサーで解析すると、
間違った形式・フォーマットで作られている、正しい形式ではない、という形式違反になる

正しい形式かどうかを、チェックするツールもある

987 名前:デフォルトの名無しさん mailto:sag []
[ここ壊れてます]

988 名前:e mailto:2018/11/14(水) 03:54:10.85 ID:KIwP1nqR.net [ 以前DOMについて質問させて頂いたものです。
前回はIEを直接開いて扱っていたのですが、
MSXMLという機能でIEを開かずにウェブサイトの情報を取得できると知り、
そちらの方が速そうだし面白そうなので挑戦しています。
そこで色々調べていたのですが、

http://d.hatena.ne.jp/end0tknr/20081115/1226755041

というブログに「MSXML2.DOMDocumentでxml responseをparseすることができます。」とあり、

Dim HttpReq As MSXML2.XMLHTTP
Dim DomDoc As MSXML2.DOMDocument
・・・
DomDoc.loadXML (HttpReq.responseText)

というコードが記述されていますが、ローカルウインドウを見るとXMLHTTP(XMLHTTP60)にresponseXMLというそれらしいプロパティがあります。
直接これをDOMとして扱うのは出来ないのでしょうか。 ]
[ここ壊れてます]

989 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 06:47:08.50 ID:F2hyLHDL.net]
>>945
> MSXML2というパーサ(?)を使わないといけないのですか?
別にMSXML2なんて単なるライブラリだから使わなくてもいいよ
ただXMLにきちんと対応するのは面倒だからみんな使ってるだけ

990 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 08:00:52.88 ID:cWkoLxip.net]
>>946
>>948
ありがとうございます
大変勉強になりました

991 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 09:35:48.86 ID:JBsUV7Ak.net]
>>943
VBAでの後方参照(\1や\2のような)はExecuteメソッドが要る、
grepやpowershellみたいに簡潔にならんけどできないことはない

Set Matches = RE.Execute(対象文字列)
For Each Match In Matches
Match.submatch(0) & """""" & match.submatch(1)
Next Match

992 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 21:48:32.31 ID:X5SCw3Kf.net]
入力規則のリストでリストのいずれかを選択した時に
アクションを起こしたいのですが、方法はあるのでしょうか。
selection changeでは無理でした。

993 名前:デフォルトの名無しさん mailto:sage [2018/11/14(水) 23:16:38.95 ID:Z7uIM71c.net]
>>951
普通のWorksheet_Changeイベントを使う

994 名前:デフォルトの名無しさん mailto:sage [2018/11/15(木) 01:04:33.76 ID:pL2ZxAKh.net]
>>952
出来ました!
こんなに簡単なことを見落としていたなんて情けない・・・
ありがとうございました。

995 名前:デフォルトの名無しさん mailto:sage [2018/11/15(木) 22:05:17.67 ID:xj1JjGGB.net]
上場企業ってポリシーでマクロとか止められてない?



996 名前:デフォルトの名無しさん mailto:sage [2018/11/15(木) 22:08:32.25 ID:60AqZ+Uz.net]
各部署向けのマクロを色々作ってたけど
そんなの企業次第だろ

997 名前:デフォルトの名無しさん mailto:sage [2018/11/15(木) 22:14:10.97 ID:Q+Sfzbdk.net]
うちは個人での業務効率化が目的なら黙認されるのが実情だな
部署での正式な業務ツールとしてのマクロは情シス部で仕様として管理される事になるし、個人での作成も配布も禁止されてる

998 名前:デフォルトの名無しさん [2018/11/15(木) 23:27:40.32 ID:sS26qanx.net]
ザルにもほどがあるやろw黙認とか一番あかんやつやんけw

999 名前:デフォルトの名無しさん mailto:sage [2018/11/15(木) 23:59:31.43 ID:lTdn/5mU.net]
マクロは申請が必要で保存場所は限定だわ

1000 名前:デフォルトの名無しさん mailto:sage [2018/11/16(金) 04:45:29.00 ID:1oL4uemZ.net]
以前は自由だったのが、誰かがミスするたびに禁止になって、今はほとんど何もできなくなった

1001 名前:デフォルトの名無しさん mailto:sage [2018/11/16(金) 07:12:21.93 ID:B19KzSp6.net]
情シス部にいるとマクロ作り放題(影響及ぼす範囲によるが)

1002 名前:デフォルトの名無しさん mailto:sage [2018/11/16(金) 09:34:05.81 ID:iyDekcJ2.net]
それで競争になるのか人事ながら心配
禁止なのはOfficeマクロだけってなら分かるけどさ

1003 名前:927 mailto:sage [2018/11/16(金) 09:43:44.02 ID:fQoG7lNZ.net]
セキュリテイ問題はVBAだけじゃない、今流行りのRPAだってハック悪用されちゃえば、情報流出し放題になる危険はある。
ただ情シスでVBAし放題って、仕事としては辛いなあ、VBAが好きならいいけど

1004 名前:デフォルトの名無しさん mailto:sage [2018/11/16(金) 11:24:37.60 ID:iyDekcJ2.net]
情報流出のリスクって観点だったら自分の手元の端末でプログラミングする/しないなんてあんまり関係ないよなあ。
セキュリティ担当大臣のリテラシーがあれじゃ何言っても無駄かw

1005 名前:デフォルトの名無しさん mailto:sage [2018/11/16(金) 13:07:59.03 ID:+iwVt0B0.net]
うちの場合、初期導入済みのソフト・プログラム以外追加インストール禁止、
プログラムの自作禁止、バッチファイル等のスクリプトも自作禁止、
その他電算担当が意図しないものは禁止、
ただしExcel・Wordのマクロはプログラム外とおかしなやりとりさえしなければ自作可、だから、
お目こぼしいただいているといえばそうかも試練。



1006 名前:デフォルトの名無しさん [2018/11/16(金) 20:12:20.13 ID:HodhQ/sE.net]
>>963
おまえも大差ないけんどねw

1007 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 12:59:10.62 ID:rrttmrGF.net]
htmlでも作れるよ

1008 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 16:28:27.01 ID:avlCLAGR.net]
禁止いうても、コンペアツールや自動入力ツールの類を自作してこっそりローカルで使ってる人はいるわな。
個人で作成したマクロなんてそう大勢に普及させるもんでもないし。

1009 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 19:32:22.12 ID:afjAxwZo.net]
>>964と同じような環境でパソコン操作ログも全て取られている。けどマクロは作り放題でこの会社どうかしてるなあと思う
管理できる範囲で使うようには心がけてる程度

1010 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 23:34:31.53 ID:kPyd3h/H.net]
すみません初心者です。
次のブログで紹介されているVBAを応用したいのですが、
ご助言をお願いしたく。
https://www.excel-prog.com/entry/outlook-mailitem2

現状は
「キーワードが含まれるファイルが見つからない場合は、ファイル添付しない」
という処理なのですが、
「キーワードが含まれるファイルが見つからない場合は、下書きを作成しない」
という処理に変更できないでしょうか。

1011 名前:デフォルトの名無しさん [2018/11/17(土) 23:37:15.00 ID:eQWBxdMf.net]
>>969
質問以前の問題やけど言葉を途中できるな、失礼やぞ
「助言をお願いします」と言うもんや

1012 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 23:39:40.85 ID:rc62Vrp5.net]
>>969
自分で勉強する気がないならRPAを買おう

1013 名前:デフォルトの名無しさん mailto:sage [2018/11/17(土) 23:48:28.07 ID:Q6MHNsVE.net]
Windowsにも色々なコマンドラインツールが標準で付属してくるから
たいていのことは追加ソフトなしでできちゃうんだよな

1014 名前:デフォルトの名無しさん [2018/11/18(日) 00:19:50.58 ID:RRVp+pUX.net]
なんや、わいは>>969の言葉使いのバカさを諫めただけで質問の内容は否定しとらんで
わかる奴答えてやれや

1015 名前:デフォルトの名無しさん mailto:sage [2018/11/18(日) 00:50:35.06 ID:WoNYW9mY.net]
>>969
下書きを作成しないというか、要するにメールを書き起こさないようにすればいいわけだよな
ならば、メール作成箇所の前に一行


If SearchFile(フォルダパス,Keyword)="" Then Exit Sub


等と追加して、SearchFile関数の戻り値が空文字列ならメール作成しない処理にすれば良い

ただし、エクセルファイル以外のファイルの存在確認をするならSearchFile関数の修正が必要だし、パス長が255文字を越えるフォルダやファイルを検索する場合はFileSystemObjectを使ったりしなきゃならない



1016 名前:デフォルトの名無しさん mailto:sage [2018/11/18(日) 07:35:49.85 ID:ZUPq3iVE.net]
>>972
powershellとbashのこと?

1017 名前:デフォルトの名無しさん mailto:sage [2018/11/18(日) 08:50:18.78 ID:fvzyxXyq.net]
>>970
そんなコマケーことが気になるなら匿名掲示板なんて見るなよ、馬鹿じゃねーの?






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<289KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef