前提・実現したいこと
エクセル VBAで画像のsheet1のC000...=...という値が入っている行の=より右の値6個をsheet2のX、Y、Z、W、P、Rの順(sheet1でいう一番左の値をXに代入)に単位は残して、数字の部分だけ入れ替えたいです。どのようなプログラムを作ったらよいでしょうか?
*sheet1のC000...=...が入っている行の数とsheet2 の "イチ[n]{" から はじまって "};" で終わるブロックの数は常に対応しています。
*sheet2 の "イチ[n]{" からはじまって "};" で終わるブロックの行は常に9行です。
*右の値6個というのは、画像で言うとC00036なら2017.664、249.464、-151.063、144.42、84.6、-135.65の6個の値です。
*A5をA7のX、B5をB7のY、C5をC7のZ、D5をD7のW、E5をE7のP、F5をF7のR、A7をA16のX、B7をB16のY、C7をC16のZというようにsheet2の上の行のブロックから順に代入するという意味です。
*sheet2(転記先)のX、Y、Z、W、P、Rに入っている数値は、画像の通り、小数点が必ず入っています。
また、場合によっては数値の前にマイナスがついているものもあります。
*sheet2(転記先)のX、Y、Z、W、P、Rに入っている数値、単位の前にスペースが空いています。
数値の前は、すべてスペース2つ空いてます。
単位の前は、mmは2つdegは1つスペースが空いています。
*画像では、ともに3個ずつ出てきていますが、本番では、sheet1のC000...=...が入っている行の数とsheet2 の "イチ[n]{" からはじまって "};" で終わるブロックの数が100個くらいあると想定して教えてほしいです。
宜しくお願いします。
試したこと
すみません、まだ何も試していません。
VBA初心者で困っています。