Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
30640 / 76738 ←次へ　｜　前へ→
【51363】Re:空白行へ直前行（１行上）の内容をコピーするには。
発言  Jaka  - 07/9/13(木) 10:57 -
引用なし
パスワード
   For i = Range("D65536").End(xlUp).Row To 2 Step -1
　 Rows(i).Copy
　 Rows(i).Resize(Cells(i, 4).Value).Offset(1).Insert
　 Rows(i).Resize(Cells(i, 4).Value).Offset(1).Columns(3).FormulaR1C1 = "=R[-1]C+7"
Next
0 hits
▼ 【51350】空白行へ直前行（１行上）の内容をコピーするには。 kotaro 07/9/12(水) 20:20 質問
【51363】Re:空白行へ直前行（１行上）の内容をコピ... Jaka 07/9/13(木) 10:57 発言≪
【51373】Re:空白行へ直前行（１行上）の内容をコピ... kotaro 07/9/13(木) 17:00 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
30640 / 76738 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free