[過去ﾛｸﾞ] Excel VBA 質問スレ Part80 (1002ﾚｽ)

Excel VBA 質問スレ Part80 http://mevius.5ch.net/test/read.cgi/tech/1685489018/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

443: 426 [] 2024/01/28(日) 16:52:07.92 ID:v9jfp3rb イロイロ、ありがとう さて、ま、念の為、何というか、 Dim i as long Dim x as long Dim y as long Dim BDATA(約25000000) as BYTE For x = 0 to 3840 - 1 For y = 0 to 2160 - 1 i = 3840 * 3 * y + 3 * x BDATA(i) = 255 BDATA(i+1) = 0 BDATA(i+2) = 0 next next は、モチロン、駄目なプログラミング さて、いや。呟きです。 とにかく、ありがとう http://mevius.5ch.net/test/read.cgi/tech/1685489018/443

447: デフォルトの名無しさん [] 2024/01/28(日) 21:08:37.59 ID:v9jfp3rb Do Dim i as long Dim x as long Dim y as long Dim BDATA(約25000000) as BYTE For x = 0 to 3840 - 1 cells(1,"A") = x DoEvents '''✦✦DoEvents 入れてみた　＼(^o^)／ For y = 0 to 2160 - 1 i = 3840# * 3# * y + 3# * x BDATA(i) = 255 next next って感じでやると　A1のセル、すなわちセルA1が xの値がドンドン更新表示され、面白いです。 面白いから、これで、良いのだぁぁぁぁぁぁ http://mevius.5ch.net/test/read.cgi/tech/1685489018/447

448: 447 [] 2024/01/28(日) 21:15:24.83 ID:v9jfp3rb >>447 自己スレ でも、DoEvents なくても xの値は表示されるな🤔　なくてもヨイのだ。 少しギコチナイ動きになる気がするが、 気のせいなら、気にしなくてヨイのだ。🥳 http://mevius.5ch.net/test/read.cgi/tech/1685489018/448

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.038s