• 締切済み

Excel マクロ 特定の列のみカット&ペースト

Excel マクロ初心者です。IF文を使用しているのですが上手くいきません。 A列が「次郎」の時、1つ上の行のB~E列をカットし次郎の行へペースト、B列が空白の行削除・A列に山田を追加する。 例 A列|B列|C列|D列|E列 花子|a|あ|か|g 太郎|c|う|き|g 次郎| | た | | 三郎|e|お|く|g マクロ後 A列|B列|C列|D列|E列 山田花子|a|あ|か|g 山田次郎|c|う|き|g 山田三郎|e|お|く|g 色々と調べて試してみたのですが知識不足の為、上手くいかず・・・全文載せていただけると、とても助かります。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.2

本件は、質問ではなく、コード作成依頼だよ。コード作成は一般に有料で業者に依頼してたのむもの。 本件は、ごく簡単なことなので付き合うが、なんでも善意で頼むと言うのは、勝手過ぎる。 ーー 上の行から1行ずつA列が山田次郎かどうか判別して、そうなら1行前の名前を山田次郎に変えれば仕舞ではないか。 こういうのをロジックといい、これの大切さを、VBAの作成経験が無いので判ってない初心者が多い。 上記のロジックでで十分かどうか質問者以外は良くわからない。情況を十分説明する能力もない人も多いから。 上記でよければ Sub test01() For i = 1 To 10 If Cells(i, "A") = "山田 次郎 " Then Cells(i - 1, "A") = "山田 次郎" End If Next i End Sub 何かスカみたいな内容だが、質問表現を再考して、質問に補足しては。 最終行の10(仮定したもの)をデータの実際の行数からとらえるのは Googleででも「エクセル vba 最終行 取得」で照会し、出てくる記事を読むこと。 ーー 上では次郎が、下では山田次郎になっていることの説明も必要では。

  • kmetu
  • ベストアンサー率41% (562/1346)
回答No.1

どううまくいかないのかコードを示したらいいのじゃないか 全文書けとは甘えすぎだろう

関連するQ&A