[過去ﾛｸﾞ] VBAなんでも質問スレ Part2 [転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
907(1): 2019/07/25(木)16:22 ID:eKMV/4VB(1) AAS
ExcelVBAのユーザーフォーム上で、PDFを表示、操作をしたいです。
ですが、ユーザーフォームにコントロールを追加しようとすると、
「要素が見つかりません」とダイアログが表示され出来ません。
どなたか解決策をご存じの方がいましたら、教えていただけますでしょうか。。
Acrobat pro DCはインストールしてあり、ExcelはOffice365を最新の状態で使用してます。
908(1): 2019/07/25(木)18:51 ID:HFVXfXT2(1) AAS
>>907
EXCELは専用スレがあるので、そちらへどうぞ
909: 2019/07/26(金)10:59 ID:nW8IFIW6(1) AAS
>>908
ありがとうございます。
そちらに書いてみます。
910(1): 2019/08/14(水)15:00 ID:Jc+eFMLQ(1) AAS
ここで質問していいかわからないんですが、違ったら誘導していただけると助かります。
メッセージボックスを最前面にするために以下のコードを利用したいのですが、呼び出し元の下から3行目のvbOKOnly を vbYesNo に替えた後、選択ボタンを取得する方法がわかりません。
どのようなコードを足したらいいかご教示いただけないでしょうか。
【呼び出し元】
Option Explicit
Dim WSHObj
Dim Args
Set WSHobj = WScript.CreateObject("WScript.Shell")
Args = "cscript ""C:\Program Files\PPX\script\WSHPopUP.vbs""" _
& " ""出力メッセージ""" _
& " 0" _
& " ""VBS名称""" _
& " " & vbOKOnly ←vbYesNoに替える
WSHObj.Run Args,0,true
Set WSHobj = Nothing
【WSHPopUP.vbs】
Option Explicit
Dim Arg
Dim WSHObj
Set WSHobj = WScript.CreateObject("WScript.Shell")
Set Arg = WScript.Arguments
WSHObj.Popup Arg(0),Arg(1),Arg(2),Arg(3)
Set WSHobj = Nothing
よろしくお願いします。
911(2): 2019/08/14(水)19:26 ID:uFuQVnLY(1/2) AAS
【呼び出し元】
Option Explicit
Dim WSHObj
Dim Args
Set WSHobj = WScript.CreateObject("WScript.Shell")
Args = "cscript ""C:\Program Files\PPX\script\WSHPopUP.vbs""" _
& " ""出力メッセージ""" _
& " 0" _
& " ""VBS名称""" _
& " " & vbYesNo
Dim hoge '受け取り用に追加
hoge = WSHObj.Run(Args,0,true) 'この変数hogeにvbYes=6かvbNo=7が入る。
'何か処理を書く
Set WSHobj = Nothing
【WSHPopUP.vbs】
Option Explicit
Dim Arg
Dim WSHObj
Set WSHobj = WScript.CreateObject("WScript.Shell")
Set Arg = WScript.Arguments
Dim fuga '戻り値用に追加
fuga = WSHObj.Popup Arg(0),Arg(1),Arg(2),Arg(3) 'popupの戻り値を取得
WSHObj.Quit fuga '呼び出し元に終了コードとして返す
Set WSHobj = Nothing
912: 2019/08/14(水)19:27 ID:uFuQVnLY(2/2) AAS
他にExecを使う方法もある
913(1): 2019/08/14(水)20:05 ID:6C5bzX4k(1) AAS
ｖｂDefaultButton1 とか、そういうのじゃなくて？
914(1): 2019/08/15(木)00:01 ID:GUoAoBO9(1) AAS
>>911
ありがとうございます！
試してみます！
>>913
すみません、ｖｂDefaultButton1 がわかりません
915(1): 2019/08/16(金)11:35 ID:vco+QnrA(1) AAS
>>911
>910>914です。
教えていただいたコードを試してみたのですが、
‘何か処理を書く
のところに
MsgBox hoge
と入れたのですが、「はい」「いいえ」どちらの場合も 0 が返されます。
どうしたらいいでしょうか
916: 2019/08/16(金)13:41 ID:2LlAcZB1(1) AAS
???
VBAなの?
VBSなの?
MsgBox使えるのに、何でWscript使ってんの?
917: 2019/08/16(金)13:48 ID:mZqFzvyq(1) AAS
朗報
【アプデ/10】 2019年8月14日のWindowsUpdate後、VB関連が死亡。Windows10全バージョンにて
2chｽﾚ:newsplus
918(1): 2019/08/16(金)14:13 ID:WTD6eyC3(1) AAS
>>915
【WSHPopUP.vbs】 のWSHObj.Quit fuga は間違い。エラー出してる。
Wscript.Quit fuga が正しい
919: 2019/08/19(月)10:24 ID:ELmh1Bgt(1) AAS
>>918
返信遅くなってすみません。
レスの通りに修正し、
さらに
fuga = WSHObj.Popup Arg(0),Arg(1),Arg(2),Arg(3) 'popupの戻り値を取得
↓
fuga = WSHObj.Popup(Arg(0),Arg(1),Arg(2),Arg(3)) 'popupの戻り値を取得
に変更し、成功しました。
たいへん助かりました。
ありがとうございました。
920: 2019/09/25(水)10:50 ID:L8CrQHgr(1) AAS
WordのアクティブXコントロールのテキストボックスなのですが
BackStyleを０設定すると背景色は消えるのですが
デザインモードを解除すると背景色が出てしまいます
これはバグでしょうか
921: 2019/11/05(火)18:33 ID:CrKvYzfV(1/2) AAS
DataObjectオブジェクトについて 外部ﾘﾝｸ:chiebukuro.yahoo.co.jp
VSI
922: 2019/11/05(火)18:35 ID:CrKvYzfV(2/2) AAS
DataObjectオブジェクトについて 外部ﾘﾝｸ:chiebukuro.yahoo.co.jp
FQB
923: 2019/11/06(水)06:26 ID:jiZZUv+M(1/2) AAS
CInt 関数 VBA 外部ﾘﾝｸ:vba-auto.com
NQ2
924: 2019/11/06(水)06:26 ID:jiZZUv+M(2/2) AAS
CInt 関数 VBA 外部ﾘﾝｸ:vba-auto.com
NQ2
925(2): 2019/11/21(木)09:09 ID:IRESAa/B(1) AAS
Exchange / Outtlook VBAの質問です
初歩的な質問で申し訳ありませんが、お知恵を拝借できないでしょうか
任意の名前を持つ配布リストや連絡先グループに属するExchangeユーザーのSMTPアドレスの一覧を取得するにはどうしたら良いのでしょうか
配布リストや連絡先グループをExchange ユーザーとして取得するところまでは出来ているのですが、そこから先がうまくいきません
なお配布リスト、連絡先グループいずれも個人ユーザーのみが登録されている前提なので、再帰によるメンバー取得は不要な状況です
926: 2019/12/31(火)13:22 ID:CEriAQ2K(1) AAS
エスパー的にはexchangeユーザーのユーザー一覧と配布リストのユーザーの
名前を比較すればいいんじゃね
927: 2020/04/20(月)00:19 ID:DXvjb/RZ(1) AAS
３日がかりの捜索ｗｗ あきらめないのな
928: 2020/05/10(日)01:11 ID:DSeO3ORc(1) AAS
3日どころじゃないぞ
929(1): 2020/05/25(月)10:28 ID:vLFHqXr3(1) AAS
>>925
これについて何か解決方法ありましたか？私も配布グループ取得で難儀しております。
930: 2020/05/25(月)12:24 ID:palYJx03(1) AAS
半年放置で読むかね
931: 2020/06/10(水)10:39 ID:vabPclBn(1) AAS
>>925と>>929って同一人物だろどうせ
932: 2020/06/27(土)08:55 ID:9qJBLgyD(1) AAS
Aex
933(1): 2020/06/27(土)16:37 ID:TjDVHLrR(1) AAS
VBAの質問スレで質問するのはなぜ馬鹿ばっかりなのですか？
934: 2020/06/27(土)16:43 ID:CiV3+vm0(1) AAS
>>933
このスレのレベルを知ってる普通以上の人はここを頼ったりはしないから
935(1): 2020/07/11(土)22:25 ID:R8+8lu0C(1) AAS
頼むからVBAでWin32 APIを呼び出すのはやめてくれ
そこまで要求するなら包括的な自作DLLを作ればよいと
936(1): 2020/07/12(日)04:44 ID:+vVO/8n9(1) AAS
>>935
なんでやめてほしいの？
上下前次1-新書関写板覧索設栞歴
あと 66 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.013s