[過去ﾛｸﾞ] Excel VBA 質問スレ Part68 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
21: (ﾜｯﾁｮｲ 61da-1etN) 2020/09/01(火)21:43 ID:rkSCdRtt0(1/2) AAS
>>20
1つにまとめて、どこをクリックされたかは座標で特定するとか。
22(1): (ﾜｯﾁｮｲ 61da-1etN) 2020/09/01(火)21:46 ID:rkSCdRtt0(2/2) AAS
>>18
vbsでも同じエラー出る?
23: (ﾄﾞｺｸﾞﾛ MMca-yRqa) 2020/09/01(火)21:59 ID:o1zup8QpM(1) AAS
>>20
Imagename = Application.Caller
i = Mid(Imagename, 6)
あとは、Select Caseで割り振る
24: (ﾜｯﾁｮｲ 0d7c-JMbW) 2020/09/01(火)22:12 ID:0zlN/jAw0(1) AAS
>>20
マクロ登録に引数を付けるかApplication.Callerを使う
25: (ﾜｯﾁｮｲ 4d10-t21d) 2020/09/01(火)22:24 ID:4J5+lU0z0(2/2) AAS
Application.callerよさそうですね
使ってみます
ありがとうございました
26: (ﾜｯﾁｮｲ 27da-yCsQ) 2020/09/02(水)02:29 ID:wtN1DZWS0(1/2) AAS
>>19
一気に答えがで関数があると思うな
27: (ﾜｯﾁｮｲ 27da-yCsQ) 2020/09/02(水)02:29 ID:wtN1DZWS0(2/2) AAS
る
28: (ﾜｯﾁｮｲ 5f2f-q/EU) 2020/09/02(水)04:35 ID:A3FRNSa90(1) AAS
>>20
一度、VBA コントロール配列 あたりでググってみると良いかもしれない
29: (ｽﾌﾟﾌﾟ Sd7f-2VA6) 2020/09/02(水)06:20 ID:PYA1799od(1) AAS
>>20
クラス作ってWithEventsおすすめ。
30(2): (ﾜｯﾁｮｲ e710-t/Jd) 2020/09/02(水)20:49 ID:hWT8nCmb0(1) AAS
神経衰弱を作っています
カードを2枚裏返して2枚の数字が同じだった
Image1.visible = falseで2枚を非表示にしています
ゲーム途中でコマンドボタンを押すと1から13までのランダムな数字の枚数だけ裏面のカードを表にしたいのですが今のコードだと既に非表示になっているカードまで表にする対象になってしまっていて13という数字を引いても5枚しかめくれないみたいな状態になってしまいます
どうすれば既に非表示になっているカードは除いて表面にする処理ができるようになるでしょうか？
ゲーム開始直後の状態であればちゃんと引いた数字分表面にすることができています
31: (ｽﾌｯ Sd7f-7sgX) 2020/09/02(水)20:58 ID:RVYxtb8Vd(1) AAS
非表示の時は表示しなければいいのでは…
32(1): (ﾜｯﾁｮｲ 5f1f-W64q) 2020/09/02(水)21:06 ID:wVSDLDLi0(1) AAS
For i = Lbound(arr) to ubound(arr)
next i
配列の中 ファイル名*書込文字。
(0)001*abc (1)001*bca (2)001*dca (3)002*fed の様な配列の処理を
(0)で001.xlsを開いて文字書き込み
(1)開いてあるから文字書き込み
(2)同様
(3)001閉じる002開く文字書き込み
こんな感じに開いてたら閉じる。違うファイルなら閉じて新たに開くってどうしたら
いいですか？
33(1): (ｽﾌｯ Sd7f-7sgX) 2020/09/02(水)21:08 ID:0x5o6h4cd(1/2) AAS
>>32
その処理のどの部分で躓いてんの？
34(1): (ﾄﾞｺｸﾞﾛ MM1f-th+2) 2020/09/02(水)21:43 ID:M5ACMng3M(1) AAS
>>30
If Worksheets(シート名).Shapes("Image" & カード番号).Visible = False Then
35(1): (ｽﾌｯ Sd7f-7sgX) 2020/09/02(水)22:11 ID:0x5o6h4cd(2/2) AAS
>>34
それだと非表示にしたカートまで表示される
36: (ｱｳｱｳｶｰ Sa9b-vRCQ) 2020/09/02(水)22:44 ID:7eaUdZ9ha(1) AAS
>>30
表裏の切り替えできてるなら裏かつvisibleだけ処理すりゃいいと思う
37(1): (ﾄﾞｺｸﾞﾛ MM1f-aCGe) 2020/09/02(水)23:26 ID:CEKOaVwIM(1) AAS
>>35
じゃあ、trueに変えればいいじゃん
38(1): (ﾜｯﾁｮｲ 7f63-3NJ+) 2020/09/02(水)23:43 ID:4SR2iB8C0(1/2) AAS
>>22
sはこれでエラーが出ませんでしたが
これでテストになっているのか疑問です。。(acrobatを操作しているように見えない
Sub ConvertFile()
Dim objAcroApp
Dim objAcroAVDoc
Dim objAcroPDDoc
Dim id
Dim js
Dim SaveName
省5
39: (ﾜｯﾁｮｲ 7f63-3NJ+) 2020/09/02(水)23:44 ID:4SR2iB8C0(2/2) AAS
sはこれでエラーが出ませんでしたが
↓
vbsは・・・
です。失礼しました。
40(1): (ｽﾌｯ Sd7f-7sgX) 2020/09/02(水)23:59 ID:86SCKcxdd(1) AAS
>>37
カードの非表示状態を管理するなりしないと単純にvisibleだけ見ても意味ないよ
上下前次1-新書関写板覧索設栞歴
あと 962 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.023s