2022-03-09 17:03:45
~の間(繰り返し)及び抜けるがうまくいきません。
なでしこ初心者です。 他の方からの引き継いだコードを改造したいのですが、繰り返し構文でうまく動かず困っています。 「{母艦パス}1.csv」を毎行読んで反復 番号=番号+1 それをコード[番号]に代入 ●母艦設計 母艦のスタイルは「枠なし」 母艦のタイトルは「内容」 母艦の背景色はRGB(255,240,245) 母艦のX=100 母艦のY=100 母艦のW=200 母艦のH=500 終了ボタンとはイメージ そのX=母艦のW-45 そのY=10 そのW=20 そのH=20 その画像は「\img\終了ボタン(R).png」 その透明化はオン そのヒント=「終了」 そのマウス押した時は~ 終了ボタンの画像=「\img\終了ボタン(B).png」 そのクリックした時は~ 終了 #~・~見出しを表示~・~ コード[1]を「,」で区切ってデータ1に代入 見出し1とはラベル そのX=20 そのY=1*25 そのテキスト=データ1[0] 見出し1の文字色は黒色 見出し1のマウス移動した時は~ 見出し1の文字色は赤色 見出し2の文字色は黒色 見出し1のクリックした時は~ データ1をコピー エクセル起動 エクセル新規シート 「B1」をエクセル選択 エクセル貼り付け 「A1」へ「★」をエクセルセル設定 もし、「B2」が空なら 抜ける 違えば 「A2」へ「●」をエクセルセル設定 もし、「B4」が空なら 抜ける 違えば 「A4」へ「●」をエクセルセル設定 もし、「B6」が空なら 抜ける 違えば 「A6」へ「●」をエクセルセル設定 もし、「B8」が空なら 抜ける 違えば 「A8」へ「●」をエクセルセル設定 もし、「B10」が空なら 抜ける 違えば 「A10」へ「●」をエクセルセル設定 もし、「B12」が空なら 抜ける 違えば 「A12」へ「●」をエクセルセル設定 もし、「B14」が空なら 抜ける 違えば 「A14」へ「●」をエクセルセル設定 もし、「B16」が空なら 抜ける 違えば 「A16」へ「●」をエクセルセル設定 もし、「B18」が空なら 抜ける 違えば 「A18」へ「●」をエクセルセル設定 もし、「B20」が空なら 抜ける 違えば 「A20」へ「●」をエクセルセル設定 「{母艦パス}2.CSV」へエクセル保存 見出しラベル、コードともに固定ではない事、1行おきに「●」を「A列」に入力したい事を前提に、 Bセルが空白になったら繰り返しを抜けたいのですが、抜けずに「A20」まで入力してしまいます。 出来上がりは、画像のようにしたいです。 ご指導の方、宜しくお願い致します。 |