- ベストアンサー
【マクロ等】4行ごとに行を消したいのですが…
noname#24040の回答
Sub Test() Dim v As Variant For Each v In Range("A1", Range("A65536").End(xlUp)).Cells If v.Value = "" Then Range(v, v.Offset(3)).Delete End If Next End Sub ４行だけならこれでもできる。
関連するQ&A
- 行を削除するマクロ2
a列には0から2の数値が入っています。 2行目から、a列の数値が2かつ最下の行(この画像の場合は12行目)までを削除するマクロのvbaの構文を教えてください。 ただし、a列の数値がすべて2未満の場合、行は削除しないようにしてください。 削除するのは行全体で、a列だけではありません。 エクセル2010です。 どうぞよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 条件に一致する行のみを選択し・・・
全ての行のうち、C列にNote_on_cを含んでおり、かつI列が整数の行のみを選択し、それぞれの行のF列の数値を一括で加算/原産する方法はありますか？ 例えば図の場合、15と20が整数かつNote_on_cという文字が入っているので、これらのF列の数値を一括で、+5したいのですが、どうすればよいのでしょうか。
- ベストアンサー
- その他MS Office製品
- エクセルマクロ 2行とびでAからCを削除
毎月の150人分の給与データをエクセルにする必要があります。 csvデータを加工の途中で一名分のデータが3行になります。 その3行になった時点でそれぞれ各個人のデータの2行目に あたる部分のAからＣを削除したいのですが、 例えば A2-C2, A5-C5, A8-C8, A11-C11 ........ A449-C449 を一括で削除する。 マクロでそういった記録は可能でしょうか？
- ベストアンサー
- Visual Basic
- 2行目と3行目を1行目に右側につけて、空白を削除してつめるコードが知りたいです。
1 2 3 4 5 6 7 8 9 . . . A1「1」、A2「2」、A3「3」A4空白、A5「4」、、、と言う風なデータがあるの ですが、 これを 123 456 789 ... と言う風に2行目と3行目を1行目に右側につけて、空白を削除してつめるコー ドが知りたいです。 実際のデータは数値ではなく文字列です。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 2行にわたるデータを1行にしたい
こんにちは。小川と申します。どなたか知恵を貸してください。 表の中のレコードデータが2行にわたるものを1行にしたいのです。 1レコードが1行目2行目にありますが、E2をE1とF1の間に、F2をF1とG1の間に入れて2行目を削除したい。 エクセルやアクセスなど手段はどれでもいいのですが、件数が5000件以上あるファイルが多数あり、とても手作業で出来ません。 どなたか知恵を貸してください。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 行削除のマクロ
B列～F列にデータが入っていてB列の最終行の下セルを選択しクリップボードのデータを貼り付けた後、貼り付けたデータの最初の3行を削除するマクロを作っています。 Sub Macro1() ''Worksheets("Sheet1").Activate ' addrw = Range("b65536").End(xlUp).Offset(1).Row Cells(addrw, 2).PasteSpecial end sub これでB列の最終行の下にデータを貼り付けることまで出来たのですが貼り付けた最初の3行の削除の仕方がわかりません。 いい方法があれば教えていただけないでしょうか。 例えばB列の10行目まで既に入力されていた場合、11行目からクリップボードのデータを貼り付け（ここまでは上のプログラムで出来ました。）、11行目から13行目を削除したいのですがどうしたらいいでしょうか？
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロに詳しい方。
現在、表を作っております。 そこで、 Aの行に追加があるごとに機械名とデータを入力していきたいのですが たとえば A1に『機種名』A2に『データ（数値）』A3『データ（数値）』A4・・・ といった感じでインプットボックス？みたいなのを 使って一括入力するにはどのようなマクロになりますか？ できれば、プロシージャまで書いていただけると うれしいです。よろしくお願いします。
- 締切済み
- オフィス系ソフト
- ＥＸＣＥＬで分かれたシート間の同一データ行を自動削除して結合したい
ＥＸＣＥＬで、シート１、シート２に分かれたデータがあります。 それぞれのシート間でＣ列～Ｆ列の値が重複している行、シート１側のＧ列の数値がマイナス になっている行を自動で削除してからデータを１つのシートに結合する方法を探しています。 条件は、シート１側の重複データ行のみを削除し、シート２側のデータが必ず残る方法であ る必要があります。Ｇ列のマイナス行を削除するのはシート１側のみです。 シート１がＡ列～Ｉ列、約３万行、シート２がＡ列～Ｋ列、約１千行くらいです。 シート２側のみＪ列～Ｋ列（数値データが入っています）が存在しますが、シート１側は空欄です。 列の数は変わりませんが、行数が都度変動しますのでマクロでコピー先のセル位置を決め打ちする 事が出来ません。 １つのシート上で重複するデータを削除する方法は見つける事が出来たのですが、残す方のデータ が指定出来ないのと、複数のシート上の重複データを削除する方法が見つかりませんでした。 何か良い方法がありましたら、ご教授下さい。
- ベストアンサー
- オフィス系ソフト
- EXCELで列のデータを行に移行したい
よろしくお願いします EXCEL2000を使用しています 現状ですが A・B・C・Dの条件に合うデータが最大20個（F～Y）入力してあります 必ず1つのデータが条件に当てはまるのでFに空欄はないです A・B・C・Dの条件は200行あります 希望の状態は F～YのデータをAに書き出し （最小1個×200行＝200行 最大20個×200行＝4000行） それぞれの値の条件A～Dのデータが そのデータのB～E入るようにしたいです VBを利用すれば早いと言うことはわかるのですが 作れないので質問させていただきました よろしくお願いします
- ベストアンサー
- オフィス系ソフト